aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrea Corallo2021-04-26 22:31:08 +0200
committerAndrea Corallo2021-04-26 22:32:05 +0200
commitfbfb5030129ee364d661dd2b56d7798f5cebc619 (patch)
treec2c2e5725b100f87c16130e79c6fb0a3198dfc77
parent6546ebcb97ec4a4ff1de0970c1f62a2d9f62467a (diff)
downloademacs-fbfb5030129ee364d661dd2b56d7798f5cebc619.tar.gz
emacs-fbfb5030129ee364d661dd2b56d7798f5cebc619.zip
* lisp/emacs-lisp/comp.el (comp-known-type-specifiers): Fix string-search.
-rw-r--r--lisp/emacs-lisp/comp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index eebb77d993f..1fb07c66adf 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -496,7 +496,7 @@ Useful to hook into pass checkers.")
496 (string-lessp (function ((or string symbol) (or string symbol)) boolean)) 496 (string-lessp (function ((or string symbol) (or string symbol)) boolean))
497 (string-make-multibyte (function (string) string)) 497 (string-make-multibyte (function (string) string))
498 (string-make-unibyte (function (string) string)) 498 (string-make-unibyte (function (string) string))
499 (string-search (function (string string &optional integer) integer)) 499 (string-search (function (string string &optional integer) (or integer null)))
500 (string-to-char (function (string) fixnum)) 500 (string-to-char (function (string) fixnum))
501 (string-to-multibyte (function (string) string)) 501 (string-to-multibyte (function (string) string))
502 (string-to-number (function (string &optional integer) number)) 502 (string-to-number (function (string &optional integer) number))