This commit is contained in:
Basile Burg 2016-02-06 11:32:05 +01:00
parent 67b1b16cfb
commit 2d5369c192
1 changed files with 4 additions and 3 deletions

View File

@ -1960,6 +1960,7 @@ begin
begin
dmdproc.Parameters.Add('-main');
dmdproc.Parameters.Add('-unittest');
if fCovModUt then
dmdproc.Parameters.Add('-cov');
end
else dmdproc.Parameters.Add('-version=runnable_module');
@ -1982,8 +1983,8 @@ begin
for i := 0 to lst.Count-1 do
if lst[i][1..7] = '0000000' then
begin
fMsgs.message(format('%s(%d):%s',[fDoc.fileName, i+1,
'is not cevered by the unittests']), fDoc, amcEdit, amkWarn);
fMsgs.message(format('%s(%d): %s',[fDoc.fileName, i+1,
'not covered by the unittests']), fDoc, amcEdit, amkWarn);
fullcov := false;
end;
sysutils.DeleteFile(covname);