diff options
| author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-12-02 23:39:49 +0000 |
|---|---|---|
| committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-12-02 23:39:49 +0000 |
| commit | fbc626413f560251434cbdb5bac760b700a4d3cd (patch) | |
| tree | 0d2d9e85f904df0453d83c5f4d238d739d7db369 /gcc/fortran/error.c | |
| parent | 9ce648e26846583b5b4057e3ea00a53dcda10903 (diff) | |
| download | gcc-fbc626413f560251434cbdb5bac760b700a4d3cd.tar.gz | |
2014-12-02 Tobias Burnus <burnus@net-b.de>
Manuel López-Ibáñez <manu@gcc.gnu.org>
* error.c (warnings_not_errors): Use bool.
(gfc_clear_error): Update.
(gfc_get_errors): Ditto. Use bool argument.
* gfortran.h (gfc_get_errors): Update prototype.
* resolve.c (resolve_global_procedure): Update call.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@218296 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/error.c')
| -rw-r--r-- | gcc/fortran/error.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c index 00e92280ce3..70429d3e122 100644 --- a/gcc/fortran/error.c +++ b/gcc/fortran/error.c @@ -44,7 +44,7 @@ along with GCC; see the file COPYING3. If not see static int suppress_errors = 0; -static int warnings_not_errors = 0; +static bool warnings_not_errors = false; static int terminal_width, buffer_flag, errors, warnings; @@ -1302,7 +1302,7 @@ void gfc_clear_error (void) { error_buffer.flag = 0; - warnings_not_errors = 0; + warnings_not_errors = false; } @@ -1395,9 +1395,9 @@ gfc_get_errors (int *w, int *e) /* Switch errors into warnings. */ void -gfc_errors_to_warnings (int f) +gfc_errors_to_warnings (bool f) { - warnings_not_errors = (f == 1) ? 1 : 0; + warnings_not_errors = f; } void |