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

* intAssignPipe is i386 only code

Browse Source 
git-svn-id: trunk@11767 -
This commit is contained in:
florian 2008-09-13 15:37:06 +00:00
parent 9c6e831c7a
commit e32f13dffb
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/freebsd/unxsysc.inc
View File

@ -84,6 +84,7 @@ begin
fpFlock:=do_syscall(syscall_nr_flock,fd,mode); fpFlock:=do_syscall(syscall_nr_flock,fd,mode);
end; end;
{$ifndef CPUI386}
// needs oldfpccall; // needs oldfpccall;
Function intAssignPipe(var pipe_in,pipe_out:longint;var errn:cint):cint; oldfpccall; Function intAssignPipe(var pipe_in,pipe_out:longint;var errn:cint):cint; oldfpccall;
{ {
@ -112,6 +113,7 @@ begin
mov %ebx,(%edx) mov %ebx,(%edx)
end; end;
end; end;
{$endif CPUI386}
function MUnMap (P : Pointer; Size : size_t) : cint; function MUnMap (P : Pointer; Size : size_t) : cint;