From: Mattias Engdegård <mattiase@acm.org>
Date: Tue, 25 Jul 2023 10:52:29 +0000 (+0200)
Subject: * lisp/emacs-lisp/byte-opt.el (pure-fns): Add `max-char`
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b4063c399be2472dfb184ac003cf85c882253e25;p=emacs.git

* lisp/emacs-lisp/byte-opt.el (pure-fns): Add `max-char`
---

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 26a1dc4a103..0be6ae65aab 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1924,7 +1924,7 @@ See Info node `(elisp) Integer Basics'."
 (let ((pure-fns
        '(
          ;; character.c
-         characterp
+         characterp max-char
          ;; data.c
          % * + - / /= 1+ 1- < <= = > >= aref arrayp ash atom bare-symbol
          bool-vector-count-consecutive bool-vector-count-population