Branch: Tag:

1999-11-30

1999-11-30 07:50:20 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

new opcode: RETURN_IF_TRUE

Rev: src/interpreter.h:1.20
Rev: src/language.yacc:1.138
Rev: src/lex.c:1.67
Rev: src/peep.in:1.27
Rev: src/program.c:1.176

862:    pop_stack();    break;    +     CASE(F_BRANCH_WHEN_NON_ZERO);    if(IS_ZERO(sp-1))    {
1065:    print_return_value();    goto do_return;    +  CASE(F_RETURN_IF_TRUE); +  if(!IS_ZERO(sp-1)) +  goto do_return; +  break; +     CASE(F_RETURN_1);    push_int(1);    goto do_return;