blob: 2fdef2284d6b2823814ddffb179d359c7d0c086b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
From 6a29208ca9b5f3fdf0d1ca9725b59413ef9cd6c9 Mon Sep 17 00:00:00 2001
From: Justus Winter <4winter@informatik.uni-hamburg.de>
Date: Tue, 13 Jan 2015 17:16:46 +0100
Subject: [PATCH hurd 06/10] bootshell: improve error message
* bootshell/scheme.c (opexe_0): Mention the expression in the error
message.
---
bootshell/scheme.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/bootshell/scheme.c b/bootshell/scheme.c
index 94c2307..a9ce445 100644
--- a/bootshell/scheme.c
+++ b/bootshell/scheme.c
@@ -2679,7 +2679,7 @@ static pointer opexe_0(scheme *sc, enum scheme_opcodes op) {
sc->dump = cont_dump(sc->code);
s_return(sc,sc->args != sc->NIL ? car(sc->args) : sc->NIL);
} else {
- Error_0(sc,"illegal function");
+ Error_1(sc,"illegal function:", sc->code);
}
case OP_DOMACRO: /* do macro */
--
2.1.4
|
