mirror of https://gitlab.com/basile.b/dexed.git
runnables, run module tests, always display percentage
This commit is contained in:
parent
1183822e3d
commit
80daf6ec2e
|
@ -2805,6 +2805,8 @@ var
|
|||
fname, covname: string;
|
||||
lst: TStringList;
|
||||
i: integer;
|
||||
const
|
||||
ic : array[boolean] of TCEAppMessageKind = (amkWarn, amkInf);
|
||||
begin
|
||||
asyncprocTerminate(sender);
|
||||
if fCovModUt and assigned(fRunProc) and (fRunProc.ExitStatus = 0) then
|
||||
|
@ -2829,8 +2831,7 @@ begin
|
|||
end;
|
||||
sysutils.DeleteFile(covname);
|
||||
sysutils.DeleteFile('__main.lst');
|
||||
if fullcov then fMsgs.message(shortenPath(fDoc.fileName, 25)
|
||||
+ ' is 100% covered by the unittests', fDoc, amcEdit, amkInf);
|
||||
fMsgs.message(lst[lst.Count-1], fDoc, amcEdit, ic[fullcov]);
|
||||
finally
|
||||
lst.free;
|
||||
end;
|
||||
|
|
Loading…
Reference in New Issue