summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-09-25 14:30:13 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2020-09-25 14:30:13 +0200
commit79762ffa618ba0f0b8b4483c1cca8ccb1aab2606 (patch)
tree3e5af8444a6407ba764762de9bded487beb2b0fa /lisp/emacs-lisp
parent9fd9c9c2c00a95640b32b63dc20041ec6d512f0b (diff)
downloademacs-79762ffa618ba0f0b8b4483c1cca8ccb1aab2606.tar.gz
emacs-79762ffa618ba0f0b8b4483c1cca8ccb1aab2606.tar.bz2
emacs-79762ffa618ba0f0b8b4483c1cca8ccb1aab2606.zip
Mark string-search as being side effect free
* lisp/emacs-lisp/byte-opt.el (side-effect-free-fns): Add string-search.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/byte-opt.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 4987596bf95..2c95c870606 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1173,7 +1173,8 @@
degrees-to-radians
radians-to-degrees rassq rassoc read-from-string regexp-quote
region-beginning region-end reverse round
- sin sqrt string string< string= string-equal string-lessp string-to-char
+ sin sqrt string string< string= string-equal string-lessp
+ string-search string-to-char
string-to-number substring
sxhash sxhash-equal sxhash-eq sxhash-eql
symbol-function symbol-name symbol-plist symbol-value string-make-unibyte