paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 09:47:52 +02:00
Code Issues Packages Projects Releases Wiki Activity

Include setsysnr.inc and call SetSyscallNumbers if FPC_HAS_SETSYSNR_INC is defined

Browse Source 
git-svn-id: trunk@29135 -
This commit is contained in:
pierre 2014-11-23 21:57:33 +00:00
parent 6141820af3
commit 1d1215ede3
2 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/unix/baseunix.pp
View File

@ -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
rtl/unix/syscall.pp
View File

@ -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.