diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index d236ce3b60c..de38d3f00fa 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2013-09-18  Tobias Burnus  <burnus@net-b.de>
+
+	* expr.c (gfc_check_assign_symbol): Free lvalue.ref.
+
 2013-09-18  Tobias Burnus  <burnus@net-b.de>
 
 	PR fortran/43366
diff --git a/gcc/fortran/expr.c b/gcc/fortran/expr.c
index 61f0f8275cc..666309245f0 100644
--- a/gcc/fortran/expr.c
+++ b/gcc/fortran/expr.c
@@ -3824,6 +3824,7 @@ gfc_check_assign_symbol (gfc_symbol *sym, gfc_component *comp, gfc_expr *rvalue)
     r = gfc_check_assign (&lvalue, rvalue, 1);
 
   free (lvalue.symtree);
+  free (lvalue.ref);
 
   if (!r)
     return r;