4 type, private
, bind(C
) b
! { dg-error "Expected :: in TYPE definition" }
6 end type b
! { dg-error "Expecting END MODULE statement" }
8 type, public c
! { dg-error "Expected :: in TYPE definition" }
10 end type c
! { dg-error "Expecting END MODULE statement" }
12 type, private d
! { dg-error "Expected :: in TYPE definition" }
14 end type b
! { dg-error "Expecting END MODULE statement" }
16 type, bind(C
), public e
! { dg-error "Expected :: in TYPE definition" }
18 end type e
! { dg-error "Expecting END MODULE statement" }
20 type, bind(C
) f
! { dg-error "Expected :: in TYPE definition" }
22 end type f
! { dg-error "Expecting END MODULE statement" }