1 ! { dg-do compile { target i?86-*-* x86_64-*-* } }
2 function f1 () result (r
) ! { dg-error "can't be a POINTER" }
14 integer, dimension (2, 7, 6) :: e2
! { dg-error "can't be an array" }
20 integer*8 function f3 () ! { dg-error "can't be of type" }
21 complex*16 e3
! { dg-error "can't be of type" }