http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54730



--- Comment #5 from janus at gcc dot gnu.org 2012-09-28 13:11:16 UTC ---

Note that the error goes away when replacing the generic intrinsic REAL by a

specific one, e.g. FLOAT:



  implicit none

  intrinsic :: float

  real :: vec(1:2)

  vec = (/ float(a = 1), 1. /)

end

Reply via email to