fix #122 - compile a runnable with not project opened, case of segfault

This commit is contained in:
Basile Burg 2017-02-14 01:27:16 +01:00
parent 17fe5f62d5
commit 0aefd3341c
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
1 changed files with 11 additions and 8 deletions

View File

@ -2518,7 +2518,9 @@ begin
if fDoc.isTemporary then if fDoc.isTemporary then
result := of_yes; result := of_yes;
end end
else if ifInProject in fRunnablesOptions.outputFolderConditions then else if assigned(fProject) then
begin
if ifInProject in fRunnablesOptions.outputFolderConditions then
begin begin
if fProject.isSource(fDoc.fileName) then if fProject.isSource(fDoc.fileName) then
result := of_yes; result := of_yes;
@ -2528,6 +2530,7 @@ begin
if not fProject.isSource(fDoc.fileName) and not fDoc.isTemporary then if not fProject.isSource(fDoc.fileName) and not fDoc.isTemporary then
result := of_yes; result := of_yes;
end; end;
end
end; end;
end; end;