[Patch, fortran] [22/22] Various minor fixups

Mikael Morin mikael.morin@sfr.fr
Tue Oct 5 10:14:00 GMT 2010


2010-10-04  Mikael Morin  <mikael@gcc.gnu.org>

	* trans-stmt.c (gfc_trans_allocate): free lhs expr.
-------------- next part --------------
diff --git a/trans-stmt.c b/trans-stmt.c
index 82cddd7..dcab260 100644
--- a/trans-stmt.c
+++ b/trans-stmt.c
@@ -4567,6 +4567,7 @@ gfc_trans_allocate (gfc_code * code)
 			fold_convert (TREE_TYPE (lse.expr), tmp));
 		}
 	    }
+	  gfc_free_expr (lhs);
 	}
 
     }


More information about the Fortran mailing list