diff options
| author | Paul Eggert | 2017-07-14 02:47:30 -0700 |
|---|---|---|
| committer | Paul Eggert | 2017-07-14 02:47:48 -0700 |
| commit | 6443a95ad74d54b8be5ba85af9b893f3f1d5fa02 (patch) | |
| tree | 12b6ef36ed18d218b571a3fce7ee48a582e97372 | |
| parent | 05c7c8278eba6faf8c4fcf89f4bb7912f36fdc12 (diff) | |
| download | emacs-6443a95ad74d54b8be5ba85af9b893f3f1d5fa02.tar.gz emacs-6443a95ad74d54b8be5ba85af9b893f3f1d5fa02.zip | |
Remove duplicate cl--random-state definition
* lisp/emacs-lisp/cl-lib.el (cl--random-state): Remove.
This variable is now defined in cl-extra.el (Bug#27617).
| -rw-r--r-- | lisp/emacs-lisp/cl-lib.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/cl-lib.el b/lisp/emacs-lisp/cl-lib.el index 936c852526c..3c9c6223018 100644 --- a/lisp/emacs-lisp/cl-lib.el +++ b/lisp/emacs-lisp/cl-lib.el | |||
| @@ -293,9 +293,6 @@ If true return the decimal value of digit CHAR in RADIX." | |||
| 293 | (while (>= (cl-decf i) 0) (setq v (+ (* v 3) (aref time i)))) | 293 | (while (>= (cl-decf i) 0) (setq v (+ (* v 3) (aref time i)))) |
| 294 | v)) | 294 | v)) |
| 295 | 295 | ||
| 296 | (defvar cl--random-state | ||
| 297 | (vector 'cl--random-state-tag -1 30 (cl--random-time))) | ||
| 298 | |||
| 299 | (defconst cl-most-positive-float nil | 296 | (defconst cl-most-positive-float nil |
| 300 | "The largest value that a Lisp float can hold. | 297 | "The largest value that a Lisp float can hold. |
| 301 | If your system supports infinities, this is the largest finite value. | 298 | If your system supports infinities, this is the largest finite value. |