https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68544
--- Comment #6 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> --- These snippets are silently accepted (t is not an array nor a scalar). $ cat z3.f90 program p type t end type print *, shape(t) end $ gfortran-7-20161120 -Wall -fcheck=all z3.f90 $ a.out $ --- $ cat z4.f90 subroutine s(t) type t end type end $ gfortran-7-20161120 -c z4.f90 $