mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

(byte-optimize-form-code-walker):

Browse source 
Walk into the body of lambdas after byte-compile-unfold-lambda.
This commit is contained in:
Stefan Monnier 2008-03-03 03:38:21 +00:00
parent 9f014775c4
commit 42521cd491
2 changed files with 8 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2008-03-03 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/byte-opt.el (byte-optimize-form-code-walker):
Walk into the body of lambdas after byte-compile-unfold-lambda.
2008-03-03 Glenn Morris <rgm@gnu.org>
* emulation/viper-util.el (viper-frame-value): Prefer buffer-local

4
lisp/emacs-lisp/byte-opt.el
View file

@ -383,7 +383,9 @@
form))
((or (byte-code-function-p fn)
(eq 'lambda (car-safe fn)))
(byte-compile-unfold-lambda form))
(byte-optimize-form-code-walker
(byte-compile-unfold-lambda form)
for-effect))
((memq fn '(let let*))
;; recursively enter the optimizer for the bindings and body
;; of a let or let*. This for depth-firstness: forms that