diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2021-02-28 19:02:15 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2021-02-28 20:18:43 +0100 |
| commit | f8ab343eb93741209953e0d314b7c133bee91dda (patch) | |
| tree | db84b5f5ad55d886c90024d65413bd4321164c22 /lisp/emacs-lisp/byte-opt.el | |
| parent | a286e02580cc4daf0e9edfc0086c517a1770dff4 (diff) | |
| download | emacs-f8ab343eb93741209953e0d314b7c133bee91dda.tar.gz emacs-f8ab343eb93741209953e0d314b7c133bee91dda.tar.bz2 emacs-f8ab343eb93741209953e0d314b7c133bee91dda.zip | |
Declare more string predicates as pure
* lisp/emacs-lisp/byte-opt.el (pure-fns): Treat string>,
string-greaterp, string-empty-p, string-blank-p, string-prefix-p and
string-suffix-p as pure functions in the compiler.
Diffstat (limited to 'lisp/emacs-lisp/byte-opt.el')
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 9f0ba232a4b..b51ba801552 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -1413,7 +1413,8 @@ Same format as `byte-optimize--lexvars', with shared structure and contents.") copysign isnan ldexp float logb floor ceiling round truncate ffloor fceiling fround ftruncate - string= string-equal string< string-lessp + string= string-equal string< string-lessp string> string-greaterp + string-empty-p string-blank-p string-prefix-p string-suffix-p string-search consp atom listp nlistp proper-list-p sequencep arrayp vectorp stringp bool-vector-p hash-table-p |