2 ! { dg-options "-std=f95" }
3 ! { dg-shouldfail "Fortran 2003 feature with -std=f95" }
4 ! Test whether import does not work with -std=f95
9 integer, parameter :: kind
= 8
15 import
! { dg-error "Fortran 2003: IMPORT statement" }
16 type(modType
) :: y
! { dg-error "is being used before it is defined" }
17 real(kind
) :: x
! { dg-error "has not been declared" }
23 integer, parameter :: dp
= 8
34 import
! { dg-error "Fortran 2003: IMPORT statement" }
35 type(myType
) :: x
! { dg-error "is being used before it is defined" }
36 integer(dp
) :: y
! { dg-error "has not been declared" }
39 import
:: myType3
! { dg-error "Fortran 2003: IMPORT statement" }
40 import myType3
! { dg-error "Fortran 2003: IMPORT statement" }
41 type(myType3
) :: x
! { dg-error "is being used before it is defined" }