summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--eval.c2
2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 46c337aa..b742a282 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
2014-10-22 Kaz Kylheku <kaz@kylheku.com>
+ * eval.c (eval_init): Fix incorrect, registration of
+ repeat; it must have one optional argument.
+
+2014-10-22 Kaz Kylheku <kaz@kylheku.com>
+
Version 100.
* RELNOTES: Updated.
diff --git a/eval.c b/eval.c
index df8c7eb2..9c9fdf1e 100644
--- a/eval.c
+++ b/eval.c
@@ -3903,7 +3903,7 @@ void eval_init(void)
reg_fun(intern(lit("range*"), user_package), func_n0v(range_star_v));
reg_fun(generate_s, func_n2(generate));
reg_fun(intern(lit("giterate"), user_package), func_n3o(giterate, 2));
- reg_fun(intern(lit("repeat"), user_package), func_n2o(repeat, 2));
+ reg_fun(intern(lit("repeat"), user_package), func_n2o(repeat, 1));
reg_fun(intern(lit("force"), user_package), func_n1(force));
reg_fun(intern(lit("rperm"), user_package), func_n2(rperm));
reg_fun(intern(lit("perm"), user_package), func_n2o(perm, 1));