diff options
author | Robert Dewar <dewar@adacore.com> | 2009-04-09 10:45:44 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-09 12:45:44 +0200 |
commit | d7ba4df490028a6cec281e104faaba40822f55c1 (patch) | |
tree | fb21360fbb3e4a11c474ee56e7825883679abbcc /gcc/ada/sem_ch8.adb | |
parent | 923e6ff331d3e4c0109529937c5ee589dfbe93b8 (diff) | |
download | gcc-d7ba4df490028a6cec281e104faaba40822f55c1.zip gcc-d7ba4df490028a6cec281e104faaba40822f55c1.tar.gz gcc-d7ba4df490028a6cec281e104faaba40822f55c1.tar.bz2 |
sem_ch7.adb, [...]: Code clean up...
2009-04-09 Robert Dewar <dewar@adacore.com>
* sem_ch7.adb, sem_ch10.adb, sem_prag.adb, sem_ch12.adb, sem_util.adb,
exp_ch13.adb, sem_ch6.adb, exp_disp.adb, sem_ch8.adb, sem_warn.adb,
sem_cat.adb: Code clean up: use Is_Package_Or_Generic_Package where
possible to replace an OR of two separate tests.
From-SVN: r145823
Diffstat (limited to 'gcc/ada/sem_ch8.adb')
-rw-r--r-- | gcc/ada/sem_ch8.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch8.adb b/gcc/ada/sem_ch8.adb index c34b073..fa70844 100644 --- a/gcc/ada/sem_ch8.adb +++ b/gcc/ada/sem_ch8.adb @@ -6757,8 +6757,7 @@ package body Sem_Ch8 is Full_Vis := True; elsif Is_Package_Or_Generic_Package (S) - and then (In_Private_Part (S) - or else In_Package_Body (S)) + and then (In_Private_Part (S) or else In_Package_Body (S)) then Full_Vis := True; |