Mercurial > hg > xemacs-beta
diff src/number.c @ 5935:d5eb0914ca1f cygwin
trial of E1 and UE1
| author | Henry Thompson <ht@markup.co.uk> |
|---|---|
| date | Sat, 12 Dec 2015 21:49:31 +0000 |
| parents | e2fae7783046 |
| children | 574f0cded429 |
line wrap: on
line diff
--- a/src/number.c Sat Dec 12 19:08:46 2015 +0000 +++ b/src/number.c Sat Dec 12 21:49:31 2015 +0000 @@ -351,7 +351,7 @@ CHECK_BIGFLOAT (f); if (FIXNUMP (precision)) { - prec = (XFIXNUM (precision) <= 0) ? (EMACS_UINT)1 : (unsigned long) XFIXNUM (precision); + prec = (XFIXNUM (precision) <= 0) ? UE1 : (EMACS_UINT) XFIXNUM (precision); } #ifdef HAVE_BIGNUM else if (BIGNUMP (precision)) @@ -519,7 +519,7 @@ #endif /* HAVE_BIGNUM */ case RATIO_T: #ifdef HAVE_RATIO - return make_ratio (XREALFIXNUM (number), (EMACS_UINT)1); + return make_ratio (XREALFIXNUM (number), UE1); #else ABORT (); #endif /* HAVE_RATIO */