tisp

tiny lisp
git clone git://edryd.org/tisp
Log | Files | Refs | LICENSE

commit bc31c9ccfb4840e72b849453f656c3abba24ba5d
parent 271b63cd5491c24beceb5141e524925238169500
Author: Ed van Bruggen <edvb@uw.edu>
Date:   Wed, 27 May 2020 00:20:51 -0700

Remove config for self returning symbols

Diffstat:
config.mk | 3---
tisp.c | 4----
2 files changed, 0 insertions(+), 7 deletions(-)

diff --git a/config.mk b/config.mk @@ -17,9 +17,6 @@ LDFLAGS = -O3 -Wl,-rpath=$(DESTDIR)$(PREFIX)/lib/tisp $(LIBS) # turn off debug mode by default DEBUG ?= 0 -# self evaluate symbols if they are not defined, instead of throwing error -# CFLAGS += -DTSP_SELF_SYMBOL - # do not load tibs statically, use load procedure instead # CFLAGS += -DTIB_DYNAMIC diff --git a/tisp.c b/tisp.c @@ -746,11 +746,7 @@ tisp_eval(Tsp st, Hash env, Val v) switch (v->t) { case SYMBOL: if (!(f = hash_get(env, v->v.s))) -#ifdef TSP_SELF_SYMBOL - return v; -#else tsp_warnf("could not find symbol %s", v->v.s); -#endif return f; case PAIR: if (!(f = tisp_eval(st, env, car(v))))