From 7338a92f135d2a5cb8db59c08885b63ee4991d9f Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Tue, 21 Feb 2012 22:10:30 -0800 Subject: * eval.c (eval_init): Third argument of gethash becomes optional. --- ChangeLog | 4 ++++ eval.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index aee098cc..2460dc03 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2012-02-21 Kaz Kylheku + + * eval.c (eval_init): Third argument of gethash becomes optional. + 2012-02-21 Kaz Kylheku Introducing optional arguments. diff --git a/eval.c b/eval.c index 864ac82f..a733ba45 100644 --- a/eval.c +++ b/eval.c @@ -2108,7 +2108,7 @@ void eval_init(void) reg_fun(intern(lit("make-hash"), user_package), func_n3(make_hash)); reg_fun(intern(lit("hash"), user_package), func_n0v(hashv)); - reg_fun(gethash_s, func_n3(gethash_n)); + reg_fun(gethash_s, func_n3o(gethash_n, 2)); reg_fun(intern(lit("sethash"), user_package), func_n3(sethash)); reg_fun(intern(lit("pushhash"), user_package), func_n3(pushhash)); reg_fun(intern(lit("remhash"), user_package), func_n2(remhash)); -- cgit v1.2.3