[BACK]Return to dump.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib / gmp / mpn / generic

Diff for /OpenXM_contrib/gmp/mpn/generic/Attic/dump.c between version 1.1.1.2 and 1.1.1.3

version 1.1.1.2, 2000/09/09 14:12:24 version 1.1.1.3, 2003/08/25 16:06:20
Line 3 
Line 3 
    FUNCTION WILL CHANGE OR DISAPPEAR IN A FUTURE GNU MP RELEASE.     FUNCTION WILL CHANGE OR DISAPPEAR IN A FUTURE GNU MP RELEASE.
   
   
 Copyright (C) 1996, 2000 Free Software Foundation, Inc.  Copyright 1996, 2000, 2001, 2002 Free Software Foundation, Inc.
   
 This file is part of the GNU MP Library.  This file is part of the GNU MP Library.
   
Line 27  MA 02111-1307, USA.
Line 27  MA 02111-1307, USA.
 #include "gmp.h"  #include "gmp.h"
 #include "gmp-impl.h"  #include "gmp-impl.h"
   
   #if GMP_NUMB_BITS % 4 == 0
 void  void
 #if __STDC__  mpn_dump (mp_srcptr ptr, mp_size_t n)
 mpn_dump (mp_srcptr ptr, mp_size_t size)  
 #else  
 mpn_dump (ptr, size)  
      mp_srcptr ptr;  
      mp_size_t size;  
 #endif  
 {  {
   MPN_NORMALIZE (ptr, size);    MPN_NORMALIZE (ptr, n);
   
   if (size == 0)    if (n == 0)
     printf ("0\n");      printf ("0\n");
   else    else
     {      {
       size--;        n--;
       if (BYTES_PER_MP_LIMB > sizeof (long))  #if _LONG_LONG_LIMB
         if ((ptr[n] >> GMP_LIMB_BITS / 2) != 0)
         {          {
           if ((ptr[size] >> BITS_PER_MP_LIMB/2) != 0)            printf ("%lX", (unsigned long) (ptr[n] >> GMP_LIMB_BITS / 2));
             {            printf ("%0*lX", (GMP_LIMB_BITS / 2 / 4), (unsigned long) ptr[n]);
               printf ("%lX",  
                       (unsigned long) (ptr[size] >> BITS_PER_MP_LIMB/2));  
               printf ("%0*lX", (int) (BYTES_PER_MP_LIMB),  
                       (unsigned long) ptr[size]);  
             }  
           else  
             printf ("%lX", (unsigned long) ptr[size]);  
         }          }
       else        else
         printf ("%lX", ptr[size]);  #endif
           printf ("%lX", (unsigned long) ptr[n]);
   
       while (size)        while (n)
         {          {
           size--;            n--;
           if (BYTES_PER_MP_LIMB > sizeof (long))  #if _LONG_LONG_LIMB
             {            printf ("%0*lX", (GMP_NUMB_BITS - GMP_LIMB_BITS / 2) / 4,
               printf ("%0*lX", (int) (BYTES_PER_MP_LIMB),                    (unsigned long) (ptr[n] >> GMP_LIMB_BITS / 2));
                 (unsigned long) (ptr[size] >> BITS_PER_MP_LIMB/2));            printf ("%0*lX", GMP_LIMB_BITS / 2 / 4, (unsigned long) ptr[n]);
               printf ("%0*lX", (int) (BYTES_PER_MP_LIMB),  #else
                 (unsigned long) ptr[size]);            printf ("%0*lX", GMP_NUMB_BITS / 4, (unsigned long) ptr[n]);
             }  #endif
           else  
             printf ("%0*lX", (int) (2 * BYTES_PER_MP_LIMB), ptr[size]);  
         }          }
       printf ("\n");        printf ("\n");
     }      }
 }  }
   
   #else
   
   static void
   mpn_recdump (mp_ptr p, mp_size_t n)
   {
     mp_limb_t lo;
     if (n != 0)
       {
         lo = p[0] & 0xf;
         mpn_rshift (p, p, n, 4);
         mpn_recdump (p, n);
         printf ("%lX", lo);
       }
   }
   
   void
   mpn_dump (mp_srcptr p, mp_size_t n)
   {
     mp_ptr tp;
     TMP_DECL (marker);
     TMP_MARK (marker);
     tp = TMP_ALLOC_LIMBS (n);
     MPN_COPY (tp, p, n);
     TMP_FREE (marker);
   }
   
   #endif
Legend:
Removed from v.1.1.1.2  
changed lines
  Added in v.1.1.1.3
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>