diff options
| author | Paul Eggert | 2022-03-16 17:21:55 -0700 |
|---|---|---|
| committer | Paul Eggert | 2022-03-16 17:52:42 -0700 |
| commit | f7e0e5b7aeb928353065a3667c5231c4e4559d28 (patch) | |
| tree | c377e1a65e4b520fdcab74782c60edc418d09606 /src/buffer.c | |
| parent | 2ef037c0dd3510a51ad73fdead1ded09848166f4 (diff) | |
| download | emacs-f7e0e5b7aeb928353065a3667c5231c4e4559d28.tar.gz emacs-f7e0e5b7aeb928353065a3667c5231c4e4559d28.zip | |
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.
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 8 |
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. */) | |||
| 1159 | else | 1159 | else |
| 1160 | { | 1160 | { |
| 1161 | char number[sizeof "-999999"]; | 1161 | char number[sizeof "-999999"]; |
| 1162 | 1162 | EMACS_INT r = get_random (); | |
| 1163 | /* Use XFIXNUM instead of XFIXNAT to work around GCC bug 80776. */ | 1163 | eassume (0 <= r); |
| 1164 | int i = XFIXNUM (Frandom (make_fixnum (1000000))); | 1164 | int i = r % 1000000; |
| 1165 | eassume (0 <= i && i < 1000000); | ||
| 1166 | |||
| 1167 | AUTO_STRING_WITH_LEN (lnumber, number, sprintf (number, "-%d", i)); | 1165 | AUTO_STRING_WITH_LEN (lnumber, number, sprintf (number, "-%d", i)); |
| 1168 | genbase = concat2 (name, lnumber); | 1166 | genbase = concat2 (name, lnumber); |
| 1169 | if (NILP (Fget_buffer (genbase))) | 1167 | if (NILP (Fget_buffer (genbase))) |