summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2016-04-28 06:20:51 -0700
committerKaz Kylheku <kaz@kylheku.com>2016-04-28 06:20:51 -0700
commitd0c176d3cc719d136cd3c19eb1d057193300b407 (patch)
tree1f2bd03224e42d40d1c275c7244534fc3a46e1dd /eval.c
parent10fc6e23661ad004591936b5c28b9cb17e596b8f (diff)
downloadtxr-d0c176d3cc719d136cd3c19eb1d057193300b407.tar.gz
txr-d0c176d3cc719d136cd3c19eb1d057193300b407.tar.bz2
txr-d0c176d3cc719d136cd3c19eb1d057193300b407.zip
Move PRNG-related initialization to rand.c
* eval.c (eval_init): Remove registration of make-random-state, random-state-get-vec, random-state-p, random-fixnup, random, and rand. * rand.c (rand_init): Move registrations removed from eval_init here.
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c8
1 files changed, 0 insertions, 8 deletions
diff --git a/eval.c b/eval.c
index 7c8d9b45..ebfc9ffe 100644
--- a/eval.c
+++ b/eval.c
@@ -5286,14 +5286,6 @@ void eval_init(void)
reg_fun(intern(lit("functionp"), user_package), func_n1(functionp));
reg_fun(intern(lit("interp-fun-p"), user_package), func_n1(interp_fun_p));
- reg_fun(intern(lit("make-random-state"), user_package), func_n1o(make_random_state, 0));
- reg_fun(intern(lit("random-state-get-vec"), user_package),
- func_n1o(random_state_get_vec, 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, 0));
- reg_fun(intern(lit("random"), user_package), func_n2(random));
- reg_fun(intern(lit("rand"), user_package), func_n2o(rnd, 1));
-
reg_fun(intern(lit("range"), user_package), func_n3o(range, 0));
reg_fun(intern(lit("range*"), user_package), func_n3o(range_star, 0));
reg_fun(generate_s, func_n2(generate));