From d797669ff816e058a8efb18f4331774ed8942725 Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 29 Oct 2012 11:04:55 +0000 Subject: [PATCH] 2012-10-29 Robert Dewar * freeze.adb: Minor reformatting. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@192930 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/freeze.adb | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 0793113072e8..cb3f6ab68629 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2012-10-29 Robert Dewar + + * freeze.adb: Minor reformatting. + 2012-10-29 Robert Dewar * xr_tabls.adb, xr_tabls.ads, exp_ch9.adb, snames.adb-tmpl, diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb index 9e0cbcacf80f..6c647111627d 100644 --- a/gcc/ada/freeze.adb +++ b/gcc/ada/freeze.adb @@ -4652,7 +4652,7 @@ package body Freeze is -- this is where we analye the expression (after the type is frozen, -- since in the case of Default_Value, we are analyzing with the -- type itself, and we treat Default_Component_Value similarly for - -- the sake of uniformity. + -- the sake of uniformity). if Is_First_Subtype (E) and then Has_Default_Aspect (E) then declare -- 2.47.2