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

[burnus at gcc dot gnu dot org]

------- Comment #1 from burnus at gcc dot gnu dot org  2009-01-05 13:35 -------
I checked my old trunk builds:

2007-11-05-r129891 - works
2007-11-20-r130310 - fails
(= 25 fortran/ commits)

Assuming no local problems and a clean tree (looks like), the following commit
might have caused the regression:

r130257 | fxcoudert | 2007-11-17 14:46:53 +0100 (Sat, 17 Nov 2007) | 6 lines
http://gcc.gnu.org/viewcvs?view=rev&revision=130257

        PR fortran/30285
        * module.c (struct written_common, written_commons): New structure.
        (compare_written_commons, free_written_common, write_common_0):
        New functions.
        (write_common): Call recursive function write_common_0.


-- 


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