summaryrefslogtreecommitdiffstats
path: root/libtommath/bn_mp_shrink.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-03-14 12:08:07 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-03-14 12:08:07 (GMT)
commitfac003f85aeba679d1cc6bea4eb8a84fc0ebd9f0 (patch)
tree9a4dfb92b8e6611111c7e8fe06f7767b18b9e695 /libtommath/bn_mp_shrink.c
parentb7a189417b38e35bb825490a1b9a15fc8d138333 (diff)
downloadtcl-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.c17
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 $ */