summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2021-04-21 17:27:14 +0200
committerMattias EngdegÄrd <mattiase@acm.org>2021-04-21 22:52:17 +0200
commita7cc19e5ff0425289616135ab6b4674baf02c12b (patch)
tree190865e00587fbc6fa31c99059972fcebb18fef6 /lisp/emacs-lisp
parent8c83231dae0f4701c2a6ddf140df13fe028b3612 (diff)
downloademacs-a7cc19e5ff0425289616135ab6b4674baf02c12b.tar.gz
emacs-a7cc19e5ff0425289616135ab6b4674baf02c12b.tar.bz2
emacs-a7cc19e5ff0425289616135ab6b4674baf02c12b.zip
Don't erroneously declare `mark` as error-free
* lisp/emacs-lisp/byte-opt.el (side-effect-free-fns) (side-effect-and-error-free-fns): `mark` is side-effect-free but not error-free.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/byte-opt.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index e5265375314..43e9395967a 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1324,7 +1324,7 @@ Same format as `byte-optimize--lexvars', with shared structure and contents.")
line-beginning-position line-end-position
local-variable-if-set-p local-variable-p locale-info
log log10 logand logb logcount logior lognot logxor lsh
- make-byte-code make-list make-string make-symbol marker-buffer max
+ make-byte-code make-list make-string make-symbol mark marker-buffer max
member memq memql min minibuffer-selected-window minibuffer-window
mod multibyte-char-to-unibyte next-window nth nthcdr number-to-string
parse-colon-path plist-get plist-member
@@ -1374,7 +1374,7 @@ Same format as `byte-optimize--lexvars', with shared structure and contents.")
invocation-directory invocation-name
keymapp keywordp
list listp
- make-marker mark mark-marker markerp max-char
+ make-marker mark-marker markerp max-char
memory-limit
mouse-movement-p
natnump nlistp not null number-or-marker-p numberp