paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-13 18:49:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

Avoid assmebler size mismatch warning in Keep procedure

Browse Source 
git-svn-id: trunk@26496 -
This commit is contained in:
pierre 2014-01-17 23:33:24 +00:00
parent 3f4111ac37
commit f4726e068b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/msdos/dos.pp
View File

@ -1066,7 +1066,7 @@ asm
dec bx dec bx
mov es, bx mov es, bx
mov dx, es:[3] mov dx, es:[3]
mov al, exitcode mov ax, exitcode
mov ah, 31h mov ah, 31h
int 21h int 21h
end; end;