git-svn-id: trunk@48082 - (cherry picked from commit 7adcd2a8a27ff89558856756c8f7abd002623d88)
@@ -3142,7 +3142,10 @@ begin
FinishedModule;
finally
if HasFinished then
+ begin
+ Module.Release{$IFDEF CheckPasTreeRefCount}('TPasPackage.Modules'){$ENDIF};
FCurModule:=nil; // clear module if there is an error or finished parsing
+ end;
end;