mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 04:59:25 +02:00
Avoid assmebler size mismatch warning in Keep procedure
git-svn-id: trunk@26496 -
This commit is contained in:
parent
3f4111ac37
commit
f4726e068b
@ -1066,7 +1066,7 @@ asm
|
||||
dec bx
|
||||
mov es, bx
|
||||
mov dx, es:[3]
|
||||
mov al, exitcode
|
||||
mov ax, exitcode
|
||||
mov ah, 31h
|
||||
int 21h
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user