[Bug fortran/49112] [4.6/4.7 Regression] [OOP] Missing type-bound procedure, "duplicate save" warnings and internal compiler error

["janus at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |ASSIGNED
         AssignedTo|unassigned at gcc dot       |janus at gcc dot gnu.org
                   |gnu.org                     |

--- Comment #11 from janus at gcc dot gnu.org 2011-06-20 19:55:54 UTC ---
(In reply to comment #10)
> It can be fixed by this partial revert:
> 
> ===================================================================
> --- gcc/fortran/resolve.c    (revision 174415)
> +++ gcc/fortran/resolve.c    (working copy)
> @@ -964,9 +964,6 @@ resolve_structure_cons (gfc_expr *expr, int init)
> 
>    t = SUCCESS;
> 
> -  if (expr->ts.type == BT_DERIVED)
> -    resolve_symbol (expr->ts.u.derived);
> -
>    cons = gfc_constructor_first (expr->value.constructor);
>    /* A constructor may have references if it is the result of substituting a
>       parameter variable.  In this case we just pull out the component we


Unfortunately this patchlet seems to induce the following testsuite
regressions:

FAIL: gfortran.dg/func_assign_3.f90  -O0  (test for excess errors)
FAIL: gfortran.dg/func_result_6.f90  -O0  (test for excess errors)
FAIL: gfortran.dg/typebound_call_7.f03  -O  (test for excess errors)
FAIL: gfortran.dg/typebound_call_8.f03  -O  (test for excess errors)


The patch in comment #9, however, seems to be clean.