paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-06 22:07:56 +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'];
asm
movl sysnr,%eax
movswl sysnr,%eax
pushw Param1
call actualsyscall
add $2,%esp