* lisp/simple.el (save-mark-and-excursion): Add declare forms.

1 files changed, 1 insertions, 0 deletions

diff --git a/lisp/simple.el b/lisp/simple.el
index bc3e7b83b8d..0da70976ed5 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -5223,6 +5223,7 @@ store it in a Lisp variable.  Example:
 (defmacro save-mark-and-excursion (&rest body)
   "Like `save-excursion', but also save and restore the mark state.
 This macro does what `save-excursion' did before Emacs 25.1."
+  (declare (indent 0) (debug t))
   (let ((saved-marker-sym (make-symbol "saved-marker")))
     `(let ((,saved-marker-sym (save-mark-and-excursion--save)))
        (unwind-protect