MFH

diff --git a/ext/bcmath/libbcmath/src/init.c b/ext/bcmath/libbcmath/src/init.c
index f349d82a7ba3b177e9ef20031fc24c0467b2da79..14e84f52e29b08c4622aea25891f99598ddf16db 100644 (file)
--- a/ext/bcmath/libbcmath/src/init.c
+++ b/ext/bcmath/libbcmath/src/init.c
@@ -38,7 +38,9 @@
 #include "bcmath.h"
 #include "private.h"
 
+#ifdef SANDER_0
  bc_num _bc_Free_list = NULL;
+#endif
 
 /* new_num allocates a number and sets fields to known values. */
 

diff --git a/ext/bcmath/libbcmath/src/private.h b/ext/bcmath/libbcmath/src/private.h
index 4458346626e9644858643fe74be3cc26dbcf46c1..0789677d9518216412b41e791d8c8eea9fc39d99 100644 (file)
--- a/ext/bcmath/libbcmath/src/private.h
+++ b/ext/bcmath/libbcmath/src/private.h
@@ -32,7 +32,9 @@
 /* "Private" routines to bcmath. */
 
 /* variables */
+#ifdef SANDER_0
 extern bc_num _bc_Free_list;
+#endif
 
 /* routines */
 int _bc_do_compare (bc_num n1, bc_num n2, int use_sign, int ignore_last);

diff --git a/ext/bcmath/libbcmath/src/recmul.c b/ext/bcmath/libbcmath/src/recmul.c
index f97614c535a818326d2b575e0793e3c3980ca67a..c31d09dc72db56b0725101f54e418fa4bf53c5f7 100644 (file)
--- a/ext/bcmath/libbcmath/src/recmul.c
+++ b/ext/bcmath/libbcmath/src/recmul.c
@@ -57,13 +57,17 @@ new_sub_num (length, scale, value)
 {
   bc_num temp;
 
+#ifdef SANDER_0
   if (_bc_Free_list != NULL) {
     temp = _bc_Free_list;
     _bc_Free_list = temp->n_next;
   } else {
+#endif
     temp = (bc_num) emalloc (sizeof(bc_struct));
+#ifdef SANDER_0
     if (temp == NULL) bc_out_of_memory ();
   }
+#endif
   temp->n_sign = PLUS;
   temp->n_len = length;
   temp->n_scale = scale;