dot sign support in literal mode

1 files changed, 1 insertions, 1 deletions

diff --git a/eval.cpp b/eval.cpp
index 6196e34..e6e6de1 100644
--- a/eval.cpp
+++ b/eval.cpp
@@ -38,7 +38,7 @@ void Evaluator::add_builtin_routines() {
     ADD_BUILTIN_PROC("boolean?", is_boolean);
 
     ADD_BUILTIN_PROC("pair?", is_pair);
-    ADD_BUILTIN_PROC("pair", make_pair);
+    ADD_BUILTIN_PROC("cons", make_pair);
     ADD_BUILTIN_PROC("car", pair_car);
     ADD_BUILTIN_PROC("cdr", pair_cdr);
     ADD_BUILTIN_PROC("set-car!", pair_set_car);