* eval.c (eval_init): Fix incorrect registration of

list_star_intrinsic, diagnosed by compiler.

1 files changed, 1 insertions, 1 deletions

diff --git a/eval.c b/eval.c
index cff8b997..d1f27cfd 100644
--- a/eval.c
+++ b/eval.c
@@ -2385,7 +2385,7 @@ void eval_init(void)
   reg_fun(append_s, func_n0v(appendv));
   reg_fun(intern(lit("append*"), user_package), func_n0v(lazy_appendv));
   reg_fun(list_s, func_n0v(identity));
-  reg_fun(intern(lit("list*"), user_package), func_n1v(list_star_intrinsic));
+  reg_fun(intern(lit("list*"), user_package), func_n0v(list_star_intrinsic));
   reg_fun(intern(lit("identity"), user_package), identity_f);
   reg_fun(intern(lit("typeof"), user_package), func_n1(typeof));