3 ! Contributed by Vittorio Zecca <zeccav@gmail.com>
5 ! PR 50401: SIGSEGV in resolve_transfer
8 function f() ! { dg-error "must be a dummy argument|Interface mismatch in global procedure" }
15 ! PR 50403: SIGSEGV in gfc_use_derived
17 type(f
) function f() ! { dg-error "Type name 'f' at .1. conflicts with previously declared entity|The type for function 'f' at .1. is not accessible" }
18 f
=110 ! { dg-error "Type inaccessible in variable definition context" }