; Update scope.el tests

diff --git a/test/lisp/emacs-lisp/scope-tests.el b/test/lisp/emacs-lisp/scope-tests.el
index 4258c3f8b4dfbe1661428c0f6dbd219ce4e9c51c..a85aee30033716a5f36f6911980982d2639e5f9a 100644 (file)
--- a/test/lisp/emacs-lisp/scope-tests.el
+++ b/test/lisp/emacs-lisp/scope-tests.el
@@ -37,6 +37,7 @@
     (when (and bar spam baz)
       (ignore bar baz)))
   (ignore baz))" '((2 5 nil)
+                   (8 3 nil)
                    (13 3 13)
                    (17 3 17)
                    (25 4 nil)
@@ -68,6 +69,7 @@
           (dolist (op ops)
             (push be (alist-get op op-be-alist)))))))
     op-be-alist))" '((2 5 nil)
+                     (8 17 nil)
                      (104 3 nil)
                      (110 11 110)
                      (133 16 nil)
@@ -99,6 +101,7 @@
        (pcase-dolist (`(,k . ,v) ,env) (push k ,syms) (push v ,vals))
        (cl-progv ,syms ,vals
          ,@body))))" '((2 8 nil)
+                       (11 32 nil)
                        (45 3 45)
                        (55 4 55)
                        (130 3 nil)