|
@@ -84,7 +84,7 @@ begin
|
|
|
fpFlock:=do_syscall(syscall_nr_flock,fd,mode);
|
|
|
end;
|
|
|
|
|
|
-{$ifndef CPUI386}
|
|
|
+{$ifdef CPUI386}
|
|
|
// needs oldfpccall;
|
|
|
Function intAssignPipe(var pipe_in,pipe_out:longint;var errn:cint):cint; oldfpccall;
|
|
|
{
|
|
@@ -113,6 +113,11 @@ begin
|
|
|
mov %ebx,(%edx)
|
|
|
end;
|
|
|
end;
|
|
|
+{$else CPUI386}
|
|
|
+Function intAssignPipe(var pipe_in,pipe_out:longint;var errn:cint):cint; oldfpccall;
|
|
|
+ begin
|
|
|
+ runerror(217);
|
|
|
+ end;
|
|
|
{$endif CPUI386}
|
|
|
|
|
|
|