Browse Source

* use thread var only if the target supports threading

git-svn-id: trunk@18967 -
florian 14 years ago
parent
commit
dbd33fd6a5
1 changed files with 4 additions and 1 deletions
  1. 4 1
      rtl/inc/systemh.inc

+ 4 - 1
rtl/inc/systemh.inc

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