diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-04-23 09:54:14 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-04-23 09:54:14 +0000 |
| commit | 99237f96a2568e01072ea89a2eb44dd6d5e67744 (patch) | |
| tree | bad40516ffacfc877134c355839540d4edc8c1fb /gcc/ada/aspects.adb | |
| parent | f2780d56ec17d5a0c219b94561a43133f4dd1873 (diff) | |
| download | gcc-99237f96a2568e01072ea89a2eb44dd6d5e67744.tar.gz | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@198186 138bc75d-0d04-0410-961f-82ee72b054a4
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 b72debb8600..401928b95a1 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; |