From e3ce68612c97702c20c84af3deed26d7bea20d04 Mon Sep 17 00:00:00 2001 From: nickysn Date: Sun, 24 Mar 2013 23:30:31 +0000 Subject: [PATCH] + very simple implementation of do_write for i8086-msdos. 'Hello World' now works!!! git-svn-id: branches/i8086@23992 - --- rtl/msdos/sysfile.inc | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/rtl/msdos/sysfile.inc b/rtl/msdos/sysfile.inc index 023a1e7ed9..1212547868 100644 --- a/rtl/msdos/sysfile.inc +++ b/rtl/msdos/sysfile.inc @@ -34,6 +34,15 @@ end; function do_write(h:thandle;addr:pointer;len : longint) : longint; begin + { TODO: add error checking } + asm + mov ah, 40h + mov bx, h + mov cx, len + mov dx, addr + int 21h + end ['ax','bx','cx','dx']; + do_write := len; end;