diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-09 10:45:44 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-09 10:45:44 +0000 |
commit | 7ab0189d44062965566184e5a5316dd9a335f184 (patch) | |
tree | fb21360fbb3e4a11c474ee56e7825883679abbcc /gcc/ada/sem_warn.adb | |
parent | 15175b09198ccc90607e9d00c38dbc3321c0a5f2 (diff) | |
download | gcc-7ab0189d44062965566184e5a5316dd9a335f184.tar.gz |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@145823 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_warn.adb')
-rw-r--r-- | gcc/ada/sem_warn.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_warn.adb b/gcc/ada/sem_warn.adb index 31f931e4679..10611743d85 100644 --- a/gcc/ada/sem_warn.adb +++ b/gcc/ada/sem_warn.adb @@ -1301,7 +1301,7 @@ package body Sem_Warn is (Ekind (E1) = E_Package and then not Is_Package_Or_Generic_Package - (Cunit_Entity (Current_Sem_Unit)))) + (Cunit_Entity (Current_Sem_Unit)))) -- Exclude instantiations, since there is no reason why every -- entity in an instantiation should be referenced. |