------- Comment #6 from kargl at gcc dot gnu dot org 2010-07-27 06:11 ------- Here's an even shorter testcase.
MODULE FunctionTypes IMPLICIT NONE integer, parameter :: OpconNameLength = 4 TYPE, PUBLIC :: TTermDefinition CHARACTER (OpconNameLength) :: termName(2) END TYPE TTermDefinition TYPE (TTermDefinition), PARAMETER :: e = TTermDefinition ([" ", " "]) end module FunctionTypes -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45092