! { dg-do compile } ! PR fortran/66057 ! ! Original code from Gerhard Steinmetz ! program p type t contains generic :: ! { dg-error "Malformed GENERIC" } end type end