[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 1f02ae3: Mark some functions as pure
From: |
Mark Oteiza |
Subject: |
[Emacs-diffs] master 1f02ae3: Mark some functions as pure |
Date: |
Wed, 27 Sep 2017 16:33:25 -0400 (EDT) |
branch: master
commit 1f02ae39310f15bf683642b9aee1cf162bd391e6
Author: Mark Oteiza <address@hidden>
Commit: Mark Oteiza <address@hidden>
Mark some functions as pure
* lisp/emacs-lisp/byte-opt.el: Add some functions that return integral
values to the builtin list of pure functions.
---
lisp/emacs-lisp/byte-opt.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 69f03c5..623985f 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1281,7 +1281,10 @@
;; errors to compile time.
(let ((pure-fns
- '(concat symbol-name regexp-opt regexp-quote string-to-syntax)))
+ '(concat symbol-name regexp-opt regexp-quote string-to-syntax
+ string-to-char
+ ash lsh logb lognot logior logxor
+ ceiling floor)))
(while pure-fns
(put (car pure-fns) 'pure t)
(setq pure-fns (cdr pure-fns)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 1f02ae3: Mark some functions as pure,
Mark Oteiza <=