diff options
author | Alan Mackenzie <acm@muc.de> | 2024-10-10 16:39:54 +0000 |
---|---|---|
committer | Alan Mackenzie <acm@muc.de> | 2024-10-10 16:39:54 +0000 |
commit | 42393b9883777732fd29ed4b43110a1e89bba3a2 (patch) | |
tree | ac8b2ee6b9efaba0312c16fa4024bb01a504aa1c /lisp/emacs-lisp | |
parent | 1d137b69040866c3251fc30762299d307ddfc830 (diff) | |
download | emacs-42393b9883777732fd29ed4b43110a1e89bba3a2.tar.gz emacs-42393b9883777732fd29ed4b43110a1e89bba3a2.tar.bz2 emacs-42393b9883777732fd29ed4b43110a1e89bba3a2.zip |
Add an edebug spec for macroexp--with-extended-form-stack
* lisp/emacs-lisp/macroexp.el
(macroexp--with-extended-form-stack): Add the edebug spec
(sexp body).
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/macroexp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index 4524eccc7ef..053db927b67 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -41,7 +41,8 @@ This is to preserve the data in it in the event of a (defmacro macroexp--with-extended-form-stack (expr &rest body) "Evaluate BODY with EXPR pushed onto `byte-compile-form-stack'." - (declare (indent 1)) + (declare (indent 1) + (debug (sexp body))) `(let ((byte-compile-form-stack (cons ,expr byte-compile-form-stack))) ,@body)) |