changeset: 5311:07d24b1f27a7
user: Aidan Kehoe <kehoea(a)parhasard.net>
date: Wed Dec 29 23:25:52 2010 +0000
files: lisp/ChangeLog lisp/byte-optimize.el
description:
Mark #'remove, #'remq as free of side-effects.
2010-12-29 Aidan Kehoe <kehoea(a)parhasard.net>
* byte-optimize.el (side-effect-free-fns): #'remove, #'remq are
free of side-effects.
(side-effect-and-error-free-fns):
Drop dot, dot-marker from the list.
diff -r 317ebaee6e4f -r 07d24b1f27a7 lisp/ChangeLog
--- a/lisp/ChangeLog Wed Dec 01 03:35:22 2010 +0900
+++ b/lisp/ChangeLog Wed Dec 29 23:25:52 2010 +0000
@@ -1,3 +1,10 @@
+2010-12-29 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * byte-optimize.el (side-effect-free-fns): #'remove, #'remq are
+ free of side-effects.
+ (side-effect-and-error-free-fns):
+ Drop dot, dot-marker from the list.
+
2010-11-17 Aidan Kehoe <kehoea(a)parhasard.net>
* cl-extra.el (coerce):
diff -r 317ebaee6e4f -r 07d24b1f27a7 lisp/byte-optimize.el
--- a/lisp/byte-optimize.el Wed Dec 01 03:35:22 2010 +0900
+++ b/lisp/byte-optimize.el Wed Dec 29 23:25:52 2010 +0000
@@ -1245,7 +1245,7 @@
marker-buffer max member memq min mod
next-window nth nthcdr number-to-string numerator
parse-colon-path plist-get previous-window
- radians-to-degrees rassq regexp-quote reverse round
+ radians-to-degrees rassq rassoc remove remq regexp-quote reverse round
sin sqrt string< string= string-equal string-lessp string-to-char
string-to-int string-to-number substring symbol-plist symbol-value
symbol-name symbol-function symbol
@@ -1271,7 +1271,7 @@
current-buffer
;; XEmacs: extent functions, frame-live-p, various other stuff
devicep device-live-p
- dot dot-marker eobp eolp eq eql equal eventp extentp
+ eobp eolp eq eql equal eventp extentp
extent-live-p fixnump floatingp floatp framep frame-live-p
get-largest-window get-lru-window
hash-table-p
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches