public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST
@ 2005-10-04 23:37 kargl at gcc dot gnu dot org
2005-10-05 12:11 ` [Bug fortran/24207] " pinskia at gcc dot gnu dot org
` (4 more replies)
0 siblings, 5 replies; 6+ messages in thread
From: kargl at gcc dot gnu dot org @ 2005-10-04 23:37 UTC (permalink / raw)
To: gcc-bugs
The best description comes from an email by Richard Maine.
http://gcc.gnu.org/ml/fortran/2005-10/msg00073.html
Consider the following code:
module a
implicit none
real b
end module a
module c
use a
implicit none
private
contains
subroutine d
namelist /e/ b
read(5,e)
end subroutine d
end module c
The PRIVATE keyword in MODULE C does not effect the PUBLIC attribute of
b that is available via the USE a statement.
Note, Lahey's website says the above is conforming code.
--
Summary: PRIVATE/PUBLIC attribute confusion screws NAMELIST
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: kargl at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24207
^ permalink raw reply [flat|nested] 6+ messages in thread
* [Bug fortran/24207] PRIVATE/PUBLIC attribute confusion screws NAMELIST
2005-10-04 23:37 [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST kargl at gcc dot gnu dot org
@ 2005-10-05 12:11 ` pinskia at gcc dot gnu dot org
2005-10-12 5:43 ` cvs-commit at gcc dot gnu dot org
` (3 subsequent siblings)
4 siblings, 0 replies; 6+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-10-05 12:11 UTC (permalink / raw)
To: gcc-bugs
------- Comment #1 from pinskia at gcc dot gnu dot org 2005-10-05 12:11 -------
Confirmed.
--
pinskia at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Keywords| |rejects-valid
Last reconfirmed|0000-00-00 00:00:00 |2005-10-05 12:11:36
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24207
^ permalink raw reply [flat|nested] 6+ messages in thread
* [Bug fortran/24207] PRIVATE/PUBLIC attribute confusion screws NAMELIST
2005-10-04 23:37 [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST kargl at gcc dot gnu dot org
2005-10-05 12:11 ` [Bug fortran/24207] " pinskia at gcc dot gnu dot org
@ 2005-10-12 5:43 ` cvs-commit at gcc dot gnu dot org
2005-10-12 7:20 ` cvs-commit at gcc dot gnu dot org
` (2 subsequent siblings)
4 siblings, 0 replies; 6+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-10-12 5:43 UTC (permalink / raw)
To: gcc-bugs
------- Comment #2 from cvs-commit at gcc dot gnu dot org 2005-10-12 05:43 -------
Subject: Bug 24207
CVSROOT: /cvs/gcc
Module name: gcc
Branch: gcc-4_0-branch
Changes by: pault@gcc.gnu.org 2005-10-12 05:43:08
Modified files:
gcc/fortran : ChangeLog gfortran.h match.c resolve.c symbol.c
gcc/testsuite : ChangeLog
gcc/testsuite/gfortran.dg/g77: 980628-2.f 980628-3.f 980628-9.f
980628-10.f
Added files:
gcc/testsuite/gfortran.dg: equiv_constraint_1.f90
equiv_constraint_2.f90
equiv_constraint_3.f90
equiv_constraint_4.f90
equiv_constraint_5.f90
equiv_constraint_6.f90
equiv_constraint_7.f90
equiv_constraint_8.f90
private_type_1.f90 private_type_2.f90
private_type_3.f90
Log message:
2005-10-12 Paul Thomas <pault@gcc.gnu.org>
PR fortran/16404
PR fortran/20835
PR fortran/20890
PR fortran/20899
PR fortran/20900
PR fortran/20901
PR fortran/20902
PR fortran/24207
* gfortran.h: Prototype for gfc_add_in_equivalence.
* match.c (gfc_match_equivalence): Make a structure component
an explicit,rather than a syntax, error in an equivalence
group. Call gfc_add_in_equivalence to add the constraints
imposed in check_conflict.
* resolve.c (resolve_symbol): Add constraints: No public
structures with private-type components and no public
procedures with private-type dummy arguments. Exclude use and
host associated symbols from the test for private objects in
a public namelist.
(resolve_equivalence_derived): Add constraint that prevents
a structure equivalence member from having a default
initializer.
(sequence_type): New static function to determine whether an
object is default numeric, default character, non-default
or mixed sequence. Add corresponding enum typespec.
(resolve_equivalence): Add constraints to equivalence groups
or their members: No more than one initialized member and
that different types are not equivalenced for std=f95. All
the simple constraints have been moved to check_conflict.
* symbol.c (check_conflict): Simple equivalence constraints
added, including those removed from resolve_symbol.
(gfc_add_in_equivalence): New function to interface calls
match_equivalence to check_conflict.
2005-10-12 Paul Thomas <pault@gcc.gnu.org>
PR fortran/16404
PR fortran/20835
PR fortran/20890
PR fortran/20899
PR fortran/20900
PR fortran/20901
PR fortran/20902
PR fortran/24207
gfortran.dg/equiv_constraint_1.f90: New test.
gfortran.dg/equiv_constraint_2.f90: New test.
gfortran.dg/equiv_constraint_3.f90: New test.
gfortran.dg/equiv_constraint_4.f90: New test.
gfortran.dg/equiv_constraint_5.f90: New test.
gfortran.dg/equiv_constraint_6.f90: New test.
gfortran.dg/equiv_constraint_7.f90: New test.
gfortran.dg/equiv_constraint_8.f90: New test.
gfortran.dg/private_type_1.f90: New test.
gfortran.dg/private_type_2.f90: New test.
gfortran.dg/private_type_3.f90: New test.
gfortran.dg/g77/980628-2.f, 980628-3.f, 980628-9.f,
980628-10.f: Assert std=gnu to permit mixing of
types in equivalence statements.
Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.335.2.127&r2=1.335.2.128
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/gfortran.h.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.58.2.17&r2=1.58.2.18
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/match.c.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.31.8.12&r2=1.31.8.13
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/resolve.c.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.34.2.17&r2=1.34.2.18
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/symbol.c.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.26.2.4&r2=1.26.2.5
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.5084.2.447&r2=1.5084.2.448
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_1.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_2.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_3.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_4.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_5.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_6.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/equiv_constraint_8.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/private_type_1.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/private_type_2.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.12.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/private_type_3.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.1.2.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/g77/980628-2.f.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.1&r2=1.1.46.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/g77/980628-3.f.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.1&r2=1.1.46.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/g77/980628-9.f.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.1&r2=1.1.46.1
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/g77/980628-10.f.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.1&r2=1.1.46.1
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24207
^ permalink raw reply [flat|nested] 6+ messages in thread
* [Bug fortran/24207] PRIVATE/PUBLIC attribute confusion screws NAMELIST
2005-10-04 23:37 [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST kargl at gcc dot gnu dot org
2005-10-05 12:11 ` [Bug fortran/24207] " pinskia at gcc dot gnu dot org
2005-10-12 5:43 ` cvs-commit at gcc dot gnu dot org
@ 2005-10-12 7:20 ` cvs-commit at gcc dot gnu dot org
2005-10-12 7:30 ` pault at gcc dot gnu dot org
2005-10-23 23:02 ` pinskia at gcc dot gnu dot org
4 siblings, 0 replies; 6+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2005-10-12 7:20 UTC (permalink / raw)
To: gcc-bugs
------- Comment #3 from cvs-commit at gcc dot gnu dot org 2005-10-12 07:20 -------
Subject: Bug 24207
CVSROOT: /cvs/gcc
Module name: gcc
Changes by: pault@gcc.gnu.org 2005-10-12 07:19:57
Modified files:
gcc/fortran : ChangeLog resolve.c
gcc/testsuite : ChangeLog
Added files:
gcc/testsuite/gfortran.dg: private_type_3.f90
Log message:
2005-10-12 Paul Thomas <pault@gcc.gnu.org>
PR fortran/24207
* resolve.c (resolve_symbol): Exclude use and host associated
symbols from the test for private objects in a public namelist.
2005-10-12 Paul Thomas <pault@gcc.gnu.org>
PR fortran/24207
gfortran.dg/private_type_3.f90: New test.
Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.580&r2=1.581
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/resolve.c.diff?cvsroot=gcc&r1=1.58&r2=1.59
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.6172&r2=1.6173
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/private_type_3.f90.diff?cvsroot=gcc&r1=1.1&r2=1.2
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24207
^ permalink raw reply [flat|nested] 6+ messages in thread
* [Bug fortran/24207] PRIVATE/PUBLIC attribute confusion screws NAMELIST
2005-10-04 23:37 [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST kargl at gcc dot gnu dot org
` (2 preceding siblings ...)
2005-10-12 7:20 ` cvs-commit at gcc dot gnu dot org
@ 2005-10-12 7:30 ` pault at gcc dot gnu dot org
2005-10-23 23:02 ` pinskia at gcc dot gnu dot org
4 siblings, 0 replies; 6+ messages in thread
From: pault at gcc dot gnu dot org @ 2005-10-12 7:30 UTC (permalink / raw)
To: gcc-bugs
------- Comment #4 from pault at gcc dot gnu dot org 2005-10-12 07:30 -------
Fixed on mainline and 4.0.
--
pault at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24207
^ permalink raw reply [flat|nested] 6+ messages in thread
* [Bug fortran/24207] PRIVATE/PUBLIC attribute confusion screws NAMELIST
2005-10-04 23:37 [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST kargl at gcc dot gnu dot org
` (3 preceding siblings ...)
2005-10-12 7:30 ` pault at gcc dot gnu dot org
@ 2005-10-23 23:02 ` pinskia at gcc dot gnu dot org
4 siblings, 0 replies; 6+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-10-23 23:02 UTC (permalink / raw)
To: gcc-bugs
--
pinskia at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Target Milestone|--- |4.0.3
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24207
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2005-10-23 23:02 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2005-10-04 23:37 [Bug fortran/24207] New: PRIVATE/PUBLIC attribute confusion screws NAMELIST kargl at gcc dot gnu dot org
2005-10-05 12:11 ` [Bug fortran/24207] " pinskia at gcc dot gnu dot org
2005-10-12 5:43 ` cvs-commit at gcc dot gnu dot org
2005-10-12 7:20 ` cvs-commit at gcc dot gnu dot org
2005-10-12 7:30 ` pault at gcc dot gnu dot org
2005-10-23 23:02 ` pinskia at gcc dot gnu dot org
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).