Add if primitive procedure

1 files changed, 1 insertions, 0 deletions

diff --git a/src/bootstrap/main.c b/src/bootstrap/main.c
index a8ba7bc..8ec1231 100755
--- a/src/bootstrap/main.c
+++ b/src/bootstrap/main.c
@@ -40,6 +40,7 @@ init(void) {
     environment[env_n++] = (EnvSymbol){MAKE_SYM("not"), make_procedure(proc_not)};
     environment[env_n++] = (EnvSymbol){MAKE_SYM("and"), make_procedure(proc_and)};
     environment[env_n++] = (EnvSymbol){MAKE_SYM("or"), make_procedure(proc_or)};
+    environment[env_n++] = (EnvSymbol){MAKE_SYM("if"), make_procedure(proc_if)};
     environment[env_n++] = (EnvSymbol){MAKE_SYM("display"), make_procedure(proc_display)};
     environment[env_n++] = (EnvSymbol){MAKE_SYM("print"), make_procedure(proc_print)};
 }