From: Mark Oteiza <mvoteiza@udel.edu>
Date: Sun, 3 Jul 2016 22:53:39 +0000 (-0400)
Subject: * lisp/simple.el (save-mark-and-excursion): Add declare forms.
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/ca1b9b38dcf372b09028acf088f386ef09f2de84

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

diff --git a/lisp/simple.el b/lisp/simple.el
index bc3e7b83b8..0da70976ed 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