Minor reformatting.

From-SVN: r219218
This commit is contained in:
Arnaud Charlet 2015-01-06 09:23:59 +01:00
parent 31dd2a8669
commit 9bd59e280c

View file

@ -282,10 +282,12 @@ package body MLib.Utl is
if not Opt.Quiet_Output then
Write_Str (Ranlib_Name.all);
Write_Char (' ');
for J in Ranlib_Options'Range loop
Write_Str (Ranlib_Options (J).all);
Write_Char (' ');
end loop;
Write_Line (Arguments (Ar_Options'Length + 1).all);
end if;