mirror of https://gitlab.com/basile.b/dexed.git
fix, doesnt call dmd if no source
This commit is contained in:
parent
43f59512b8
commit
ea823e883b
|
@ -506,6 +506,8 @@ begin
|
||||||
subjLmFromString(TCELogMessageSubject(fLogMessager),
|
subjLmFromString(TCELogMessageSubject(fLogMessager),
|
||||||
'project warning: the pre-compilation process has not been properly executed', Self, amcProj, amkWarn);
|
'project warning: the pre-compilation process has not been properly executed', Self, amcProj, amkWarn);
|
||||||
//
|
//
|
||||||
|
if Sources.Count = 0 then exit;
|
||||||
|
//
|
||||||
prjname := shortenPath(filename, 25);
|
prjname := shortenPath(filename, 25);
|
||||||
compilproc := TProcess.Create(nil);
|
compilproc := TProcess.Create(nil);
|
||||||
olddir := '';
|
olddir := '';
|
||||||
|
@ -523,7 +525,7 @@ begin
|
||||||
compilproc.Options := compilproc.Options + [poStderrToOutPut, poUsePipes];
|
compilproc.Options := compilproc.Options + [poStderrToOutPut, poUsePipes];
|
||||||
compilproc.ShowWindow := swoHIDE;
|
compilproc.ShowWindow := swoHIDE;
|
||||||
getOpts(compilproc.Parameters);
|
getOpts(compilproc.Parameters);
|
||||||
compilproc.Execute;
|
compilproc.Execute;
|
||||||
while compilProc.Running do
|
while compilProc.Running do
|
||||||
compProcOutput(compilproc);
|
compProcOutput(compilproc);
|
||||||
if compilproc.ExitStatus = 0 then begin
|
if compilproc.ExitStatus = 0 then begin
|
||||||
|
|
Loading…
Reference in New Issue