Committed as obvious, Rev. 202722.
Tobias
Index: gcc/fortran/ChangeLog =================================================================== --- gcc/fortran/ChangeLog (Revision 202713) +++ gcc/fortran/ChangeLog (Arbeitskopie) @@ -1,5 +1,9 @@ 2013-09-18 Tobias Burnus <bur...@net-b.de> + * expr.c (gfc_check_assign_symbol): Free lvalue.ref. + +2013-09-18 Tobias Burnus <bur...@net-b.de> + PR fortran/43366 * primary.c (gfc_variable_attr): Also handle codimension. * resolve.c (resolve_ordinary_assign): Add invalid-diagnostic for Index: gcc/fortran/expr.c =================================================================== --- gcc/fortran/expr.c (Revision 202711) +++ gcc/fortran/expr.c (Arbeitskopie) @@ -3824,6 +3824,7 @@ gfc_check_assign_symbol (gfc_symbol *sym, gfc_comp r = gfc_check_assign (&lvalue, rvalue, 1); free (lvalue.symtree); + free (lvalue.ref); if (!r) return r;