瀏覽代碼

* No longer treat threadvar is normakl var if threading off

daniel 21 年之前
父節點
當前提交
7e3ad7e796
共有 1 個文件被更改,包括 5 次插入5 次删除
  1. 5 5
      compiler/pdecl.pas

+ 5 - 5
compiler/pdecl.pas

@@ -616,10 +616,7 @@ implementation
         consume(_THREADVAR);
         if not(symtablestack.symtabletype in [staticsymtable,globalsymtable]) then
           message(parser_e_threadvars_only_sg);
-{        if not(cs_threading in aktmoduleswitches) and
-           not(cs_compilesystem in aktmoduleswitches) then
-          Comment(V_Error,'Threading is turned off');}
-        read_var_decs(false,false,cs_threading in aktmoduleswitches);
+        read_var_decs(false,false,true);
       end;
 
 
@@ -682,7 +679,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.80  2004-02-17 17:38:11  daniel
+  Revision 1.81  2004-02-17 19:37:16  daniel
+    * No longer treat threadvar is normakl var if threading off
+
+  Revision 1.80  2004/02/17 17:38:11  daniel
     * Enable threadvars for all modes
 
   Revision 1.79  2004/02/12 15:54:03  peter