------- 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

Reply via email to