summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2022-03-16 17:21:55 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2022-03-16 17:52:42 -0700
commitf7e0e5b7aeb928353065a3667c5231c4e4559d28 (patch)
treec377e1a65e4b520fdcab74782c60edc418d09606
parent2ef037c0dd3510a51ad73fdead1ded09848166f4 (diff)
downloademacs-f7e0e5b7aeb928353065a3667c5231c4e4559d28.tar.gz
Simplify generate-new-buffer-name randomness
* src/buffer.c (Fgenerate_new_buffer_name): Simplify by calling get_random instead of Frandom; that’s random enough here.
-rw-r--r--src/buffer.c8
1 files changed, 3 insertions, 5 deletions
diff --git a/src/buffer.c b/src/buffer.c
index 91ff6b946f7..f8a7a4f5109 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -1159,11 +1159,9 @@ is first appended to NAME, to speed up finding a non-existent buffer. */)
else
{
char number[sizeof "-999999"];
-
- /* Use XFIXNUM instead of XFIXNAT to work around GCC bug 80776. */
- int i = XFIXNUM (Frandom (make_fixnum (1000000)));
- eassume (0 <= i && i < 1000000);
-
+ EMACS_INT r = get_random ();
+ eassume (0 <= r);
+ int i = r % 1000000;
AUTO_STRING_WITH_LEN (lnumber, number, sprintf (number, "-%d", i));
genbase = concat2 (name, lnumber);
if (NILP (Fget_buffer (genbase)))