diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-11-23 14:05:26 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-11-23 14:05:26 +0000 |
| commit | c822fc9b51ce3de2fe06fd2dbe66f166ca0664d5 (patch) | |
| tree | ff57b9487691cf2fb581fa1a9ad47d175aef9fc7 /gcc/ada/sem_ch9.adb | |
| parent | 16916f1a604870168111eb73a895a826c3a160ec (diff) | |
| download | gcc-c822fc9b51ce3de2fe06fd2dbe66f166ca0664d5.tar.gz | |
2011-11-23 Thomas Quinot <quinot@adacore.com>
* thread.c, s-oscons-tmplt.c: Generate __gnat_pthread_condattr_setup
only on platforms where this is required, as determined by
s-oscons.h.
2011-11-23 Ed Schonberg <schonberg@adacore.com>
* sem_ch9.adb: No check on entry index if error on index.
2011-11-23 Gary Dismukes <dismukes@adacore.com>
* sem_ch6.adb (Analyze_Return_Statement): Improve error messages for
return statements nested inside an extended_return_statement.
* gcc-interface/Make-lang.in: Update dependencies.
* gcc-interface/Makefile.in (MISCLIB): Add -lutil for BSD targets.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181670 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch9.adb')
| -rw-r--r-- | gcc/ada/sem_ch9.adb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/sem_ch9.adb b/gcc/ada/sem_ch9.adb index 16b8087ad66..35c4eeebda0 100644 --- a/gcc/ada/sem_ch9.adb +++ b/gcc/ada/sem_ch9.adb @@ -924,8 +924,13 @@ package body Sem_Ch9 is UBR : Node_Id; begin + + -- No bounds checking if the type is generic or if previous error. + -- In an instance the check is dynamic. + if Is_Generic_Type (Etype (D_Sdef)) or else In_Instance + or else Error_Posted (D_Sdef) then goto Skip_LB; @@ -951,6 +956,7 @@ package body Sem_Ch9 is <<Skip_LB>> if Is_Generic_Type (Etype (D_Sdef)) or else In_Instance + or else Error_Posted (D_Sdef) then goto Skip_UB; |