Commit c2d601b8 by Arnaud Charlet

Minor reformatting.

From-SVN: r177192
parent 9beddc4c
...@@ -570,7 +570,7 @@ package body Restrict is ...@@ -570,7 +570,7 @@ package body Restrict is
for J in SPARK_Hides.First .. SPARK_Hides.Last loop for J in SPARK_Hides.First .. SPARK_Hides.Last loop
if SPARK_Hides.Table (J).Start <= Loc if SPARK_Hides.Table (J).Start <= Loc
and then Loc <= SPARK_Hides.Table (J).Stop and then Loc < SPARK_Hides.Table (J).Stop
then then
return True; return True;
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