===================================================================
RCS file: /home/cvs/OpenXM_contrib/gmp/mpbsd/Attic/xtom.c,v
retrieving revision 1.1.1.2
retrieving revision 1.1.1.3
diff -u -p -r1.1.1.2 -r1.1.1.3
--- OpenXM_contrib/gmp/mpbsd/Attic/xtom.c	2000/09/09 14:13:17	1.1.1.2
+++ OpenXM_contrib/gmp/mpbsd/Attic/xtom.c	2003/08/25 16:06:37	1.1.1.3
@@ -1,7 +1,7 @@
 /* xtom -- convert a hexadecimal string to a MINT, and return a pointer to
    the MINT.
 
-Copyright (C) 1991, 1994, 1995, 1996, 2000 Free Software Foundation, Inc.
+Copyright 1991, 1994, 1995, 1996, 2000, 2001 Free Software Foundation, Inc.
 
 This file is part of the GNU MP Library.
 
@@ -27,13 +27,7 @@ MA 02111-1307, USA. */
 #include "gmp-impl.h"
 
 static int
-#if __STDC__
 digit_value_in_base (int c, int base)
-#else
-digit_value_in_base (c, base)
-     int c;
-     int base;
-#endif
 {
   int digit;
 
@@ -52,12 +46,7 @@ digit_value_in_base (c, base)
 }
 
 MINT *
-#if __STDC__
 xtom (const char *str)
-#else
-xtom (str)
-     const char *str;
-#endif
 {
   size_t str_size;
   char *s, *begs;
@@ -65,7 +54,7 @@ xtom (str)
   mp_size_t xsize;
   int c;
   int negative;
-  MINT *x = (MINT *) (*_mp_allocate_func) (sizeof (MINT));
+  MINT *x = (MINT *) (*__gmp_allocate_func) (sizeof (MINT));
   TMP_DECL (marker);
 
   /* Skip whitespace.  */
@@ -106,7 +95,7 @@ xtom (str)
 
   xsize = str_size / __mp_bases[16].chars_per_limb + 1;
   x->_mp_alloc = xsize;
-  x->_mp_d = (mp_ptr) (*_mp_allocate_func) (xsize * BYTES_PER_MP_LIMB);
+  x->_mp_d = (mp_ptr) (*__gmp_allocate_func) (xsize * BYTES_PER_MP_LIMB);
 
   xsize = mpn_set_str (x->_mp_d, (unsigned char *) begs, str_size, 16);
   x->_mp_size = negative ? -xsize : xsize;