diff options
| author | Tom Tromey | 2018-08-09 13:21:45 -0600 |
|---|---|---|
| committer | Tom Tromey | 2018-08-09 13:28:37 -0600 |
| commit | f822a2516d88eeb2118fbbc8554f155e86dfd74e (patch) | |
| tree | 061d1fc09449a94c1ec0364057388529b1a4c49a /src/data.c | |
| parent | f966753727741883c5d81a288ce5c20cebe3bad0 (diff) | |
| download | emacs-f822a2516d88eeb2118fbbc8554f155e86dfd74e.tar.gz emacs-f822a2516d88eeb2118fbbc8554f155e86dfd74e.zip | |
Use mpz_sgn rather than comparisons against 0
* src/data.c (Fmod): Use mpz_sgn.
* src/lisp.h (NATNUMP): Use mpz_sgn.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c index 6512e7e6706..7d701fde0e2 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -3251,8 +3251,8 @@ Both X and Y must be numbers or markers. */) | |||
| 3251 | mpz_mod (result, *xmp, *ymp); | 3251 | mpz_mod (result, *xmp, *ymp); |
| 3252 | 3252 | ||
| 3253 | /* Fix the sign if needed. */ | 3253 | /* Fix the sign if needed. */ |
| 3254 | cmpr = mpz_cmp_si (result, 0); | 3254 | cmpr = mpz_sgn (result); |
| 3255 | cmpy = mpz_cmp_si (*ymp, 0); | 3255 | cmpy = mpz_sgn (*ymp); |
| 3256 | if (cmpy < 0 ? cmpr > 0 : cmpr < 0) | 3256 | if (cmpy < 0 ? cmpr > 0 : cmpr < 0) |
| 3257 | mpz_add (result, result, *ymp); | 3257 | mpz_add (result, result, *ymp); |
| 3258 | 3258 | ||