From b48cc329ce3b5e79771041efbbc18b7b27190a16 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Wed, 9 Oct 1996 04:02:17 +0200
Subject: [PATCH] exit_on_string added
Rev: src/threads.c:1.4
---
src/threads.c | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/src/threads.c b/src/threads.c
index 03e3aee60b..62666f15a8 100644
--- a/src/threads.c
+++ b/src/threads.c
@@ -35,11 +35,12 @@ void *new_thread_func(void * data)
if(SETJMP(back))
{
- exit_on_error="Error in handle_error in master object!\nPrevious error:";
+ ONERROR tmp;
+ SET_ONERROR(tmp,exit_on_error,"Error in handle_error in master object!");
assign_svalue_no_free(sp++, & throw_value);
APPLY_MASTER("handle_error", 1);
pop_stack();
- automatic_fatal=0;
+ UNSET_ONERROR(tmp);
} else {
push_array_items(arg.args);
arg.args=0;
--
GitLab