diff options
| author | Paul Brook <paul@codesourcery.com> | 2005-01-22 18:23:43 +0000 |
|---|---|---|
| committer | Paul Brook <pbrook@gcc.gnu.org> | 2005-01-22 18:23:43 +0000 |
| commit | af30f793c95eacd307ed1c52354b64b4f9aa1dc6 (patch) | |
| tree | 741a6404b43521797001c198018498d7589d9458 /gcc/fortran/match.c | |
| parent | d7f3fc19903a41f07d22b0b7b38d06e16cff55b8 (diff) | |
| download | gcc-af30f793c95eacd307ed1c52354b64b4f9aa1dc6.zip gcc-af30f793c95eacd307ed1c52354b64b4f9aa1dc6.tar.gz gcc-af30f793c95eacd307ed1c52354b64b4f9aa1dc6.tar.bz2 | |
gfortran.h (gfc_check_access): Add prototype.
2005-01-22 Paul Brook <paul@codesourcery.com>
* gfortran.h (gfc_check_access): Add prototype.
* match.c (gfc_match_namelist): Remove TODO.
* module.c (check_access): Rename ...
(gfc_check_access): ... to this. Boolify. Update callers.
* resolve.c (resolve_symbol): Check for private objects in public
namelists.
testsuite/
* namelist_1.f90: New test.
From-SVN: r94073
Diffstat (limited to 'gcc/fortran/match.c')
| -rw-r--r-- | gcc/fortran/match.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c index 743d4b9..abd8ef8 100644 --- a/gcc/fortran/match.c +++ b/gcc/fortran/match.c @@ -2418,9 +2418,6 @@ gfc_match_namelist (void) && gfc_add_in_namelist (&sym->attr, NULL) == FAILURE) goto error; - /* TODO: worry about PRIVATE members of a PUBLIC namelist - group. */ - nl = gfc_get_namelist (); nl->sym = sym; |