diff options
Diffstat (limited to 'rtl/bsd/system.pp')
| -rw-r--r-- | rtl/bsd/system.pp | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/rtl/bsd/system.pp b/rtl/bsd/system.pp index 634b2fbfe4..316840f57a 100644 --- a/rtl/bsd/system.pp +++ b/rtl/bsd/system.pp @@ -79,6 +79,10 @@ Implementation {$I system.inc} +{$ifdef FPC_HAS_SETSYSNR_INC} +{$I setsysnr.inc} +{$endif FPC_HAS_SETSYSNR_INC} + {***************************************************************************** Misc. System Dependent Functions *****************************************************************************} @@ -301,7 +305,7 @@ begin argv:= argvparam; envp:= envpparam; {$ifdef cpui386} - Set8087CW(Default8087CW); + Set8087CW(Default8087CW); {$endif cpui386} pascalmain; {run the pascal main program} end; @@ -327,6 +331,11 @@ Begin IsConsole := TRUE; StackLength := CheckInitialStkLen(InitialStkLen); StackBottom := Sptr - StackLength; +{$ifdef FPC_HAS_SETSYSNR_INC} + { This procedure is needed for openbsd system which re-uses + the same syscall numbers depending on OS version } + SetSyscallNumbers; +{$endif FPC_HAS_SETSYSNR_INC} { Set up signals handlers (may be needed by init code to test cpu features) } InstallSignals; @@ -345,7 +354,6 @@ Begin SetupCmdLine; { threading } InitSystemThreads; - initvariantmanager; { restore original signal handlers in case this is a library } if IsLibrary then RestoreOldSignalHandlers; |