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

* More errno changes

Browse Source
This commit is contained in:
marco 2002-08-21 07:02:06 +00:00
parent 4549d72802
commit 82f9961048
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -37,11 +37,11 @@ procedure actualsyscall; assembler; {inline requires a dummy push IIRC}
ret ret
.LErrorcode: .LErrorcode:
{$ifdef ErrnoWord} {$ifdef ErrnoWord}
movw %bx,Errno movw %ax,Errno
{$else} {$else}
movl %ebx,Errno movl %eax,Errno
{$endif} {$endif}
// mov $-1,%eax mov $-1,%eax
end; end;
function Do_SysCall(sysnr:LONGINT):longint; assembler; [public,alias:'FPC_DOSYS0']; function Do_SysCall(sysnr:LONGINT):longint; assembler; [public,alias:'FPC_DOSYS0'];