summaryrefslogtreecommitdiff
path: root/gmp-glue.c
diff options
context:
space:
mode:
Diffstat (limited to 'gmp-glue.c')
-rw-r--r--gmp-glue.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/gmp-glue.c b/gmp-glue.c
index 85b6beda..b468699b 100644
--- a/gmp-glue.c
+++ b/gmp-glue.c
@@ -111,7 +111,10 @@ mpz_roinit_n (mpz_ptr x, const mp_limb_t *xp, mp_size_t xs)
int
mpz_limbs_cmp (mpz_srcptr a, const mp_limb_t *bp, mp_size_t bn)
{
- mp_size_t an = SIZ (a);
+ mp_size_t an = mpz_size (a);
+ assert (mpz_sgn (a) >= 0);
+ assert (bn >= 0);
+
if (an < bn)
return -1;
if (an > bn)
@@ -119,7 +122,7 @@ mpz_limbs_cmp (mpz_srcptr a, const mp_limb_t *bp, mp_size_t bn)
if (an == 0)
return 0;
- return mpn_cmp (PTR(a), bp, an);
+ return mpn_cmp (mpz_limbs_read(a), bp, an);
}
/* Get a pointer to an n limb area, for read-only operation. n must be