aboutsummaryrefslogtreecommitdiffstats
path: root/src/bootstrap/main.c
diff options
context:
space:
mode:
authorBad Diode <bd@badd10de.dev>2021-10-11 09:40:39 +0200
committerBad Diode <bd@badd10de.dev>2021-10-11 09:40:39 +0200
commitc497aca556295479b1ed5632e125ff1d0658d8d8 (patch)
tree114aadd19644b32e2046241c4f3955b00de5422f /src/bootstrap/main.c
parent581116c655df4eb753098e013dd5854df95f7865 (diff)
downloadbdl-c497aca556295479b1ed5632e125ff1d0658d8d8.tar.gz
bdl-c497aca556295479b1ed5632e125ff1d0658d8d8.zip
Add a base struct to start environment refactoring
Diffstat (limited to 'src/bootstrap/main.c')
-rwxr-xr-xsrc/bootstrap/main.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/bootstrap/main.c b/src/bootstrap/main.c
index 65e508f..66c3780 100755
--- a/src/bootstrap/main.c
+++ b/src/bootstrap/main.c
@@ -54,6 +54,9 @@ init(void) {
54 environment[env_n++] = (EnvSymbol){MAKE_SYM("or"), make_procedure(proc_or)}; 54 environment[env_n++] = (EnvSymbol){MAKE_SYM("or"), make_procedure(proc_or)};
55 environment[env_n++] = (EnvSymbol){MAKE_SYM("if"), make_procedure(proc_if)}; 55 environment[env_n++] = (EnvSymbol){MAKE_SYM("if"), make_procedure(proc_if)};
56 environment[env_n++] = (EnvSymbol){MAKE_SYM("else"), obj_true}; 56 environment[env_n++] = (EnvSymbol){MAKE_SYM("else"), obj_true};
57 environment[env_n++] = (EnvSymbol){MAKE_SYM("true"), obj_true};
58 environment[env_n++] = (EnvSymbol){MAKE_SYM("false"), obj_false};
59 environment[env_n++] = (EnvSymbol){MAKE_SYM("nil"), obj_nil};
57 environment[env_n++] = (EnvSymbol){MAKE_SYM("cond"), make_procedure(proc_cond)}; 60 environment[env_n++] = (EnvSymbol){MAKE_SYM("cond"), make_procedure(proc_cond)};
58 environment[env_n++] = (EnvSymbol){MAKE_SYM("car"), make_procedure(proc_car)}; 61 environment[env_n++] = (EnvSymbol){MAKE_SYM("car"), make_procedure(proc_car)};
59 environment[env_n++] = (EnvSymbol){MAKE_SYM("cdr"), make_procedure(proc_cdr)}; 62 environment[env_n++] = (EnvSymbol){MAKE_SYM("cdr"), make_procedure(proc_cdr)};