Explorar o código

Include setsysnr.inc and call SetSyscallNumbers if FPC_HAS_SETSYSNR_INC is defined

git-svn-id: trunk@29135 -
pierre %!s(int64=10) %!d(string=hai) anos
pai
achega
1d1215ede3
Modificáronse 2 ficheiros con 16 adicións e 0 borrados
  1. 8 0
      rtl/unix/baseunix.pp
  2. 8 0
      rtl/unix/syscall.pp

+ 8 - 0
rtl/unix/baseunix.pp

@@ -90,4 +90,12 @@ Uses Sysctl;
 {$i osmacro.inc}        { macro implenenations }
 {$i bunxovl.inc}        { redefs and overloads implementation }
 
+{$ifdef FPC_HAS_SETSYSNR_INC}
+{$I setsysnr.inc}
+{$endif FPC_HAS_SETSYSNR_INC}
+
+{$ifdef FPC_HAS_SETSYSNR_INC}
+begin
+  SetSyscallNumbers;
+{$endif FPC_HAS_SETSYSNR_INC}
 end.

+ 8 - 0
rtl/unix/syscall.pp

@@ -7,5 +7,13 @@ interface
 {$i syscallh.inc}
 
 implementation
+{$ifdef FPC_HAS_SETSYSNR_INC}
+{$define FPC_COMPILING_SYSCALL_UNIT}
+{$I setsysnr.inc}
+{$endif FPC_HAS_SETSYSNR_INC}
 
+{$ifdef FPC_HAS_SETSYSNR_INC}
+begin
+  SetSyscallNumbers;
+{$endif FPC_HAS_SETSYSNR_INC}
 end.