simplify.c (gfc_simplify_repeat): Fix a misplaced closing ')'.

2016-09-14  Bernd Edlinger  <bernd.edlinger@hotmail.de>

        * simplify.c (gfc_simplify_repeat): Fix a misplaced closing ')'.

From-SVN: r240142

gcc/fortran/ChangeLog

+2016-09-14  Bernd Edlinger  <bernd.edlinger@hotmail.de>
+
+	* simplify.c (gfc_simplify_repeat): Fix a misplaced closing ')'.
+
 2016-09-13  Steven G. Kargl  <kargl@gcc.gnu.org>
 
 	PR fortran/77420

gcc/fortran/simplify.c

@@ -5127,7 +5127,7 @@ gfc_simplify_repeat (gfc_expr *e, gfc_expr *n)
 
   if (len ||
       (e->ts.u.cl->length &&
-       mpz_sgn (e->ts.u.cl->length->value.integer)) != 0)
+       mpz_sgn (e->ts.u.cl->length->value.integer) != 0))
     {
       const char *res = gfc_extract_int (n, &ncop);
       gcc_assert (res == NULL);