summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2012-01-02 10:03:03 -0800
committerKaz Kylheku <kaz@kylheku.com>2012-01-02 10:03:03 -0800
commitb6fdf456e413412aaa7cd132b1f340b5b706eddd (patch)
tree3b5ecf4a94c3c8955ee6307fce79b56186ad96e6 /eval.c
parent0e4caada3d016a6e10d695e98a1e2ee9a4a4b9d0 (diff)
downloadtxr-b6fdf456e413412aaa7cd132b1f340b5b706eddd.tar.gz
txr-b6fdf456e413412aaa7cd132b1f340b5b706eddd.tar.bz2
txr-b6fdf456e413412aaa7cd132b1f340b5b706eddd.zip
* eval.c (eval_init): Fix regression introduced in
2011-12-29 commit. We can't use mod_s, because the module which sets up that variable is not yet initialized.
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 b9ff8197..fee3a50a 100644
--- a/eval.c
+++ b/eval.c
@@ -1286,7 +1286,7 @@ void eval_init(void)
reg_fun(intern(lit("*"), user_package), func_n0v(mulv));
reg_fun(intern(lit("abs"), user_package), func_n1(abso));
reg_fun(intern(lit("trunc"), user_package), func_n2(trunc));
- reg_fun(mod_s, func_n2(mod));
+ reg_fun(intern(lit("mod"), user_package), func_n2(mod));
reg_fun(intern(lit("expt"), user_package), func_n0v(exptv));
reg_fun(intern(lit("exptmod"), user_package), func_n3(exptmod));
reg_fun(intern(lit("sqrt"), user_package), func_n1(isqrt));