blob: 21e9d214e3c11994c846852314f49a1a85be50f4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
! { dg-do compile }
! PR 13575 -- we used to not see that c0 has no type, and then ICE later
module AHFinder_dat
implicit none
save c0 ! { dg-error "no IMPLICIT type" "no IMPLICIT type" }
end module AHFinder_dat
! PR 15978 -- we used to not see that aaa has no type, and then ICE later
implicit none
common/rommel/aaa ! { dg-error "no IMPLICIT type" "no IMPLICIT type" }
end
! { dg-final { cleanup-modules "ahfinder_dat" } }
|
