pike.git/ src/ docode.c

2001-06-23

2001-06-23 10:33:11 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 3958994ea9dd691bedd449dcde4e45cf96dfe389 (8 lines) (+6/-2) ^{[ Show | Annotate ]}
  Branch: 7.9

avoid generating tail recursion inside catch()

Rev: src/docode.c:1.121
Rev: src/interpret.c:1.208
Rev: src/opcodes.h:1.17
Rev: src/peep.c:1.47
Rev: src/peep.in:1.53
Rev: src/testsuite.in:1.427

5:   \*/   /**/   #include "global.h" - RCSID("$Id: docode.c,v 1.120 2001/06/19 23:59:33 hubbe Exp $"); + RCSID("$Id: docode.c,v 1.121 2001/06/23 10:33:11 hubbe Exp $");   #include "las.h"   #include "program.h"   #include "pike_types.h"
165:   static INT32 current_switch_default;   static INT32 current_switch_values_on_stack;   static INT32 *current_switch_jumptable =0; + static int in_catch=0;   static struct pike_type *current_switch_type = NULL;      void upd_int(int offset, INT32 tmp)
1599:       case F_RETURN:    do_docode(CAR(n),0); -  emit0(F_RETURN); +  emit0(in_catch ? F_VOLATILE_RETURN : F_RETURN);    return 0;       case F_SSCANF:
1620:    if (TEST_COMPAT(7,0))    current_label->continue_label = current_label->break_label;    +  in_catch++;    DO_CODE_BLOCK(CAR(n)); -  +  in_catch--;       ins_label(current_label->break_label);    emit0(F_THROW_ZERO);