diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | eval.c | 2 |
2 files changed, 7 insertions, 1 deletions
@@ -1,5 +1,11 @@ 2014-08-05 Kaz Kylheku <kaz@kylheku.com> + * eval.c (eval_init): Fix incorrect registration of + random-fixnum, which doesn't allow it to be called + with no arguments. + +2014-08-05 Kaz Kylheku <kaz@kylheku.com> + * parser.y: Back port from Berkeley Yacc to GNU Bison. We need a prototype of yylex that is in scope of the grammar, but YYSTYPE is not defined there. @@ -3976,7 +3976,7 @@ void eval_init(void) reg_fun(intern(lit("make-random-state"), user_package), func_n1o(make_random_state, 0)); reg_fun(intern(lit("random-state-p"), user_package), func_n1(random_state_p)); - reg_fun(intern(lit("random-fixnum"), user_package), func_n1o(random_fixnum, 1)); + reg_fun(intern(lit("random-fixnum"), user_package), func_n1o(random_fixnum, 0)); reg_fun(intern(lit("random"), user_package), func_n2(random)); reg_fun(intern(lit("rand"), user_package), func_n2o(rnd, 1)); |