Commit b2954e12 by Steven G. Kargl

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
parent 2016c841
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.
......
......@@ -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);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment