freeze.adb: Minor reformatting.

2012-10-29  Robert Dewar  <dewar@adacore.com>

	* freeze.adb: Minor reformatting.

From-SVN: r192930
This commit is contained in:
Robert Dewar 2012-10-29 11:04:55 +00:00 committed by Arnaud Charlet
parent a5a809b2b9
commit 1b73408a13
2 changed files with 5 additions and 1 deletions

View File

@ -1,3 +1,7 @@
2012-10-29 Robert Dewar <dewar@adacore.com>
* freeze.adb: Minor reformatting.
2012-10-29 Robert Dewar <dewar@adacore.com>
* xr_tabls.adb, xr_tabls.ads, exp_ch9.adb, snames.adb-tmpl,

View File

@ -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