[patch, committed] Bug 81160 - arith.c:2009: bad statement order ?

[Jerry DeLisle]

Committed as obvious:

Committing to svn+ssh://jvdeli...@gcc.gnu.org/svn/gcc/trunk ...
        M       gcc/fortran/ChangeLog
        M       gcc/fortran/arith.c
Committed r249627

After regression testing.

Jerry

--- trunk/gcc/fortran/arith.c   2017/06/24 19:31:24     249626
+++ trunk/gcc/fortran/arith.c   2017/06/24 21:22:08     249627
@@ -2001,13 +2001,14 @@
 static bool
 wprecision_int_real (mpz_t n, mpfr_t r)
 {
+  bool ret;
   mpz_t i;
   mpz_init (i);
   mpfr_get_z (i, r, GFC_RND_MODE);
   mpz_sub (i, i, n);
-  return mpz_cmp_si (i, 0) != 0;
+  ret = mpz_cmp_si (i, 0) != 0;
   mpz_clear (i);
-
+  return ret;
 }

 /* Convert integers to integers.  */