mirror of git://gcc.gnu.org/git/gcc.git
trans-stmt.c (gfc_trans_allocate): free lhs expr.
2010-10-06 Mikael Morin <mikael@gcc.gnu.org> * trans-stmt.c (gfc_trans_allocate): free lhs expr. From-SVN: r165053
This commit is contained in:
parent
fcba55090e
commit
c956e9af46
|
@ -1,3 +1,7 @@
|
||||||
|
2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
|
||||||
|
|
||||||
|
* trans-stmt.c (gfc_trans_allocate): free lhs expr.
|
||||||
|
|
||||||
2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
|
2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
|
||||||
|
|
||||||
* trans-array.c (gfc_free_ss_chain): Made non-static.
|
* trans-array.c (gfc_free_ss_chain): Made non-static.
|
||||||
|
|
|
@ -4567,6 +4567,7 @@ gfc_trans_allocate (gfc_code * code)
|
||||||
fold_convert (TREE_TYPE (lse.expr), tmp));
|
fold_convert (TREE_TYPE (lse.expr), tmp));
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
gfc_free_expr (lhs);
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue