tisp

commit efeb8b9382b9354f36acbc6a5c006b21a7d57c18
parent 1771e0b84cb0b86a62ddfbe6bfb71c869b7a4ffd
Author: Ed van Bruggen <edvb@uw.edu>
Date:   Fri,  3 Apr 2020 22:11:13 -0700

Define nil symbol directly in C

Diffstat:
tibs/lib.tsp
 | 
1
-
tisp.c
 | 
1
+

2 files changed, 1 insertion(+), 1 deletion(-)
diff --git a/tibs/lib.tsp b/tibs/lib.tsp
@@ -1,4 +1,3 @@
-(define nil ())
 (define (list . lst) lst)
 
 (define defmacro
diff --git a/tisp.c b/tisp.c
@@ -1141,6 +1141,7 @@ tisp_env_init(size_t cap)
 
 	st->global = hash_new(cap, NULL);
 	tisp_env_add(st, "t", st->t);
+	tisp_env_add(st, "nil", st->nil);
 	tsp_env_fn(car);
 	tsp_env_fn(cdr);
 	tsp_env_fn(cons);