forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix #228 - possible infinite loop when compiling a runnable with auto solved dependencies

This commit is contained in:
Basile Burg 2018-01-31 13:44:26 +01:00
parent c692177483
commit b3c2efe817
1 changed files with 14 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/ce_libman.pas
View File

@ -601,17 +601,23 @@ begin
// add the library files and the import paths for the selection // add the library files and the import paths for the selection
if not sel.IsEmpty then with sel.Iterator do if not sel.IsEmpty then with sel.Iterator do
begin begin
while true do if data.hasValidLibFile then while true do
begin begin
if not data.enabled then itm := Data;
fMsgs.message(format(deactivatedMessage, [data.libAlias]), if itm.isNil then
break;
if itm.hasValidLibFile then
begin
if not itm.enabled then
fMsgs.message(format(deactivatedMessage, [itm.libAlias]),
nil, amcAutoCompile, amkWarn) nil, amcAutoCompile, amkWarn)
else else
begin begin
libs.Add(Data.libFile); libs.Add(itm.libFile);
paths.Add('-I' + Data.libSourcePath); paths.Add('-I' + itm.libSourcePath);
end; end;
if not Next then end;
if not next then
break; break;
end; end;
free; free;