From aacd95f5515c3ae4adf51968e8af9f524f28a651 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Fri, 7 Jan 2000 05:33:55 +0100
Subject: [PATCH] Removed silly frame from the backtrace generated by "Calling
undefined function."
Rev: src/interpret.c:1.134
---
src/interpret.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/interpret.c b/src/interpret.c
index 1884a09ca5..99e849e9de 100644
--- a/src/interpret.c
+++ b/src/interpret.c
@@ -5,7 +5,7 @@
\*/
/**/
#include "global.h"
-RCSID("$Id: interpret.c,v 1.133 1999/12/13 21:48:24 grubba Exp $");
+RCSID("$Id: interpret.c,v 1.134 2000/01/07 04:33:55 mast Exp $");
#include "interpret.h"
#include "object.h"
#include "program.h"
@@ -925,8 +925,8 @@ void mega_apply2(enum apply_type type, INT32 args, void *arg1, void *arg2)
fp = new_frame;
if(function->func.offset == -1)
- PIKE_ERROR(function->name->str, "Calling undefined function.\n",
- sp, args);
+ generic_error(NULL, sp, args,
+ "Calling undefined function.\n");
tailrecurse=-1;
--
GitLab