diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-11-06 12:28:27 +0100 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-11-06 12:28:27 +0100 |
commit | ee2ba85639333f03774668c5a4b25d7ae08b1036 (patch) | |
tree | 95877e8f8a857b54830ea0e9deb7b9bda9226731 /gcc/ada/exp_ch13.adb | |
parent | d8192289b58f8a5fe8f68a50dd88db45c81f9afc (diff) | |
download | gcc-ee2ba85639333f03774668c5a4b25d7ae08b1036.zip gcc-ee2ba85639333f03774668c5a4b25d7ae08b1036.tar.gz gcc-ee2ba85639333f03774668c5a4b25d7ae08b1036.tar.bz2 |
[multiple changes]
2012-11-06 Tristan Gingold <gingold@adacore.com>
* sem_ch9.adb (Analyze_Protected_Type_Declaration): Fix thinko
in previous commit.
2012-11-06 Jose Ruiz <ruiz@adacore.com>
* ali.adb (Scan_ALI): Fix parsing mechanism for -fstack-check.
2012-11-06 Thomas Quinot <quinot@adacore.com>
* atree.adb, atree.ads, einfo.adb, errout.adb, errout.ads, erroutc.adb,
erroutc.ads, errutil.adb, errutil.ads, err_vars.ads, expander.adb,
exp_ch13.adb, exp_ch2.adb, exp_ch6.adb, exp_dist.adb, fe.h,
fmap.adb, fmap.ads, gprep.adb, makeutl.adb, osint.adb, osint.ads,
par_sco.adb, prepcomp.adb, prj-part.adb, prj-proc.adb, scng.adb,
sdefault.ads, sem_ch10.adb, sem_ch13.adb, sem_ch2.adb, sem_ch3.adb,
sem_ch4.adb, sem_ch5.adb, sem_dim.adb, sem_elab.adb, sem_eval.adb,
sem_intr.adb, sem_prag.adb, sem_type.adb, sem_warn.adb, stylesw.adb,
stylesw.ads, targparm.adb, targparm.ads (Cascaded_Error): Rename to
more descriptive name 'Check_Error_Detected'. Add calls to
Check_Error_Detected at places where semantic analysis is abandoned
assuming a previously detected error.
From-SVN: r193235
Diffstat (limited to 'gcc/ada/exp_ch13.adb')
-rw-r--r-- | gcc/ada/exp_ch13.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/exp_ch13.adb b/gcc/ada/exp_ch13.adb index 26eaec2..141e144 100644 --- a/gcc/ada/exp_ch13.adb +++ b/gcc/ada/exp_ch13.adb @@ -379,6 +379,7 @@ package body Exp_Ch13 is -- This is an error protection against previous errors if No (E_Scope) then + Check_Error_Detected; return; end if; |