Commit 3f92549e by Thomas Quinot Committed by Arnaud Charlet

freeze.adb: Minor reformatting

2008-08-20  Thomas Quinot  <quinot@adacore.com>

	* freeze.adb: Minor reformatting

From-SVN: r139308
parent 5b3a33c3
......@@ -2608,10 +2608,9 @@ package body Freeze is
-- type T is tagged;
-- function F (X : Boolean) return T; -- ERROR
-- The type must be declared in the current scope
-- for the use to be legal, and the full view
-- must be available when the construct that mentions
-- it is frozen.
-- The type must be declared in the current scope for the
-- use to be legal, and the full view must be available
-- when the construct that mentions it is frozen.
elsif Ekind (Etype (E)) = E_Incomplete_Type
and then Is_Tagged_Type (Etype (E))
......
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