diff --git a/rtl/bsd/system.pp b/rtl/bsd/system.pp index 634b2fbfe4..8f17e5c559 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;