diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-03-14 12:08:07 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-03-14 12:08:07 (GMT) |
commit | fac003f85aeba679d1cc6bea4eb8a84fc0ebd9f0 (patch) | |
tree | 9a4dfb92b8e6611111c7e8fe06f7767b18b9e695 /libtommath/bn_mp_shrink.c | |
parent | b7a189417b38e35bb825490a1b9a15fc8d138333 (diff) | |
download | tcl-fac003f85aeba679d1cc6bea4eb8a84fc0ebd9f0.zip tcl-fac003f85aeba679d1cc6bea4eb8a84fc0ebd9f0.tar.gz tcl-fac003f85aeba679d1cc6bea4eb8a84fc0ebd9f0.tar.bz2 |
Import of tommath 0.42.0
Diffstat (limited to 'libtommath/bn_mp_shrink.c')
-rw-r--r-- | libtommath/bn_mp_shrink.c | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/libtommath/bn_mp_shrink.c b/libtommath/bn_mp_shrink.c index 4b8c5ef..2bee381 100644 --- a/libtommath/bn_mp_shrink.c +++ b/libtommath/bn_mp_shrink.c @@ -19,17 +19,22 @@ int mp_shrink (mp_int * a) { mp_digit *tmp; - if (a->alloc != a->used && a->used > 0) { - if ((tmp = OPT_CAST(mp_digit) XREALLOC (a->dp, sizeof (mp_digit) * a->used)) == NULL) { + 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 = a->used; + a->alloc = used; } return MP_OKAY; } #endif -/* $Source: /cvs/libtom/libtommath/bn_mp_shrink.c,v $ */ -/* $Revision: 1.4 $ */ -/* $Date: 2006/12/28 01:25:13 $ */ +/* $Source$ */ +/* $Revision: v0.42.0 $ */ +/* $Date: 2010-06-02 15:09:36 +0200 $ */ |