summaryrefslogtreecommitdiffstats
path: root/libtommath/bn_fast_s_mp_mul_high_digs.c
diff options
context:
space:
mode:
authorKevin B Kenny <kennykb@acm.org>2005-04-10 23:54:55 (GMT)
committerKevin B Kenny <kennykb@acm.org>2005-04-10 23:54:55 (GMT)
commit9c989aeec930a9251ba5eddc6a81898a5c91ee0e (patch)
tree8809a65920a763a8894572aee81a71eeff4b2c82 /libtommath/bn_fast_s_mp_mul_high_digs.c
parent2168824a1ddf134001dd68311befeb7d58dddd38 (diff)
downloadtcl-9c989aeec930a9251ba5eddc6a81898a5c91ee0e.zip
tcl-9c989aeec930a9251ba5eddc6a81898a5c91ee0e.tar.gz
tcl-9c989aeec930a9251ba5eddc6a81898a5c91ee0e.tar.bz2
Import of tommath 0.35
Diffstat (limited to 'libtommath/bn_fast_s_mp_mul_high_digs.c')
-rw-r--r--libtommath/bn_fast_s_mp_mul_high_digs.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/libtommath/bn_fast_s_mp_mul_high_digs.c b/libtommath/bn_fast_s_mp_mul_high_digs.c
index 064a9dd..ee657f9 100644
--- a/libtommath/bn_fast_s_mp_mul_high_digs.c
+++ b/libtommath/bn_fast_s_mp_mul_high_digs.c
@@ -24,8 +24,7 @@
*
* Based on Algorithm 14.12 on pp.595 of HAC.
*/
-int
-fast_s_mp_mul_high_digs (mp_int * a, mp_int * b, mp_int * c, int digs)
+int fast_s_mp_mul_high_digs (mp_int * a, mp_int * b, mp_int * c, int digs)
{
int olduse, res, pa, ix, iz;
mp_digit W[MP_WARRAY];
@@ -72,7 +71,7 @@ fast_s_mp_mul_high_digs (mp_int * a, mp_int * b, mp_int * c, int digs)
}
/* store final carry */
- W[ix] = _W;
+ W[ix] = (mp_digit)(_W & MP_MASK);
/* setup dest */
olduse = c->used;