Edit

kc3-lang/libtommath/bn_mp_shrink.c

Branch :

  • Show log

    Commit

  • Author : Steffen Jaeckel
    Date : 2010-06-02 15:09:36
    Hash : 7d14fd02
    Message : + allow mp_shrink to shrink initialized, but empty MPI's

  • bn_mp_shrink.c
  • #include <tommath.h>
    #ifdef BN_MP_SHRINK_C
    /* LibTomMath, multiple-precision integer library -- Tom St Denis
     *
     * LibTomMath is a library that provides multiple-precision
     * integer arithmetic as well as number theoretic functionality.
     *
     * The library was designed directly after the MPI library by
     * Michael Fromberger but has been written from scratch with
     * additional optimizations in place.
     *
     * The library is free for all purposes without any express
     * guarantee it works.
     *
     * Tom St Denis, tomstdenis@gmail.com, http://libtom.org
     */
    
    /* shrink a bignum */
    int mp_shrink (mp_int * a)
    {
      mp_digit *tmp;
      int used = 1;
      
      if(a->used > 0)
        used = a->used;
      
      if (a->alloc != used) {
        if ((tmp = OPT_CAST(mp_digit) XREALLOC (a->dp, sizeof (mp_digit) * used)) == NULL) {
          return MP_MEM;
        }
        a->dp    = tmp;
        a->alloc = used;
      }
      return MP_OKAY;
    }
    #endif
    
    /* $Source$ */
    /* $Revision$ */
    /* $Date$ */