1 files changed, 2 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index 25a6c0be..b8e2155c 100644
--- a/eval.c
+++ b/eval.c
@@ -2411,7 +2411,8 @@ void eval_init(void)
   reg_fun(intern(lit("hash-isec"), user_package), func_n2(hash_isec));
 
   reg_fun(intern(lit("eval"), user_package), func_n2o(eval_intrinsic, 1));
-  reg_fun(intern(lit("lisp-parse"), user_package), func_n2o(lisp_parse, 1));
+  reg_fun(intern(lit("lisp-parse"), user_package), func_n2o(lisp_parse, 0));
+  reg_fun(intern(lit("read"), user_package), func_n2o(lisp_parse, 0));
 
   reg_fun(intern(lit("chain"), user_package), func_n0v(chainv));
   reg_fun(intern(lit("andf"), user_package), func_n0v(andv));