This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/32302] [4.2/4.3 Regression] Incorrect result with -O2
- 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: 13 Jun 2007 12:26:44 -0000
- Subject: [Bug fortran/32302] [4.2/4.3 Regression] Incorrect result with -O2
- References: <bug-32302-10129@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #8 from pault at gcc dot gnu dot org 2007-06-13 12:26 -------
This fixes it but is, as yet unregtested. I'll do the business tonight and
will commit as 'obvious', if all is well.
Thanks, Dale!
Paul
Index: gcc/fortran/trans-common.c
===================================================================
--- gcc/fortran/trans-common.c (révision 125645)
+++ gcc/fortran/trans-common.c (copie de travail)
@@ -366,7 +366,8 @@ build_common_decl (gfc_common_head *com,
if (strcmp (com->name, BLANK_COMMON_NAME))
gfc_warning ("Named COMMON block '%s' at %L shall be of the "
"same size", com->name, &com->where);
- DECL_SIZE_UNIT (decl) = size;
+ /*The declaration must be laid out once more and resized. */
+ relayout_decl (decl);
}
}
--
pault at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |pault at gcc dot gnu dot org
|dot org |
Status|NEW |ASSIGNED
Last reconfirmed|2007-06-12 15:03:55 |2007-06-13 12:26:43
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32302