diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2023-04-09 10:45:43 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2023-04-09 10:45:43 +0200 |
| commit | bb567e339a81c8b6d5bd24774c0da8c8402847de (patch) | |
| tree | d6d0167bb3a225a92af42c391129207b13dcab39 /lisp | |
| parent | 48ecbccaa3244183f58c5140f09b0b8eebdf65c9 (diff) | |
| download | emacs-bb567e339a81c8b6d5bd24774c0da8c8402847de.tar.gz | |
* lisp/emacs-lisp/cl-extra.el (cl-parse-integer): side-effect-free.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-extra.el | 1 |
1 files changed, 1 insertions, 0 deletions
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)) |