diff options
author | Steven G. Kargl <kargl@gcc.gnu.org> | 2017-05-15 23:46:23 +0000 |
---|---|---|
committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2017-05-15 23:46:23 +0000 |
commit | b2954e124bc411b0b9d8f5f7b4fe2e50f241bbd0 (patch) | |
tree | 56242296c08c0319ee221b9ee9428e61c82703fb | |
parent | 2016c841ebc470eea52b8460715eae9949bcb7f1 (diff) | |
download | gcc-b2954e124bc411b0b9d8f5f7b4fe2e50f241bbd0.zip gcc-b2954e124bc411b0b9d8f5f7b4fe2e50f241bbd0.tar.gz gcc-b2954e124bc411b0b9d8f5f7b4fe2e50f241bbd0.tar.bz2 |
re PR fortran/80674 (trunk/gcc/fortran/trans-stmt.c:2578]: (style) Redundant condition)
2017-05-15 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/80674
* trans-stmt.c (gfc_trans_integer_select): Remove redundant condition.
From-SVN: r248079
-rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/fortran/trans-stmt.c | 5 |
2 files changed, 7 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 07cbea0..542ee73 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,10 @@ 2017-05-15 Steven G. Kargl <kargl@gcc.gnu.org> + PR fortran/80674 + * trans-stmt.c (gfc_trans_integer_select): Remove redundant condition. + +2017-05-15 Steven G. Kargl <kargl@gcc.gnu.org> + PR fortran/80752 * expr.c (gfc_generate_initializer): If type conversion fails, check for error and return NULL. diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c index 98687c8..e4f1da5 100644 --- a/gcc/fortran/trans-stmt.c +++ b/gcc/fortran/trans-stmt.c @@ -2575,9 +2575,8 @@ gfc_trans_integer_select (gfc_code * code) to represent unbounded cases. */ if (!cp->low - || (cp->low - && mpz_cmp (cp->low->value.integer, - cp->high->value.integer) != 0)) + || (mpz_cmp (cp->low->value.integer, + cp->high->value.integer) != 0)) high = gfc_conv_mpz_to_tree (cp->high->value.integer, cp->high->ts.kind); |