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

(byte-optimize-form-code-walker): Remove mocklisp case.

Browse source
This commit is contained in:
Pavel Janík 2001-12-22 13:36:59 +00:00
parent 676927b7d8
commit 5f11d42cee
1 changed files with 2 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -50,7 +50,6 @@
;; (put 'debug-on-error 'binding-is-magic t)
;; (put 'debug-on-abort 'binding-is-magic t)
;; (put 'debug-on-next-call 'binding-is-magic t)
;; (put 'mocklisp-arguments 'binding-is-magic t)
;; (put 'inhibit-quit 'binding-is-magic t)
;; (put 'quit-flag 'binding-is-magic t)
;; (put 't 'binding-is-magic t)
@ -520,9 +519,8 @@
(byte-optimize-form form for-effect))
((not (symbolp fn))
(or (eq 'mocklisp (car-safe fn)) ; ha!
(byte-compile-warn "`%s' is a malformed function"
(prin1-to-string fn)))
(byte-compile-warn "`%s' is a malformed function"
(prin1-to-string fn))
form)
((and for-effect (setq tmp (get fn 'side-effect-free))