Mercurial > hg > xemacs-beta

diff src/fns.c @ 5935:d5eb0914ca1f cygwin

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
trial of E1 and UE1
author Henry Thompson <ht@markup.co.uk>
date Sat, 12 Dec 2015 21:49:31 +0000
parents e2fae7783046
children
line wrap: on
line diff
--- a/src/fns.c	Sat Dec 12 19:08:46 2015 +0000
+++ b/src/fns.c	Sat Dec 12 21:49:31 2015 +0000
@@ -98,7 +98,7 @@
 	 it's possible to get a quotient larger than limit; discarding
 	 these values eliminates the bias that would otherwise appear
 	 when using a large limit.  */
-      denominator = ((EMACS_UINT)1 << FIXNUM_VALBITS) / XFIXNUM (limit);
+      denominator = (UE1 << FIXNUM_VALBITS) / XFIXNUM (limit);
       do
 	val = get_random () / denominator;
       while (val >= XFIXNUM (limit));