3 ! Test the fix for PR68237 in which 'foo' caused a seg fault rather than an error.
5 ! Contributed by Martin Reinecke <martin@mpa-garching.mpg.de>
16 module procedure foo ! { dg-error "must be in a generic module interface" }
17 end procedure ! { dg-error "Expecting END SUBMODULE statement" }