[Bug fortran/54730] [4.6/4.7/4.8 Regression] ICE in gfc_typenode_for_spec, at fortran/trans-types.c:1066

[janus at gcc dot gnu.org]

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