http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54730
Thomas Koenig <tkoenig at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |tkoenig at gcc dot gnu.org --- Comment #6 from Thomas Koenig <tkoenig at gcc dot gnu.org> 2012-10-21 19:23:39 UTC --- Even shorter test case: program main implicit none intrinsic :: real print *,(/ real(a = 1) /) end The problem appears to be that we try to build a backend decl for a, which doesn't really make a lot of sense. We do fine without one for the program main implicit none intrinsic :: real print *,(/ real(1) /) end case.