https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83078
--- Comment #1 from G. Steinmetz <gs...@t-online.de> --- Detected without "implicit none" : $ cat z2.f90 program p type t integer :: a(n) end type t type(t) :: x = t([1, 2]) end $ gfortran-8-20171119 -c z2.f90 z2.f90:3:19: integer :: a(n) 1 Error: Variable 'n' at (1) in this context must be constant z2.f90:3:19: integer :: a(n) 1 Error: Variable 'n' at (1) in this context must be constant