2 ! Test whether import works
11 if(x%i /= 7) call abort()
23 if(y /= 8) call abort()
24 if(x%i /= 2) call abort()
31 integer, parameter :: kind = 8
45 integer, parameter :: dp = 8
62 import myType3 ! { dg-warning "already IMPORTed from" }
73 if(y%i /= 5 .or. i8/= 42) call abort()
76 if(z%i /= 1) call abort()
78 ! { dg-final { cleanup-modules "testmod" } }