diff options
author | Tobias Burnus <burnus@net-b.de> | 2014-12-06 17:53:40 +0100 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2014-12-06 17:53:40 +0100 |
commit | b5a9fd3e94138512e2f999316baff7790e971174 (patch) | |
tree | 8369147574da962e24299e1fff567fb21c97cfa5 /gcc/fortran/parse.c | |
parent | 0f447a6e33db466cb8b04fc3583ed76626ca8f3b (diff) | |
download | gcc-b5a9fd3e94138512e2f999316baff7790e971174.zip gcc-b5a9fd3e94138512e2f999316baff7790e971174.tar.gz gcc-b5a9fd3e94138512e2f999316baff7790e971174.tar.bz2 |
error.c (gfc_error_check): Use bool not int.
2014-12-06 Tobias Burnus <burnus@net-b.de>
* error.c (gfc_error_check): Use bool not int.
* gfortran.h (gfc_error_check): Update prototype.
* match.c (gfc_match_if): Update call.
* parse.c (decode_statement, decode_omp_directive,
decode_gcc_attribute): Ditto.
From-SVN: r218450
Diffstat (limited to 'gcc/fortran/parse.c')
-rw-r--r-- | gcc/fortran/parse.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c index 1023037..e39a550 100644 --- a/gcc/fortran/parse.c +++ b/gcc/fortran/parse.c @@ -549,7 +549,7 @@ decode_statement (void) /* All else has failed, so give up. See if any of the matchers has stored an error message of some sort. */ - if (gfc_error_check () == 0) + if (!gfc_error_check ()) gfc_error_now ("Unclassifiable statement at %C"); reject_statement (); @@ -769,7 +769,7 @@ decode_omp_directive (void) if (gfc_option.gfc_flag_openmp || simd_matched) { - if (gfc_error_check () == 0) + if (!gfc_error_check ()) gfc_error_now ("Unclassifiable OpenMP directive at %C"); } @@ -796,7 +796,7 @@ decode_gcc_attribute (void) /* All else has failed, so give up. See if any of the matchers has stored an error message of some sort. */ - if (gfc_error_check () == 0) + if (!gfc_error_check ()) gfc_error_now ("Unclassifiable GCC directive at %C"); reject_statement (); |