Commit 2df53c0b by Richard Stallman

(expand_expr): For BIND_EXPR, call insert_block on the block.

From-SVN: r1960
parent 1b81aa14
...@@ -3354,9 +3354,10 @@ expand_expr (exp, target, tmode, modifier) ...@@ -3354,9 +3354,10 @@ expand_expr (exp, target, tmode, modifier)
if there are any cleanups they most be contained here. */ if there are any cleanups they most be contained here. */
expand_start_bindings (0); expand_start_bindings (0);
/* Mark the corresponding BLOCK for output. */ /* Mark the corresponding BLOCK for output in its proper place. */
if (TREE_OPERAND (exp, 2) != 0) if (TREE_OPERAND (exp, 2) != 0
TREE_USED (TREE_OPERAND (exp, 2)) = 1; && ! TREE_USED (TREE_OPERAND (exp, 2)))
insert_block (TREE_OPERAND (exp, 2));
/* If VARS have not yet been expanded, expand them now. */ /* If VARS have not yet been expanded, expand them now. */
while (vars) while (vars)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment