This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/33198] Derived type in common: Default initializer not rejected
- From: "tobi at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 3 Oct 2007 11:37:58 -0000
- Subject: [Bug fortran/33198] Derived type in common: Default initializer not rejected
- References: <bug-33198-13404@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #3 from tobi at gcc dot gnu dot org 2007-10-03 11:37 -------
Subject: Bug 33198
Author: tobi
Date: Wed Oct 3 11:37:44 2007
New Revision: 128980
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=128980
Log:
PR fortran/33198
fortran/
* resolve.c (has_default_initializer): Move to top. Make bool.
(resolve_common_blocks): Simplify logic. Add case for derived
type initialization.
(resolve_fl_variable_derived): Split out from ...
(resolve_fl_variable): ... from here, while adapting to new h_d_i
interface.
testsuite/
* gfortran.dg/common_errors_1.f90: New.
Added:
trunk/gcc/testsuite/gfortran.dg/common_errors_1.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/resolve.c
trunk/gcc/testsuite/ChangeLog
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33198