[Bug fortran/38657] [4.3/4.4 Regression] PUBLIC/PRIVATE Common blocks

[pault at gcc dot gnu dot org]

------- Comment #8 from pault at gcc dot gnu dot org  2009-01-05 19:46 -------
Subject: Bug 38657

Author: pault
Date: Mon Jan  5 19:46:06 2009
New Revision: 143090

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=143090
Log:
2009-01-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/38657
        * module.c (write_common_0): Use the name of the symtree rather
        than the common block, to determine if the common has been
        written.

2009-01-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/38657
        * gfortran.dg/module_commons_3.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/module_commons_3.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/module.c
    trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38657