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).

(cherry picked from commit 42393b9883777732fd29ed4b43110a1e89bba3a2)

diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el
index 3b0b3093781702d80e1767fe4624743800d3bac6..fbfcde587694bdf391ec1c9ea7d7b473a376e91f 100644 (file)
--- 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))