------- Comment #1 from tobi at gcc dot gnu dot org 2005-10-11 19:17 -------
Here's a self-contained testcase for this failure, courtesy of Paul Thomas:
integer, dimension(4) :: Ising = (/1,0,0,1/)
character*1 :: p="+", m="-"
print *, Merge (p, m, Ising(1: 4) == 1)
print *, Merge (1, 0, Ising(1: 4) == 1)
print *, Merge ("+", "-", Ising(1: 4) == 1) ! Bombs out here
end
--
tobi at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2005-10-11 19:17:44
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24311
