paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-02 19:43:15 +01:00
Code Issues Packages Projects Releases Wiki Activity

* and again for ftruncate (sigh)

Browse Source
This commit is contained in:
marco 2002-10-16 18:44:00 +00:00
parent abe28b90f3
commit 65318837d2
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/bsd/i386/syscall.inc
View File

@ -116,7 +116,7 @@ function Do_SysCall(sysnr,param1,param2,param3,param4,param5:LONGINT):longint;
addl $20,%esp
end;
function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:LONGINT):longint; assembler;[public,alias:'FPC_DOSYS6'];
function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:LONGINT):int64; assembler;[public,alias:'FPC_DOSYS6'];
asm
movl sysnr,%eax

7
rtl/bsd/i386/syscallh.inc
View File

@ -29,12 +29,15 @@ function Do_SysCall(sysnr,param1,param2:LONGINT):longint; external name 'FPC_DO
function Do_SysCall(sysnr,param1,param2,param3:LONGINT):longint; external name 'FPC_DOSYS3';
function Do_SysCall(sysnr,param1,param2,param3,param4:LONGINT):longint; external name 'FPC_DOSYS4';
function Do_SysCall(sysnr,param1,param2,param3,param4,param5:LONGINT):longint; external name 'FPC_DOSYS5';
function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:LONGINT):longint; external name 'FPC_DOSYS6';
function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:LONGINT):int64; external name 'FPC_DOSYS6';
function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6,param7:LONGINT):int64; external name 'FPC_DOSYS7';
{
$Log$
Revision 1.3 2002-10-16 18:41:14 marco
Revision 1.4 2002-10-16 18:44:00 marco
* and again for ftruncate (sigh)
Revision 1.3 2002/10/16 18:41:14 marco
* the 7 param syscall (for lseek and truncate) now returns a int64.
Revision 1.2 2002/09/07 16:01:17 peter