------- Comment #4 from fxcoudert at gcc dot gnu dot org 2007-05-03 23:11
-------
Stupid mistake, trivial patch:
Index: simplify.c
===================================================================
--- simplify.c (revision 124285)
+++ simplify.c (working copy)
@@ -2919,7 +2919,10 @@ gfc_simplify_repeat (gfc_expr *e, gfc_ex
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;
Many thanks to Kenneth for reporting the bug, to Daniel for reducing it and
posting tree dumps, and to Andrew for pointing the likely cause of the bug!
--
fxcoudert at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |fxcoudert at gcc dot gnu dot
|dot org |org
Status|NEW |ASSIGNED
Keywords| |patch, wrong-code
Known to work| |4.1.2 4.2.0
Last reconfirmed|2007-05-03 22:46:39 |2007-05-03 23:11:53
date| |
Target Milestone|--- |4.3.0
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31781
