From: Mattias Engdegård <mattiase@acm.org>
Date: Wed, 22 Feb 2023 13:13:07 +0000 (+0100)
Subject: Declare `indirect-function` to be side-effect-free and error-free
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=170b419df0db761de4120e7e86d80bc430249015;p=emacs.git

Declare `indirect-function` to be side-effect-free and error-free

* lisp/emacs-lisp/byte-opt.el (side-effect-and-error-free-fns):
Add `indirect-function` which is now error-free.
---

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index a9630b6f7c2..456ec06a141 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1711,7 +1711,7 @@ See Info node `(elisp) Integer Basics'."
 	 eobp eolp eq equal
 	 floatp following-char framep
 	 hash-table-p
-	 identity integerp integer-or-marker-p
+	 identity indirect-function integerp integer-or-marker-p
 	 invocation-directory invocation-name
 	 keymapp keywordp
 	 list listp