diff --git a/rtl/bsd/syscalls.inc b/rtl/bsd/syscalls.inc index 534da51b58..bf7d87d075 100644 --- a/rtl/bsd/syscalls.inc +++ b/rtl/bsd/syscalls.inc @@ -38,6 +38,8 @@ paste to and AS source). Ultimately I hope to design something like this} ret } +procedure actualsyscall; cdecl; EXTERNAL NAME '_actualsyscall'; + function Do_SysCall(sysnr:LONGINT):longint; var retval:longint; @@ -45,7 +47,7 @@ var retval:longint; begin asm movl sysnr,%eax - call _actualsyscall + call actualsyscall mov %eax,Retval end; if RetVal<0 then @@ -68,7 +70,7 @@ begin asm movl sysnr,%eax pushl Param1 - call _actualsyscall + call actualsyscall addl $4,%esp mov %eax,Retval end; @@ -93,7 +95,7 @@ begin asm movl sysnr,%eax pushw Param1 - call _actualsyscall + call actualsyscall addl $2,%esp mov %eax,Retval end; @@ -119,7 +121,7 @@ begin movl sysnr,%eax pushl param2 pushl Param1 - call _actualsyscall + call actualsyscall addl $8,%esp mov %eax,Retval end; @@ -144,7 +146,7 @@ begin pushl param3 pushl param2 pushl Param1 - call _actualsyscall + call actualsyscall addl $12,%esp mov %eax,Retval end; @@ -169,7 +171,7 @@ begin pushw param3 pushl param2 pushl Param1 - call _actualsyscall + call actualsyscall addl $12,%esp mov %eax,Retval end; @@ -197,7 +199,7 @@ begin pushl param3 pushl param2 pushl Param1 - call _actualsyscall + call actualsyscall addl $16,%esp mov %eax,Retval end; @@ -226,7 +228,7 @@ begin pushl param3 pushl param2 pushl Param1 - call _actualsyscall + call actualsyscall addl $20,%esp mov %eax,Retval end; @@ -256,7 +258,7 @@ begin pushl param3 pushl param2 pushl Param1 - call _actualsyscall + call actualsyscall addl $28,%esp mov %eax,Retval end; @@ -507,7 +509,10 @@ end; { $Log$ - Revision 1.9 2000-03-02 15:34:07 marco + Revision 1.10 2000-03-16 16:18:12 marco + * Last changes before next test. ppc386 -h works with these srcs. + + Revision 1.9 2000/03/02 15:34:07 marco * added a syscall for 5 longints Revision 1.8 2000/03/01 20:03:57 marco