https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69861
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> --- Whereas, with a scalar parameter : $ cat z2.f90 program p type t character :: c end type class(t), parameter :: z = t('a') print *, z%c end $ gfortran-6 z2.f90 $ a.out a # no error