Browse Source

* commented statat for non freebsd, and fixed a typo.

(cherry picked from commit 43010ed4710843b0af6dc3fb771c67d0da7ee450)
marcoonthegit 3 years ago
parent
commit
4f07bff6ac
2 changed files with 3 additions and 2 deletions
  1. 1 1
      rtl/bsd/bunxsysc.inc
  2. 2 1
      rtl/bsd/ossysc.inc

+ 1 - 1
rtl/bsd/bunxsysc.inc

@@ -383,7 +383,7 @@ end;
 {$else}
 function __pipe_call(sysnr:TSysParam):TSysResult; {$ifdef cpui386}oldfpccall{$endif} external name 'FPC_DOSYS0';
 
-  {$if (defined (dragonfly) and (defined(CPUi386) or defined(CPUX86_64))}
+  {$if defined (dragonfly) and (defined(CPUi386) or defined(CPUX86_64))}
     {$define PIPE_RESULT_IN_EAX_AND_EDX}
   {$endif}
   Function FPpipe(var fildes : tfildes):cint;

+ 2 - 1
rtl/bsd/ossysc.inc

@@ -138,12 +138,13 @@ begin
   Fprename:=do_syscall(syscall_nr_rename,TSysParam(old),TSysParam(newpath));
 end;
 
+{$ifdef freebsd}
 Function fpFstatat(fd: cint; path: pchar; var sb: stat; flag: cint):cint;
 
 begin
   fpFStatat:=do_syscall(syscall_nr_fstatat,fd,TSysParam(path),TSysParam(@sb),flag);
 end;
-
+{$endif}
 
 function Fpstat(const path: pchar; var buf : stat):cint; [public, alias : 'FPC_SYSC_STAT'];