diff options
author | kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-11-07 16:37:10 +0000 |
---|---|---|
committer | kargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-11-07 16:37:10 +0000 |
commit | 45c9e5aacece57b443fa5a8450ba3c76d6278325 (patch) | |
tree | b706f22b8e5943c938549396594574bab69dc35f /gcc/fortran/error.c | |
parent | 840e4ce956eb399a072815e30e88a9c0b960abdc (diff) | |
download | gcc-45c9e5aacece57b443fa5a8450ba3c76d6278325.tar.gz |
*error.c: Use flag_fatal_error.
*invoke.texi: Remove -Werror from list of options.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@106595 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/error.c')
-rw-r--r-- | gcc/fortran/error.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c index 3f38c3b6802..aa23330020c 100644 --- a/gcc/fortran/error.c +++ b/gcc/fortran/error.c @@ -621,6 +621,9 @@ gfc_error_now (const char *nocmsgid, ...) error_char ('\0'); buffer_flag = i; + + if (flag_fatal_errors) + exit (1); } @@ -687,6 +690,9 @@ gfc_error_check (void) if (error_buffer.message != NULL) fputs (error_buffer.message, stderr); error_buffer.flag = 0; + + if (flag_fatal_errors) + exit (1); } return rc; |