diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2006-12-01 00:08:10 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2006-12-01 00:08:10 (GMT) |
| commit | b62b2d6ee4170b8d2cff9e546d67cc24e0c782c6 (patch) | |
| tree | 2f22fd1447d75b67bdecc3491f0720d0058a1cff /libtommath/bn_fast_s_mp_mul_digs.c | |
| parent | 32dabb168bc76e93bb522c8de30e3023df038a0f (diff) | |
| download | tcl-b62b2d6ee4170b8d2cff9e546d67cc24e0c782c6.zip tcl-b62b2d6ee4170b8d2cff9e546d67cc24e0c782c6.tar.gz tcl-b62b2d6ee4170b8d2cff9e546d67cc24e0c782c6.tar.bz2 | |
Import of libtommath 0.39+
Diffstat (limited to 'libtommath/bn_fast_s_mp_mul_digs.c')
| -rw-r--r-- | libtommath/bn_fast_s_mp_mul_digs.c | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/libtommath/bn_fast_s_mp_mul_digs.c b/libtommath/bn_fast_s_mp_mul_digs.c index 0c715be..86b78b4 100644 --- a/libtommath/bn_fast_s_mp_mul_digs.c +++ b/libtommath/bn_fast_s_mp_mul_digs.c @@ -12,7 +12,7 @@ * The library is free for all purposes without any express * guarantee it works. * - * Tom St Denis, tomstdenis@iahu.ca, http://math.libtomcrypt.org + * Tom St Denis, tomstdenis@gmail.com, http://math.libtomcrypt.com */ /* Fast (comba) multiplier @@ -78,10 +78,7 @@ int fast_s_mp_mul_digs (mp_int * a, mp_int * b, mp_int * c, int digs) /* make next carry */ _W = _W >> ((mp_word)DIGIT_BIT); - } - - /* store final carry */ - W[ix] = (mp_digit)(_W & MP_MASK); + } /* setup dest */ olduse = c->used; @@ -106,5 +103,5 @@ int fast_s_mp_mul_digs (mp_int * a, mp_int * b, mp_int * c, int digs) #endif /* $Source: /root/tcl/repos-to-convert/tcl/libtommath/bn_fast_s_mp_mul_digs.c,v $ */ -/* $Revision: 1.1.1.3 $ */ -/* $Date: 2005/09/26 16:31:56 $ */ +/* $Revision: 1.1.1.4 $ */ +/* $Date: 2006/12/01 00:08:11 $ */ |