Explorar o código

* use thread var only if the target supports threading

git-svn-id: trunk@18967 -
florian %!s(int64=14) %!d(string=hai) anos
pai
achega
dbd33fd6a5
Modificáronse 1 ficheiros con 4 adicións e 1 borrados
  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,