diff options
Diffstat (limited to 'lisp/emacs-lisp/cl-extra.el')
-rw-r--r-- | lisp/emacs-lisp/cl-extra.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-extra.el b/lisp/emacs-lisp/cl-extra.el index 3840d13ecff..499d26b737b 100644 --- a/lisp/emacs-lisp/cl-extra.el +++ b/lisp/emacs-lisp/cl-extra.el @@ -336,7 +336,7 @@ non-nil value. ;;;###autoload (defun cl-isqrt (x) - "Return the integer square root of the (integer) argument." + "Return the integer square root of the (integer) argument X." (if (and (integerp x) (> x 0)) (let ((g (ash 2 (/ (logb x) 2))) g2) @@ -455,7 +455,7 @@ as an integer unless JUNK-ALLOWED is non-nil." ;;;###autoload (defun cl-random (lim &optional state) - "Return a random nonnegative number less than LIM, an integer or float. + "Return a pseudo-random nonnegative number less than LIM, an integer or float. Optional second arg STATE is a random-state object." (or state (setq state cl--random-state)) ;; Inspired by "ran3" from Numerical Recipes. Additive congruential method. |