diff options
| author | Robert Dewar <dewar@adacore.com> | 2013-04-23 09:54:14 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-04-23 11:54:14 +0200 |
| commit | 2e86f67917967e048d40e25579bf49414a85d8d9 (patch) | |
| tree | bad40516ffacfc877134c355839540d4edc8c1fb /gcc/ada/aspects.adb | |
| parent | e93f4e1244de0d4d7446237c7fa6995e57efca41 (diff) | |
| download | gcc-2e86f67917967e048d40e25579bf49414a85d8d9.zip gcc-2e86f67917967e048d40e25579bf49414a85d8d9.tar.gz gcc-2e86f67917967e048d40e25579bf49414a85d8d9.tar.bz2 | |
sinfo.ads, [...]: Minor reformatting and code clean up.
2013-04-23 Robert Dewar <dewar@adacore.com>
* sinfo.ads, einfo.adb, sem_res.adb, exp_ch6.adb, aspects.adb: Minor
reformatting and code clean up.
From-SVN: r198186
Diffstat (limited to 'gcc/ada/aspects.adb')
| -rw-r--r-- | gcc/ada/aspects.adb | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/ada/aspects.adb b/gcc/ada/aspects.adb index b72debb..401928b 100644 --- a/gcc/ada/aspects.adb +++ b/gcc/ada/aspects.adb @@ -164,9 +164,7 @@ package body Aspects is Owner := Root_Type (Owner); end if; - if Is_Private_Type (Owner) - and then Present (Full_View (Owner)) - then + if Is_Private_Type (Owner) and then Present (Full_View (Owner)) then Owner := Full_View (Owner); end if; end if; |