OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR fortran/31781 (fortran regressions on trunk if you --disable-checking)

Browse Source 
PR fortran/31781
	* simplify.c (gfc_simplify_repeat): Don't put function call with
	side effect in a gcc_assert().

From-SVN: r124412
This commit is contained in:
Francois-Xavier Coudert 2007-05-04 09:26:41 +00:00 committed by François-Xavier Coudert
parent a0324f7b5a
commit f0fc6ae664
2 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2007-05-04 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR fortran/31781
* simplify.c (gfc_simplify_repeat): Don't put function call with
side effect in a gcc_assert().
2007-05-04 Tobias Burnus <burnus@net-b.de>
PR fortran/25071

5
gcc/fortran/simplify.c
View File

@ -2919,7 +2919,10 @@ gfc_simplify_repeat (gfc_expr *e, gfc_expr *n)
return NULL;
if (mpz_sgn (e->ts.cl->length->value.integer) != 0)
gcc_assert (gfc_extract_int (n, &ncop) == NULL);
{
const char *res = gfc_extract_int (n, &ncop);
gcc_assert (res == NULL);
}
else
ncop = 0;