From: Niels Möller <nisse@lysator.liu.se>
Date: Fri, 15 Nov 2002 08:03:26 +0000 (+0100)
Subject: (nettle_mpz_set_sexp): Use
X-Git-Tag: nettle_1.7_release_20030311~132
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d33e5b416ff979ff5263e351bb6df48e543f7f15;p=thirdparty%2Fnettle.git

(nettle_mpz_set_sexp): Use
nettle_mpz_set_str_256_s, to handle negative numbers correctly.

Rev: src/nettle/sexp2bignum.c:1.2
---

diff --git a/sexp2bignum.c b/sexp2bignum.c
index e3c8d764..69757cee 100644
--- a/sexp2bignum.c
+++ b/sexp2bignum.c
@@ -35,12 +35,13 @@ int
 nettle_mpz_set_sexp(mpz_t x, unsigned limit, const struct sexp_iterator *i)
 {
   if (i->type == SEXP_ATOM
+      && i->atom_length
       && !i->display)
     {
       if (limit && (8 * i->atom_length > limit))
 	return 0;
       
-      nettle_mpz_set_str_256(x, i->atom_length, i->atom);
+      nettle_mpz_set_str_256_s(x, i->atom_length, i->atom);
       return !limit || mpz_sizeinbase(x, 2) <= limit;
     }
   else