فهرست منبع

+ turn on fpu exceptions for darwin/i386

git-svn-id: trunk@2928 -
Jonas Maebe 19 سال پیش
والد
کامیت
2a90c43cea
1فایلهای تغییر یافته به همراه3 افزوده شده و 0 حذف شده
  1. 3 0
      rtl/bsd/system.pp

+ 3 - 0
rtl/bsd/system.pp

@@ -234,6 +234,9 @@ begin
   argc:= argcparam;
   argv:= argvparam;
   envp:= envpparam;
+{$ifdef cpui386}
+  Set8087CW(Default8087CW);  
+{$endif cpui386}
 {$if not defined(FPC_DARWIN_PASCALMAIN) or defined(FPC_DARWIN_JMP_MAIN)}
   pascalmain;  {run the pascal main program}
 {$endif}