* lisp/emacs-lisp/byte-run.el (compiler-macro): Make it Edebuggable
* lisp/emacs-lisp/gv.el (gc-expander, gv-setter): Reuse the spec of `compiler-macro`.
This commit is contained in:
parent
2594162b23
commit
623e534e49
2 changed files with 6 additions and 1 deletions
|
@ -113,6 +113,9 @@ The return value of this function is not used."
|
|||
(list 'function-put (list 'quote f)
|
||||
''side-effect-free (list 'quote val))))
|
||||
|
||||
(put 'compiler-macro 'edebug-declaration-spec
|
||||
'(&or symbolp ("lambda" &define lambda-list lambda-doc def-body)))
|
||||
|
||||
(defalias 'byte-run--set-compiler-macro
|
||||
#'(lambda (f args compiler-function)
|
||||
(if (not (eq (car-safe compiler-function) 'lambda))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue