gfortran.h (gfc_namespace): Add seen_implicit_none field.
authorTobias Schlüter <tobi@gcc.gnu.org>
Fri, 29 Apr 2005 00:13:08 +0000 (02:13 +0200)
committerTobias Schlüter <tobi@gcc.gnu.org>
Fri, 29 Apr 2005 00:13:08 +0000 (02:13 +0200)
commit438e142878a8971c6d94c431b87bb3d481d9a4f2
tree2051a24ebabc1b52ffc476e56425d722d44bad2e
parentdd2778f346eeff349f8e5d86932e9f90e5ffa8a0
gfortran.h (gfc_namespace): Add seen_implicit_none field.

fortran/
* gfortran.h (gfc_namespace): Add seen_implicit_none field.
* symbol.c (gfc_set_implicit_none): Give error if there's a previous
IMPLICIT NONE, set seen_implicit_none.
(gfc_merge_new_implicit): Error if there's an IMPLICIT NONE statement.
testsuite/
* gfortran.dg/implicit_4.f90: New test.

From-SVN: r98952
gcc/fortran/ChangeLog
gcc/fortran/symbol.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/implicit_4.f90 [new file with mode: 0644]