Edit

kc3-lang/libtommath/bn_mp_clamp.c

Branch :

  • Show log

    Commit

  • Author : Tom St Denis
    Date : 2007-04-18 09:58:18
    Hash : 333aebc8
    Message : added libtommath-0.41

  • bn_mp_clamp.c
  • #include <tommath.h>
    #ifdef BN_MP_CLAMP_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
     */
    
    /* trim unused digits 
     *
     * This is used to ensure that leading zero digits are
     * trimed and the leading "used" digit will be non-zero
     * Typically very fast.  Also fixes the sign if there
     * are no more leading digits
     */
    void
    mp_clamp (mp_int * a)
    {
      /* decrease used while the most significant digit is
       * zero.
       */
      while (a->used > 0 && a->dp[a->used - 1] == 0) {
        --(a->used);
      }
    
      /* reset the sign flag if used == 0 */
      if (a->used == 0) {
        a->sign = MP_ZPOS;
      }
    }
    #endif
    
    /* $Source$ */
    /* $Revision$ */
    /* $Date$ */