paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-29 09:20:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Use correct sign extension for FPC_DOSYS1w

Browse Source 
git-svn-id: trunk@20775 -
This commit is contained in:
pierre 2012-04-09 21:57:13 +00:00
parent b98529673c
commit db3346994c
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/bsd/i386/syscall.inc
View File

@ -89,7 +89,7 @@ function FpSysCall(sysnr,param1:TSysParam):TSysResult; oldfpccall; assembler;[pu
function FpSysCall(sysnr,param1:integer):TSysResult; oldfpccall;assembler;[public,alias:'FPC_DOSYS1w']; function FpSysCall(sysnr,param1:integer):TSysResult; oldfpccall;assembler;[public,alias:'FPC_DOSYS1w'];
asm asm
movl sysnr,%eax movswl sysnr,%eax
pushw Param1 pushw Param1
call actualsyscall call actualsyscall
add $2,%esp add $2,%esp