1! { dg-do compile } 2! PR 13575 -- we used to not see that c0 has no type, and then ICE later 3module AHFinder_dat 4implicit none 5save c0 ! { dg-error "no IMPLICIT type" "no IMPLICIT type" } 6end module AHFinder_dat 7! PR 15978 -- we used to not see that aaa has no type, and then ICE later 8implicit none 9common/rommel/aaa ! { dg-error "no IMPLICIT type" "no IMPLICIT type" } 10end 11