paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 21:29:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* No longer treat threadvar is normakl var if threading off

Browse Source
This commit is contained in:
daniel 2004-02-17 19:37:16 +00:00
parent eaa8405a15
commit 7e3ad7e796
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/pdecl.pas
View File

@ -616,10 +616,7 @@ implementation
consume(_THREADVAR); consume(_THREADVAR);
if not(symtablestack.symtabletype in [staticsymtable,globalsymtable]) then if not(symtablestack.symtabletype in [staticsymtable,globalsymtable]) then
message(parser_e_threadvars_only_sg); message(parser_e_threadvars_only_sg);
{ if not(cs_threading in aktmoduleswitches) and read_var_decs(false,false,true);
not(cs_compilesystem in aktmoduleswitches) then
Comment(V_Error,'Threading is turned off');}
read_var_decs(false,false,cs_threading in aktmoduleswitches);
end; end;
@ -682,7 +679,10 @@ implementation
end. end.
{ {
$Log$ $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 * Enable threadvars for all modes
Revision 1.79 2004/02/12 15:54:03 peter Revision 1.79 2004/02/12 15:54:03 peter