summaryrefslogtreecommitdiffstats
path: root/lib.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2012-03-22 01:47:23 -0700
committerKaz Kylheku <kaz@kylheku.com>2012-03-22 01:47:23 -0700
commitd4a331511ffa45f41a0a619649e366905e406037 (patch)
tree91fe6934061595d399d112a13bb3be4c577a6b89 /lib.h
parent3f7c28ed9255ce0332b2e9214ee771c8a1a8dd1c (diff)
downloadtxr-d4a331511ffa45f41a0a619649e366905e406037.tar.gz
txr-d4a331511ffa45f41a0a619649e366905e406037.tar.bz2
txr-d4a331511ffa45f41a0a619649e366905e406037.zip
* arith.c (to_float): New static function.
(divi): Uses to_float. (zerop, gt, lt, ge, le, expt): Floating support. (isqrt_fixnum): Static function renamed to sqroot_fixnum. (isqrt): Renamed to sqroot. Floating support. (evenp, oddp, exptmod, gcd): Work with integers, not floats. * eval.c (eval_init): intrinsic registration of sqrt follows rename of isqrt to sqroot. * lib.h (isqrt): Declaration replaced.
Diffstat (limited to 'lib.h')
-rw-r--r--lib.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib.h b/lib.h
index 6ce793b3..f6deb1ce 100644
--- a/lib.h
+++ b/lib.h
@@ -424,7 +424,7 @@ val minv(val first, val rest);
val expt(val base, val exp);
val exptv(val nlist);
val exptmod(val base, val exp, val mod);
-val isqrt(val anum);
+val sqroot(val anum);
val gcd(val anum, val bnum);
val string_own(wchar_t *str);
val string(const wchar_t *str);