diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-10-01 10:45:43 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-10-01 10:45:43 +0200 |
| commit | c5a26133df8575533bc97def6e76bf66bec7f91a (patch) | |
| tree | bc41eca22e0a81ac94816a7d59b5d89a6242b070 /gcc/ada/sem_ch6.adb | |
| parent | 9e1902a9e7e3cb06d33ad2c1e1e002d2ba0973ec (diff) | |
| download | gcc-c5a26133df8575533bc97def6e76bf66bec7f91a.zip gcc-c5a26133df8575533bc97def6e76bf66bec7f91a.tar.gz gcc-c5a26133df8575533bc97def6e76bf66bec7f91a.tar.bz2 | |
[multiple changes]
2012-10-01 Robert Dewar <dewar@adacore.com>
* freeze.adb, sem_ch6.adb, opt.ads, sem_ch13.adb,
exp_ch3.adb: Minor reformatting.
2012-10-01 Hristian Kirtchev <kirtchev@adacore.com>
* checks.adb (Build_PPC_Pragma): A PPC pragma can now be properly
associated with a subprogram body.
From-SVN: r191902
Diffstat (limited to 'gcc/ada/sem_ch6.adb')
| -rw-r--r-- | gcc/ada/sem_ch6.adb | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb index c71c2db..5ace348 100644 --- a/gcc/ada/sem_ch6.adb +++ b/gcc/ada/sem_ch6.adb @@ -11344,9 +11344,7 @@ package body Sem_Ch6 is -- public subprogram, since we do get initializations to deal with. -- Other internally generated subprograms are not public. - if not Is_List_Member (DD) - and then Is_Init_Proc (DD) - then + if not Is_List_Member (DD) and then Is_Init_Proc (DD) then return True; elsif not Comes_From_Source (DD) then |