Commit 2132d92e by Arnaud Charlet

Minor reformatting.

From-SVN: r247463
parent 42fe76e0
...@@ -1191,7 +1191,7 @@ package body Errout is ...@@ -1191,7 +1191,7 @@ package body Errout is
if Errors.Table (Cur_Msg).Warn then if Errors.Table (Cur_Msg).Warn then
Warning_Info_Messages := Warning_Info_Messages + 1; Warning_Info_Messages := Warning_Info_Messages + 1;
Warnings_Detected := Warnings_Detected + 1; Warnings_Detected := Warnings_Detected + 1;
else else
Report_Info_Messages := Report_Info_Messages + 1; Report_Info_Messages := Report_Info_Messages + 1;
end if; end if;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment