summaryrefslogtreecommitdiffstats
path: root/lib.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2012-03-22 10:48:00 -0700
committerKaz Kylheku <kaz@kylheku.com>2012-03-22 10:48:00 -0700
commit1ccc6d458fbda380233019a1d80d5aff576d9d03 (patch)
tree97e9057e446ac2e19f265ebe829634b46e81f79c /lib.h
parent946c88ae095260a816aae8e1d5eacb32e4424718 (diff)
downloadtxr-1ccc6d458fbda380233019a1d80d5aff576d9d03.tar.gz
txr-1ccc6d458fbda380233019a1d80d5aff576d9d03.tar.bz2
txr-1ccc6d458fbda380233019a1d80d5aff576d9d03.zip
Fix sqrt confusion. There must be a separate isqrt
for the integer square root. * arith.c (sqroot_fixnum): Renamed back to isqrt_fixnum. (sqroot): Rewritten to handle only floating-point square root. (isqrt): New function, based on previous sqroot, handles only integers. * eval.c (eval_init): New intrinsic, isqrt. * lib.h (isqrt): New declaration. * txr.1: Doc stubs. * txr.vim: Highlighting for isqrt.
Diffstat (limited to 'lib.h')
-rw-r--r--lib.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib.h b/lib.h
index e4dbfb8d..9876d77f 100644
--- a/lib.h
+++ b/lib.h
@@ -425,6 +425,7 @@ val expt(val base, val exp);
val exptv(val nlist);
val exptmod(val base, val exp, val mod);
val sqroot(val anum);
+val isqrt(val anum);
val gcd(val anum, val bnum);
val floorf(val);
val ceili(val);