Преглед изворни кода

* use thread var only if the target supports threading

git-svn-id: trunk@18967 -
florian пре 14 година
родитељ
комит
dbd33fd6a5
1 измењених фајлова са 4 додато и 1 уклоњено
  1. 4 1
      rtl/inc/systemh.inc

+ 4 - 1
rtl/inc/systemh.inc

@@ -488,8 +488,11 @@ var
 var cmdline:Pchar=nil;
 {$endif}
 
-
+{$ifdef FPC_HAS_FEATURE_THREADING}
 ThreadVar
+{$else FPC_HAS_FEATURE_THREADING}
+Var
+{$endif FPC_HAS_FEATURE_THREADING}
   ThreadID    : TThreadID;
   { Standard In- and Output }
   ErrOutput,