mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-25 08:55:35 +08:00
Code Issues Packages Projects Releases Wiki Activity

freeze.adb: Minor reformatting.

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/ChangeLog
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,

2
gcc/ada/freeze.adb
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