Fix verbose display of gcc command.

This commit is contained in:
David Brown 2017-01-01 01:27:58 +00:00
parent a4dfd37908
commit ba9498b592

View file

@ -11,7 +11,7 @@ PROCEDURE execute(title: ARRAY OF CHAR; cmd: ARRAY OF CHAR);
VAR r, status, exitcode: INTEGER; fullcmd: CommandString; VAR r, status, exitcode: INTEGER; fullcmd: CommandString;
BEGIN BEGIN
IF OPM.verbose IN OPM.Options THEN IF OPM.verbose IN OPM.Options THEN
Out.String(" "); Out.String(fullcmd); Out.Ln Out.String(" "); Out.String(cmd); Out.Ln
END; END;
(* Hack to suppress unwanted filename display by Microsoft C compiler on successful compilations. *) (* Hack to suppress unwanted filename display by Microsoft C compiler on successful compilations. *)