aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/data.c b/src/data.c
index 66f69e7e83a..1e97d9efa15 100644
--- a/src/data.c
+++ b/src/data.c
@@ -2407,7 +2407,7 @@ static void
2407emacs_mpz_mul (mpz_t rop, mpz_t const op1, mpz_t const op2) 2407emacs_mpz_mul (mpz_t rop, mpz_t const op1, mpz_t const op2)
2408{ 2408{
2409 if (NLIMBS_LIMIT - emacs_mpz_size (op1) < emacs_mpz_size (op2)) 2409 if (NLIMBS_LIMIT - emacs_mpz_size (op1) < emacs_mpz_size (op2))
2410 range_error (); 2410 overflow_error ();
2411 mpz_mul (rop, op1, op2); 2411 mpz_mul (rop, op1, op2);
2412} 2412}
2413 2413
@@ -2421,7 +2421,7 @@ emacs_mpz_mul_2exp (mpz_t rop, mpz_t const op1, mp_bitcnt_t op2)
2421 2421
2422 mp_bitcnt_t op2limbs = op2 / GMP_NUMB_BITS; 2422 mp_bitcnt_t op2limbs = op2 / GMP_NUMB_BITS;
2423 if (lim - emacs_mpz_size (op1) < op2limbs) 2423 if (lim - emacs_mpz_size (op1) < op2limbs)
2424 range_error (); 2424 overflow_error ();
2425 mpz_mul_2exp (rop, op1, op2); 2425 mpz_mul_2exp (rop, op1, op2);
2426} 2426}
2427 2427
@@ -2435,7 +2435,7 @@ emacs_mpz_pow_ui (mpz_t rop, mpz_t const base, unsigned long exp)
2435 2435
2436 int nbase = emacs_mpz_size (base), n; 2436 int nbase = emacs_mpz_size (base), n;
2437 if (INT_MULTIPLY_WRAPV (nbase, exp, &n) || lim < n) 2437 if (INT_MULTIPLY_WRAPV (nbase, exp, &n) || lim < n)
2438 range_error (); 2438 overflow_error ();
2439 mpz_pow_ui (rop, base, exp); 2439 mpz_pow_ui (rop, base, exp);
2440} 2440}
2441 2441
@@ -3292,7 +3292,7 @@ expt_integer (Lisp_Object x, Lisp_Object y)
3292 && mpz_fits_ulong_p (XBIGNUM (y)->value)) 3292 && mpz_fits_ulong_p (XBIGNUM (y)->value))
3293 exp = mpz_get_ui (XBIGNUM (y)->value); 3293 exp = mpz_get_ui (XBIGNUM (y)->value);
3294 else 3294 else
3295 range_error (); 3295 overflow_error ();
3296 3296
3297 emacs_mpz_pow_ui (mpz[0], *bignum_integer (&mpz[0], x), exp); 3297 emacs_mpz_pow_ui (mpz[0], *bignum_integer (&mpz[0], x), exp);
3298 return make_integer_mpz (); 3298 return make_integer_mpz ();