mirror of https://gitlab.com/basile.b/dexed.git
runnables and unittest, filter out the "-run" option
This commit is contained in:
parent
72b1833f96
commit
ce6874d05d
|
@ -669,6 +669,9 @@ begin
|
||||||
// would break location detection
|
// would break location detection
|
||||||
else if (sw.length > 2) and (sw[1..3] = '-of') then
|
else if (sw.length > 2) and (sw[1..3] = '-of') then
|
||||||
continue
|
continue
|
||||||
|
// useless
|
||||||
|
else if sw = '-run' then
|
||||||
|
continue
|
||||||
else
|
else
|
||||||
lst.Add(sw);
|
lst.Add(sw);
|
||||||
end;
|
end;
|
||||||
|
@ -2563,7 +2566,9 @@ begin
|
||||||
fMsgs.message('the option "-c" is not be handled when a module is tested',
|
fMsgs.message('the option "-c" is not be handled when a module is tested',
|
||||||
fDoc, amcEdit, amkWarn);
|
fDoc, amcEdit, amkWarn);
|
||||||
end;
|
end;
|
||||||
end;
|
end
|
||||||
|
else if lst[i] = '-run' then
|
||||||
|
lst.Delete(i);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue