4 type, bind(C) :: mytype1
22 integer, allocatable, dimension(:) :: x
43 common /c/ t3 ! { dg-error "has neither the SEQUENCE nor the BIND.C. attribute" }
44 common /d/ t4 ! { dg-error "has an ultimate component that is allocatable" }
47 common /f/ t7 ! { dg-error "has an ultimate component that is allocatable" }