From 20792bf3aca7598bb3a8eaf6e518d42a65d1aa23 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Fri, 28 Feb 1997 18:39:36 -0800
Subject: [PATCH] better (shorter) error messages
Rev: lib/master.pike:1.33
---
lib/master.pike | 10 +++++++++-
1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/lib/master.pike b/lib/master.pike
index 7fee0c515b..7acb51a7cb 100644
--- a/lib/master.pike
+++ b/lib/master.pike
@@ -62,7 +62,15 @@ static program low_findprog(string pname, string ext)
{
case "":
case ".pike":
- ret=compile_file(fname);
+ if ( mixed e=catch { ret=compile_file(fname); } )
+ {
+ if(arrayp(e) &&
+ sizeof(e)==2 &&
+ arrayp(e[1]) &&
+ sizeof(e[1]) == sizeof(backtrace()))
+ e[1]=({});
+ throw(e);
+ }
break;
case ".so":
ret=load_module(fname);
--
GitLab