summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2013-05-14 20:00:52 -0700
committerKaz Kylheku <kaz@kylheku.com>2013-05-14 20:00:52 -0700
commitd8fed49e795ddb08d1aa519d11c06f6367f6e5a0 (patch)
tree7c83fd5298080b714f1dbd0b49feb620cb0ee0d3 /eval.c
parentaced8689f932eeb2a0042a7b89ce4485e3be9c04 (diff)
downloadtxr-d8fed49e795ddb08d1aa519d11c06f6367f6e5a0.tar.gz
txr-d8fed49e795ddb08d1aa519d11c06f6367f6e5a0.tar.bz2
txr-d8fed49e795ddb08d1aa519d11c06f6367f6e5a0.zip
* eval.c (eval_init): State argument in random-fixnum should be
optional. * txr.1: Documented random functions as well as range and range*
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index 8337fed0..81c7db88 100644
--- a/eval.c
+++ b/eval.c
@@ -2446,7 +2446,7 @@ void eval_init(void)
reg_var(intern(lit("*random-state*"), user_package), &random_state);
reg_fun(intern(lit("make-random-state"), user_package), func_n1(make_random_state));
reg_fun(intern(lit("random-state-p"), user_package), func_n1(random_state_p));
- reg_fun(intern(lit("random-fixnum"), user_package), func_n1(random_fixnum));
+ reg_fun(intern(lit("random-fixnum"), user_package), func_n1o(random_fixnum, 1));
reg_fun(intern(lit("random"), user_package), func_n2(random));
reg_fun(intern(lit("rand"), user_package), func_n2o(rnd, 1));