浏览代码

* make sure that the resource compiler related globals are reset

git-svn-id: trunk@46399 -
svenbarth 5 年之前
父节点
当前提交
f3541984ee
共有 1 个文件被更改,包括 9 次插入0 次删除
  1. 9 0
      compiler/comprsrc.pas

+ 9 - 0
compiler/comprsrc.pas

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