summaryrefslogtreecommitdiffstats
path: root/arith.c
diff options
context:
space:
mode:
Diffstat (limited to 'arith.c')
-rw-r--r--arith.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/arith.c b/arith.c
index f06e77b6..de8d782e 100644
--- a/arith.c
+++ b/arith.c
@@ -68,6 +68,8 @@ val bignum(cnum cn)
return n;
}
+#if HAVE_DOUBLE_INTPTR_T
+
static val bignum_dbl_ipt(double_intptr_t di)
{
val n = make_bignum();
@@ -75,6 +77,8 @@ static val bignum_dbl_ipt(double_intptr_t di)
return n;
}
+#endif
+
val normalize(val bignum)
{
if (mp_cmp_mag(mp(bignum), &NUM_MAX_MP) == MP_GT) {