From bb567e339a81c8b6d5bd24774c0da8c8402847de Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Sun, 9 Apr 2023 10:45:43 +0200 Subject: [PATCH] * lisp/emacs-lisp/cl-extra.el (cl-parse-integer): side-effect-free. --- lisp/emacs-lisp/cl-extra.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/emacs-lisp/cl-extra.el b/lisp/emacs-lisp/cl-extra.el index de5eb9c2d92..e1c8ebe2559 100644 --- a/lisp/emacs-lisp/cl-extra.el +++ b/lisp/emacs-lisp/cl-extra.el @@ -408,6 +408,7 @@ Other non-digit chars are considered junk. RADIX is an integer between 2 and 36, the default is 10. Signal an error if the substring between START and END cannot be parsed as an integer unless JUNK-ALLOWED is non-nil." + (declare (side-effect-free t)) (cl-check-type string string) (let* ((start (or start 0)) (len (length string)) -- 2.39.2