diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-11-23 15:05:26 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-11-23 15:05:26 +0100 |
| commit | d0dcb2b1b9f1af8bb9be47c701c3d88f7513008b (patch) | |
| tree | ff57b9487691cf2fb581fa1a9ad47d175aef9fc7 /gcc/ada/sem_ch9.adb | |
| parent | db3dd8af71808b993831ad6373b312b8fa9d4b50 (diff) | |
| download | gcc-d0dcb2b1b9f1af8bb9be47c701c3d88f7513008b.zip gcc-d0dcb2b1b9f1af8bb9be47c701c3d88f7513008b.tar.gz gcc-d0dcb2b1b9f1af8bb9be47c701c3d88f7513008b.tar.bz2 | |
[multiple changes]
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.
From-SVN: r181670
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 16b8087..35c4eee 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; |