From 3f92549e4720cf55858daffd992e52669d4db8b9 Mon Sep 17 00:00:00 2001 From: Thomas Quinot Date: Wed, 20 Aug 2008 16:28:26 +0200 Subject: [PATCH] freeze.adb: Minor reformatting 2008-08-20 Thomas Quinot * freeze.adb: Minor reformatting From-SVN: r139308 --- gcc/ada/freeze.adb | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb index dee40df6f9c6..0abbb034750b 100644 --- a/gcc/ada/freeze.adb +++ b/gcc/ada/freeze.adb @@ -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)) -- 2.47.2