Sfoglia il codice sorgente

* make sure that the resource compiler related globals are reset

git-svn-id: trunk@46399 -
svenbarth 5 anni fa
parent
commit
f3541984ee
1 ha cambiato i file con 9 aggiunte e 0 eliminazioni
  1. 9 0
      compiler/comprsrc.pas

+ 9 - 0
compiler/comprsrc.pas

@@ -565,4 +565,13 @@ begin
   resourcefile.free;
 end;
 
+procedure initglobals;
+begin
+  ResCompiler:='';
+  RCCompiler:='';
+  RCForceFPCRes:=false;
+end;
+
+initialization
+  register_initdone_proc(@initglobals,nil);
 end.