mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30: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

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