procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix single function compilation

Browse source
This commit is contained in:
Andrea Corallo 2019-11-23 17:03:08 +01:00
parent d901221e2b
commit a421c27723
2 changed files with 31 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/emacs-lisp/bytecomp.el
View file

@ -3147,9 +3147,8 @@ for symbols generated by the byte compiler itself."
byte-compile-vector byte-compile-maxdepth)))
(when byte-native-compiling
;; Spill LAP for the native compiler here
(when byte-compile-current-form
(push (cons byte-compile-current-form byte-compile-output)
byte-to-native-lap)))
(push (cons byte-compile-current-form byte-compile-output)
byte-to-native-lap))
out))
;; it's a trivial function
((cdr body) (cons 'progn (nreverse body)))