2 ! { dg-options "-std=f95" }
6 ! Check constructor functionality.
10 type t
! { dg-error "the same name as derived type" }
17 function f() ! { dg-error "the same name as derived type" }
26 type t2
! { dg-error "the same name as derived type" }
30 function f2() ! { dg-error "the same name as derived type" }