mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-04-15 12:41:03 +08:00
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>
|
||||
|
||||
* 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));
|
||||
}
|
||||
}
|
||||
gfc_free_expr (lhs);
|
||||
}
|
||||
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user