Преглед на файлове

atari: added the initialization of threading subsystem to system init

git-svn-id: trunk@34697 -
Károly Balogh преди 9 години
родител
ревизия
42760951f9
променени са 1 файла, в които са добавени 3 реда и са изтрити 3 реда
  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.