CodeTools: Fix SIGSEGV introduced in r54438 #b823ce3277 (mantis #31561)

git-svn-id: trunk@54446 -
This commit is contained in:
hnb 2017-03-18 15:25:47 +00:00
parent 5b2322946b
commit 1ca4c2796a

View File

@ -4000,7 +4000,7 @@ var
UnitSet:=CodeToolBoss.GetUnitSetForDirectory('');
if UnitSet<>nil then begin
CfgCache:=UnitSet.GetConfigCache(false);
if CfgCache.Includes.GetString(AFilename,ExpFilename) then begin
if Assigned(CfgCache) and CfgCache.Includes.GetString(AFilename,ExpFilename) then begin
NewCode:=LoadSourceCaseLoUp(ExpFilename);
Result:=(NewCode<>nil);
if Result then exit;