This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/39800] Rejects PRIVATE TYPE as compont of local type declaration
- From: "pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 20 Apr 2009 21:15:13 -0000
- Subject: [Bug fortran/39800] Rejects PRIVATE TYPE as compont of local type declaration
- References: <bug-39800-13404@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #4 from pault at gcc dot gnu dot org 2009-04-20 21:15 -------
Created an attachment (id=17659)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=17659&action=view)
patch for both aspects of the PR
Bootstraps and regtests on FC9/x86_64
2009-04-20 Paul Thomas <pault@gcc.gnu.org>
PR fortran/39800
* resolve.c (is_sym_host_assoc): New function.
(resolve_fl_derived): Call it when checking PRIVATE components
of PUBLIC derived types. Change gfc_error to a gfc_notify_std
with std=f2003.
(resolve_fl_namelist): Call it twice to check for host
association.
2009-04-20 Paul Thomas <pault@gcc.gnu.org>
PR fortran/39800
* gfortran.dg/private_type_13.f90: New test.
* gfortran.dg/private_type_2.f90: Add option -std=f95.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=39800