2008-08-20 Thomas Quinot <quinot@adacore.com>
* freeze.adb: Minor reformatting
From-SVN: r139308
-- 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))