master 79762ff: Mark string-search as being side effect free

[Lars Ingebrigtsen]

branch: master
commit 79762ffa618ba0f0b8b4483c1cca8ccb1aab2606
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Mark string-search as being side effect free
    
    * lisp/emacs-lisp/byte-opt.el (side-effect-free-fns): Add
    string-search.
---
 lisp/emacs-lisp/byte-opt.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 4987596..2c95c87 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