------- Comment #2 from pault at gcc dot gnu dot org 2007-07-09 21:33 -------
(In reply to comment #1)
How wierd and wonderful - whilst it is a regression, it is only just; given the
timing of gfc_array_transfer and gfc_simplify_transfer, the latter undid the
former by only a few months or so:)
Really galling is that Brooks and I missed this case and that the fix is so
very easy *sigh*
Index: gcc/fortran/simplify.c
===================================================================
*** gcc/fortran/simplify.c (revision 126461)
--- gcc/fortran/simplify.c (working copy)
*************** gfc_simplify_transfer (gfc_expr *source,
*** 3924,3930 ****
/* Set the number of elements in the result, and determine its size. */
result_elt_size = gfc_target_expr_size (mold_element);
! if (mold->expr_type == EXPR_ARRAY || size)
{
int result_length;
--- 3924,3930 ----
/* Set the number of elements in the result, and determine its size. */
result_elt_size = gfc_target_expr_size (mold_element);
! if (mold->expr_type == EXPR_ARRAY || mold->rank || size)
{
int result_length;
I will commit this tomorrow morning, with two other "obvious" patches, after
regtesting.
Paul
--
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-07-09 09:10:41 |2007-07-09 21:33:26
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32689
