From a67fe62caa1a52807106b750f8d88d6e01e08462 Mon Sep 17 00:00:00 2001 From: svenbarth Date: Fri, 13 May 2016 14:51:02 +0000 Subject: [PATCH] fmodule.pas, tmodule: * reset: also free and reinstantiate unitimportsyms git-svn-id: trunk@33685 - --- compiler/fmodule.pas | 2 ++ 1 file changed, 2 insertions(+) diff --git a/compiler/fmodule.pas b/compiler/fmodule.pas index e8f271eddd..900443f201 100644 --- a/compiler/fmodule.pas +++ b/compiler/fmodule.pas @@ -774,6 +774,8 @@ implementation wpoinfo:=nil; checkforwarddefs.free; checkforwarddefs:=TFPObjectList.Create(false); + unitimportsyms.free; + unitimportsyms:=TFPObjectList.Create(false); derefdata.free; derefdata:=TDynamicArray.Create(1024); if assigned(unitmap) then