------- Comment #3 from tobi at gcc dot gnu dot org 2007-04-16 14:14 ------- Reduced testcase: real, dimension(1), parameter :: r=1.0 real, dimension(1) :: s=RESHAPE(r,(/1/))
IF (ANY(s.NE.1.0)) CALL ABORT() END -- tobi at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |tobi at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31218