[Emacs-diffs] emacs-26 78e9065: * lisp/emacs-lisp/generator.el (iter-do): Add a debug declaration.

[Eli Zaretskii]

branch: emacs-26
commit 78e9065e9f090ea9c10f89495eab9f8069597b74
Author: Paul Pogonyshev <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    * lisp/emacs-lisp/generator.el (iter-do): Add a debug declaration.
---
 lisp/emacs-lisp/generator.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/generator.el b/lisp/emacs-lisp/generator.el
index 410e4ed..ef6cfba 100644
--- a/lisp/emacs-lisp/generator.el
+++ b/lisp/emacs-lisp/generator.el
@@ -718,7 +718,8 @@ is blocked."
   "Loop over values from an iterator.
 Evaluate BODY with VAR bound to each value from ITERATOR.
 Return the value with which ITERATOR finished iteration."
-  (declare (indent 1))
+  (declare (indent 1)
+           (debug ((symbolp form) body)))
   (let ((done-symbol (cps--gensym "iter-do-iterator-done"))
         (condition-symbol (cps--gensym "iter-do-condition"))
         (it-symbol (cps--gensym "iter-do-iterator"))