diff options
| author | Paul Thomas <pault@gcc.gnu.org> | 2016-07-28 14:47:02 +0000 |
|---|---|---|
| committer | Paul Thomas <pault@gcc.gnu.org> | 2016-07-28 14:47:02 +0000 |
| commit | a23404c90f9353b89ac9eb0871b20cbb11562942 (patch) | |
| tree | 92a194290ad1e68b1398186c5d0a8d7aa0ca37b6 /gcc/fortran/frontend-passes.c | |
| parent | 63715e5e78532916b334027d72fb59931798a5f7 (diff) | |
| download | gcc-a23404c90f9353b89ac9eb0871b20cbb11562942.zip gcc-a23404c90f9353b89ac9eb0871b20cbb11562942.tar.gz gcc-a23404c90f9353b89ac9eb0871b20cbb11562942.tar.bz2 | |
[multiple changes]
2016-07-28 Steven G. Kargl <kargl@gcc.gnu.org>
Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/71883
* frontend-passes.c (gfc_run_passes): Bail out if there are any
errors.
* error.c (gfc_internal_error): If there are any errors in the
buffer, exit with EXIT_FAILURE.
2016-07-28 Paul Thomas <pault@gcc.gnu.org>
PR fortran/71883
* gfortran.dg/pr71883.f90 : New test.
From-SVN: r238822
Diffstat (limited to 'gcc/fortran/frontend-passes.c')
| -rw-r--r-- | gcc/fortran/frontend-passes.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/fortran/frontend-passes.c b/gcc/fortran/frontend-passes.c index a543ab2..29e43a1 100644 --- a/gcc/fortran/frontend-passes.c +++ b/gcc/fortran/frontend-passes.c @@ -125,6 +125,7 @@ gfc_run_passes (gfc_namespace *ns) doloop_level = 0; doloop_warn (ns); doloop_list.release (); + int w, e; if (flag_frontend_optimize) { @@ -136,6 +137,10 @@ gfc_run_passes (gfc_namespace *ns) expr_array.release (); } + gfc_get_errors (&w, &e); + if (e > 0) + return; + if (flag_realloc_lhs) realloc_strings (ns); } |