Commit 288f28c8 by Arnaud Charlet

Minor reformatting.

From-SVN: r180957
parent 8daa1407
......@@ -2431,7 +2431,7 @@ package body Sem_Ch5 is
declare
Element : constant Entity_Id :=
Find_Aspect (Typ, Aspect_Iterator_Element);
Find_Aspect (Typ, Aspect_Iterator_Element);
begin
if No (Element) then
Error_Msg_NE ("cannot iterate over&", N, Typ);
......@@ -2453,7 +2453,6 @@ package body Sem_Ch5 is
Error_Msg_NE
("cannot iterate over&", Name (N), Typ);
else
Error_Msg_N
("name must be an iterator, not a container", Name (N));
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