summaryrefslogtreecommitdiff
path: root/gcc/fortran/error.c
diff options
context:
space:
mode:
authorkargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>2005-11-07 16:37:10 +0000
committerkargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>2005-11-07 16:37:10 +0000
commit45c9e5aacece57b443fa5a8450ba3c76d6278325 (patch)
treeb706f22b8e5943c938549396594574bab69dc35f /gcc/fortran/error.c
parent840e4ce956eb399a072815e30e88a9c0b960abdc (diff)
downloadgcc-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.c6
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;