* gfortran.dg/implicit_1.f90: New test.

From-SVN: r84376
This commit is contained in:
Tobias Schlüter 2004-07-09 17:11:41 +02:00 committed by Tobias Schlüter
parent e4314fac87
commit 61ebeccf5d
2 changed files with 13 additions and 0 deletions

View File

@ -5,6 +5,8 @@
PR fortran/13575
PR fortran/15978
* gfortran.fortran-torture/compile/implicit_2.f90: New test.
* gfortran.dg/implicit_1.f90: New test.
2004-07-09 David Billinghurst (David.Billinghurst@riotinto.com)

View File

@ -0,0 +1,11 @@
! { 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