Mercurial > hg > xemacs-beta
diff lisp/ChangeLog @ 5502:5b08be74bb53
Be better about recognising side-effect-free forms, byte-optimize.el.
2011-05-07 Aidan Kehoe <kehoea@parhasard.net>
* byte-optimize.el:
* byte-optimize.el (byte-optimize-form-code-walker):
Call #'byte-optimize-side-effect-free-p on the form, rather than
just checking the plist of the form's car.
* byte-optimize.el (side-effect-free-fns):
Move the CL functions into their alphabetical place in the list.
* byte-optimize.el (function):
* byte-optimize.el (byte-optimize-side-effect-free-p): New.
Function returning non-nil if a funcall has no side-effects, which
handles things like (remove* item list :key 'car) and
(remove-if-not #'integerp list).
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Sat, 07 May 2011 11:45:20 +0100 |
| parents | 4813ff11c6e2 |
| children | 7b5946dbfb96 |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri May 06 10:37:14 2011 +0100 +++ b/lisp/ChangeLog Sat May 07 11:45:20 2011 +0100 @@ -1,3 +1,17 @@ +2011-05-07 Aidan Kehoe <kehoea@parhasard.net> + + * byte-optimize.el: + * byte-optimize.el (byte-optimize-form-code-walker): + Call #'byte-optimize-side-effect-free-p on the form, rather than + just checking the plist of the form's car. + * byte-optimize.el (side-effect-free-fns): + Move the CL functions into their alphabetical place in the list. + * byte-optimize.el (function): + * byte-optimize.el (byte-optimize-side-effect-free-p): New. + Function returning non-nil if a funcall has no side-effects, which + handles things like (remove* item list :key 'car) and + (remove-if-not #'integerp list). + 2011-05-06 Aidan Kehoe <kehoea@parhasard.net> * cl-macs.el (most-positive-fixnum-on-32-bit-machines):