------- Comment #6 from burnus at gcc dot gnu dot org 2006-11-28 18:04 -------
Reduced testcase:
PROGRAM fparser
IMPLICIT NONE
CHARACTER (LEN=1), DIMENSION(3:7), PARAMETER :: Ops = &
(/ '+', '-', '*', '/', '^' /)
CHARACTER (LEN=3) :: F = "ABC"
IF (ANY(F(2:2) == Ops(5:6))) STOP
END PROGRAM fparser
Backtrace:
#0 0x000000000041cd1b in simplify_const_ref (p=0xdee450) at expr.c:1238
#1 0x000000000041d4e5 in gfc_simplify_expr (p=0xdee450, type=0) at expr.c:1546
#2 0x000000000041da97 in simplify_parameter_variable (p=0xdeecb0, type=0) at
expr.c:1421
#3 0x000000000041d4c1 in gfc_simplify_expr (p=0xdefd10, type=0) at expr.c:1517
--
burnus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |burnus at gcc dot gnu dot
| |org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29975
