iris

small scheme interpreter
git clone git://git.2f30.org/iris.git
Log | Files | Refs | LICENSE

commit 7bc0a99f392960959c86c3dced5632973a5cc28c
parent ebf719abacbeb9b70e5e587a0069c4bacb94aea9
Author: sin <sin@2f30.org>
Date:   Fri May 16 13:27:44 +0100

Report unbound identifiers for pair evaluation

Diffstat:
parser.c | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/parser.c b/parser.c @@ -560,7 +560,7 @@ eval(struct object *o) /* evaluate builtins and procedures */ tmp = lookupsym(car(o)->d.i.name); if (!tmp) - break; + return error("unbound identifier"); if (tmp->type == OIdentifier) { for (i = 0; i < LEN(builtins); i++) if (strcmp(tmp->d.i.name, builtins[i].name) == 0)