From b16a214fee75cb00078a7038de394073ef8148ee Mon Sep 17 00:00:00 2001 From: ashinn Date: Sat, 23 Mar 2013 21:16:21 +0100 Subject: [PATCH] sexp_bignum_sqrt is only needed if SEXP_USE_MATH is enabled. --- bignum.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/bignum.c b/bignum.c index 71524faf..de697f98 100644 --- a/bignum.c +++ b/bignum.c @@ -477,6 +477,8 @@ sexp sexp_bignum_expt (sexp ctx, sexp a, sexp b) { return sexp_bignum_normalize(res); } +#if SEXP_USE_MATH + #define SEXP_MAX_ACCURATE_FLONUM_SQRT 1.12589990684262e15 /* 2^50 */ sexp sexp_bignum_sqrt (sexp ctx, sexp a) { /* Babylonian method */ @@ -515,6 +517,8 @@ sexp sexp_bignum_sqrt (sexp ctx, sexp a) { /* Babylonian method */ return sexp_bignum_normalize(res); } +#endif /* SEXP_USE_MATH */ + /************************ ratios ******************************/ #if SEXP_USE_RATIOS