Przeglądaj źródła

atari: added the initialization of threading subsystem to system init

git-svn-id: trunk@34697 -
Károly Balogh 8 lat temu
rodzic
commit
42760951f9
1 zmienionych plików z 3 dodań i 3 usunięć
  1. 3 3
      rtl/atari/system.pp

+ 3 - 3
rtl/atari/system.pp

@@ -267,9 +267,9 @@ begin
   SysInitStdIO;
 { Reset IO Error }
   InOutRes:=0;
-(* This should be changed to a real value during *)
-(* thread driver initialization if appropriate.  *)
-  ThreadID := 1;
 { Setup command line arguments }
 //  argc:=GetParamCount(args);
+{$ifdef FPC_HAS_FEATURE_THREADING}
+  InitSystemThreads;
+{$endif}
 end.