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

(byte-compile-lambda): Test of byte-compile-compatibility was backwards.

Browse source
This commit is contained in:
Richard M. Stallman 1993-02-17 20:29:57 +00:00
parent 8290babd65
commit b890df1a7a
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1681,9 +1681,10 @@ If FORM is a lambda or a macro, byte-compile it as a function."
(byte-compile-warn "malformed interactive spec: %s"
(prin1-to-string int))))))
(let ((compiled (byte-compile-top-level (cons 'progn body) nil 'lambda)))
(setq foo compiled)
(if (and (eq 'byte-code (car-safe compiled))
(byte-compile-version-cond
byte-compile-compatibility))
(not (byte-compile-version-cond
byte-compile-compatibility)))
(apply 'make-byte-code
(append (list arglist)
;; byte-string, constants-vector, stack depth