Branch: Tag:

1996-10-09

1996-10-09 02:01:32 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

exit_on_error fixed

Rev: src/backend.c:1.4
Rev: src/builtin_functions.c:1.7
Rev: src/error.c:1.5
Rev: src/error.h:1.4
Rev: src/main.c:1.8

225:       if(SETJMP(back))    { -  exit_on_error="Error in handle_error, previous error (in _main): "; +  ONERROR tmp; +  SET_ONERROR(tmp,exit_on_error,"Error in handle_error in master object!");    assign_svalue_no_free(sp, & throw_value);    sp++;    APPLY_MASTER("handle_error", 1);    pop_stack(); -  +  UNSET_ONERROR(tmp);    exit(10);    }