From 4de97979a2b078c62065b64c84876d23ee06a449 Mon Sep 17 00:00:00 2001 From: Brian Fox Date: Tue, 21 Sep 1993 06:47:21 +0000 Subject: (side-effect-free-fns): Add "-" and "1-" to the list. --- lisp/emacs-lisp/byte-opt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index c7ab880cf60..354857e68f2 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -973,7 +973,7 @@ ;;; I wonder if I missed any :-\) (let ((side-effect-free-fns - '(% * + / /= 1+ < <= = > >= append aref ash assoc assq boundp + '(% * + - / /= 1+ 1- < <= = > >= append aref ash assoc assq boundp buffer-file-name buffer-local-variables buffer-modified-p buffer-substring capitalize car cdr concat coordinates-in-window-p copy-marker count-lines documentation downcase elt fboundp featurep -- cgit v1.2.1