diff options
author | Tobias Burnus <burnus@net-b.de> | 2011-01-21 21:33:10 +0100 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2011-01-21 21:33:10 +0100 |
commit | abba182313a491dae23985a480944282c6a566a8 (patch) | |
tree | 1987e86d4fedd41d073b81a379affe949060d604 /gcc/fortran/scanner.c | |
parent | ee3ee948de7684e4542acd501239fd4105ad4221 (diff) | |
download | gcc-abba182313a491dae23985a480944282c6a566a8.zip gcc-abba182313a491dae23985a480944282c6a566a8.tar.gz gcc-abba182313a491dae23985a480944282c6a566a8.tar.bz2 |
re PR fortran/47394 (Internal compiler error when error count limit is reached)
2011-01-21 Tobias Burnus <burnus@net-b.de>
PR fortran/47394
* error.c (gfc_error_now, gfc_fatal_error, gfc_error_check):
Use defined instead of magic number exit status codes.
* scanner.c (include_line, gfc_new_file): Ditto.
From-SVN: r169104
Diffstat (limited to 'gcc/fortran/scanner.c')
-rw-r--r-- | gcc/fortran/scanner.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c index c226bae..ac26a80 100644 --- a/gcc/fortran/scanner.c +++ b/gcc/fortran/scanner.c @@ -1868,7 +1868,7 @@ include_line (gfc_char_t *line) filename = gfc_widechar_to_char (begin, -1); if (load_file (filename, NULL, false) == FAILURE) - exit (1); + exit (FATAL_EXIT_CODE); gfc_free (filename); return true; @@ -2072,7 +2072,7 @@ gfc_new_file (void) printf ("%s:%3d %s\n", LOCATION_FILE (line_head->location), LOCATION_LINE (line_head->location), line_head->line); - exit (0); + exit (SUCCESS_EXIT_CODE); #endif return result; |