https://gcc.gnu.org/bugzilla/show_bug.cgi?id=87992
--- Comment #2 from G. Steinmetz <gs...@t-online.de> --- It should be valid code, just as legal as $ cat z3.f90 subroutine s(x) class(*), allocatable :: x allocate (x, source='') end $ cat z4.f90 subroutine s(x) class(*), allocatable :: x allocate (x, source='abc') end $ gfortran-9-20181216 -c z4.f90 $