aboutsummaryrefslogtreecommitdiff
path: root/gcc/java/jcf-write.c
diff options
context:
space:
mode:
authorRoger Sayle <roger@eyesopen.com>2003-09-30 18:24:33 +0000
committerRoger Sayle <sayle@gcc.gnu.org>2003-09-30 18:24:33 +0000
commitd186e676b6d53efabc9d1cbfe9f7b80822c4c2ac (patch)
tree356336d35072d68cb7699897c268ca1398c12168 /gcc/java/jcf-write.c
parent8cefb55d775aed11b49b3148ed947e853cd66205 (diff)
downloadgcc-d186e676b6d53efabc9d1cbfe9f7b80822c4c2ac.zip
gcc-d186e676b6d53efabc9d1cbfe9f7b80822c4c2ac.tar.gz
gcc-d186e676b6d53efabc9d1cbfe9f7b80822c4c2ac.tar.bz2
jcf-write.c (generate_bytecode_insns): Implement evaluate-once semantics for SAVE_EXPR...
* jcf-write.c (generate_bytecode_insns): Implement evaluate-once semantics for SAVE_EXPR, by caching the result in a temporary. From-SVN: r71949
Diffstat (limited to 'gcc/java/jcf-write.c')
-rw-r--r--gcc/java/jcf-write.c32
1 files changed, 31 insertions, 1 deletions
diff --git a/gcc/java/jcf-write.c b/gcc/java/jcf-write.c
index b4a9e1b..097177e 100644
--- a/gcc/java/jcf-write.c
+++ b/gcc/java/jcf-write.c
@@ -2149,7 +2149,37 @@ generate_bytecode_insns (tree exp, int target, struct jcf_partial *state)
}
break;
case SAVE_EXPR:
- generate_bytecode_insns (TREE_OPERAND (exp, 0), STACK_TARGET, state);
+ /* Because the state associated with a SAVE_EXPR tree node must
+ be a RTL expression, we use it to store the DECL_LOCAL_INDEX
+ of a temporary variable in a CONST_INT. */
+ if (! SAVE_EXPR_RTL (exp))
+ {
+ tree type = TREE_TYPE (exp);
+ tree decl = build_decl (VAR_DECL, NULL_TREE, type);
+ generate_bytecode_insns (TREE_OPERAND (exp, 0),
+ STACK_TARGET, state);
+ localvar_alloc (decl, state);
+ SAVE_EXPR_RTL (exp) = GEN_INT (DECL_LOCAL_INDEX (decl));
+ emit_dup (TYPE_IS_WIDE (type) ? 2 : 1, 0, state);
+ emit_store (decl, state);
+ }
+ else
+ {
+ /* The following code avoids creating a temporary DECL just
+ to pass to emit_load. This code could be factored with
+ the similar implementation in emit_load_or_store. */
+ tree type = TREE_TYPE (exp);
+ int kind = adjust_typed_op (type, 4);
+ int index = (int) INTVAL (SAVE_EXPR_RTL (exp));
+ if (index <= 3)
+ {
+ RESERVE (1); /* [ilfda]load_[0123] */
+ OP1 (OPCODE_iload + 5 + 4*kind + index);
+ }
+ else /* [ilfda]load */
+ maybe_wide (OPCODE_iload + kind, index, state);
+ NOTE_PUSH (TYPE_IS_WIDE (type) ? 2 : 1);
+ }
break;
case CONVERT_EXPR:
case NOP_EXPR: