summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAlan Mackenzie <acm@muc.de>2024-10-10 16:39:54 +0000
committerAlan Mackenzie <acm@muc.de>2024-10-10 16:39:54 +0000
commit42393b9883777732fd29ed4b43110a1e89bba3a2 (patch)
treeac8b2ee6b9efaba0312c16fa4024bb01a504aa1c /lisp/emacs-lisp
parent1d137b69040866c3251fc30762299d307ddfc830 (diff)
downloademacs-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.el3
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))