From 5fe7a7b562690f33a6bddcd28e2a5a98b9c50b81 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Mon, 6 Nov 1995 23:29:44 +0100
Subject: [PATCH] fixed to show original error when error is called recursively
Rev: src/error.c:1.2
---
src/error.c | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/src/error.c b/src/error.c
index 47d6f99464..e90c7c81c0 100644
--- a/src/error.c
+++ b/src/error.c
@@ -70,14 +70,15 @@ struct svalue throw_value = { T_INT };
void va_error(char *fmt, va_list args)
{
char buf[2000];
- static int in_error;
+ static char *in_error;
if(in_error)
{
+ char *tmp=in_error;
in_error=0;
- fatal("Recursive error() calls.\n");
+ fatal("Recursive error() calls, original error: %s",tmp);
}
- in_error=1;
+ in_error=buf;
VSPRINTF(buf, fmt, args);
--
GitLab