From ec8255a27b73c170f4643f7a33641682ab8d2ab7 Mon Sep 17 00:00:00 2001
From: ashinn <ashinn@users.noreply.github.com>
Date: Sat, 23 Mar 2013 21:13:11 +0100
Subject: [PATCH] Fixing sqrt for builds with bignums but no complex.

---
 eval.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/eval.c b/eval.c
index 76111ea0..7c1da9c2 100644
--- a/eval.c
+++ b/eval.c
@@ -1382,7 +1382,7 @@ sexp sexp_log (sexp ctx, sexp self, sexp_sint_t n, sexp z) {
 }
 
 sexp sexp_sqrt (sexp ctx, sexp self, sexp_sint_t n, sexp z) {
-#if SEXP_USE_COMPLEX
+#if SEXP_USE_COMPLEX || SEXP_USE_BIGNUMS
   int negativep = 0;
 #endif
   double d, r;