diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 87793b7d0454e4ec03d08f57fc742d77a716e594..dcac2906451d1593ff24d9ffb1fb34f0bbc70adc 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +Fri Dec 12 01:19:48 1997 Jason Merrill <jason@yorick.cygnus.com> + + * except.c (call_get_eh_context): Don't mess with sequences. + (emit_eh_context): Include the call in the sequence here. + 1997-12-11 Paul Eggert <eggert@twinsun.com> * collect2.c (write_c_file_glob): Allocate initial frame object diff --git a/gcc/except.c b/gcc/except.c index 95f8b2ceb99400bc32258f5923a8d5376018f7a4..dbba31b445bec79282792a5cfe419050b37dcb0b 100644 --- a/gcc/except.c +++ b/gcc/except.c @@ -707,15 +707,13 @@ add_partial_entry (handler) pop_obstacks (); } -/* Emit code to get EH context to current function. Should only be used - by emit_eh_context. */ +/* Emit code to get EH context to current function. */ static rtx call_get_eh_context () { static tree fn; tree expr; - rtx ehc, reg, insns; if (fn == NULL_TREE) { @@ -741,16 +739,7 @@ call_get_eh_context () expr, NULL_TREE, NULL_TREE); TREE_SIDE_EFFECTS (expr) = 1; - start_sequence (); - ehc = expand_expr (expr, NULL_RTX, VOIDmode, 0); - reg = copy_to_reg (ehc); - - insns = get_insns (); - end_sequence (); - - emit_insns_before (insns, get_first_nonparm_insn ()); - - return reg; + return copy_to_reg (expand_expr (expr, NULL_RTX, VOIDmode, 0)); } /* Get a reference to the EH context. @@ -1678,11 +1667,12 @@ emit_eh_context () { rtx insns; - /* If this is the first use insn, emit the call. */ + start_sequence (); + + /* If this is the first use insn, emit the call here. */ if (ehc == 0) ehc = call_get_eh_context (); - start_sequence (); emit_move_insn (XEXP (reg, 0), ehc); insns = get_insns (); end_sequence ();