[Bug fortran/48746] [4.6/4.7 Regression] Matmul with allocate on assignment

[pault at gcc dot gnu.org]

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

--- Comment #9 from Paul Thomas <pault at gcc dot gnu.org> 2011-04-30 12:00:53 UTC ---
Author: pault
Date: Sat Apr 30 12:00:50 2011
New Revision: 173214

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=173214
Log:
2011-04-30  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/48462
    PR fortran/48746
    * trans-expr.c ( arrayfunc_assign_needs_temporary): Need a temp
    if automatic reallocation on assignement is active, the lhs is a
    target and the rhs an intrinsic function.
    (realloc_lhs_bounds_for_intrinsic_call): Rename as next.
    (fcncall_realloc_result): Renamed version of above function.
    Free the original descriptor data after the function call.Set the bounds
and the
    offset so that the lbounds are one.
    (gfc_trans_arrayfunc_assign): Call renamed function.

2011-04-30  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/48462
    PR fortran/48746
    * gfortran.dg/realloc_on_assign_7.f03: New test.


Added:
    branches/gcc-4_6-branch/gcc/testsuite/gfortran.dg/realloc_on_assign_7.f03
Modified:
    branches/gcc-4_6-branch/gcc/fortran/ChangeLog
    branches/gcc-4_6-branch/gcc/fortran/trans-expr.c
    branches/gcc-4_6-branch/gcc/testsuite/ChangeLog