summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/testcover-resources/testcases.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2021-11-20 12:54:48 +0100
committerStefan Kangas <stefan@marxist.se>2021-11-20 12:55:37 +0100
commita3a3d3dd074850a11ade229fc65a07aaa3e44320 (patch)
tree67bb2909c87b4e55448806ddaed0a9c5f1cd738b /test/lisp/emacs-lisp/testcover-resources/testcases.el
parent244baa550beb3ca6f6b87cf86e2dae4465a87cbd (diff)
downloademacs-a3a3d3dd074850a11ade229fc65a07aaa3e44320.tar.gz
emacs-a3a3d3dd074850a11ade229fc65a07aaa3e44320.tar.bz2
emacs-a3a3d3dd074850a11ade229fc65a07aaa3e44320.zip
Make 'eval' use lexical scoping in most tests
* test/lisp/electric-tests.el (electric-pair-define-test-form) (define-electric-pair-test): * test/lisp/emacs-lisp/backtrace-tests.el (backtrace-tests--uncompiled-functions): * test/lisp/emacs-lisp/cl-macs-tests.el (cl-macs-test--symbol-macrolet): * test/lisp/emacs-lisp/let-alist-tests.el (let-alist-list-to-sexp): * test/lisp/emacs-lisp/lisp-tests.el (elisp-tests-with-temp-buffer, core-elisp-tests-3-backquote): * test/lisp/emacs-lisp/testcover-resources/testcases.el (testcover-testcase-nth-case): * test/lisp/ffap-tests.el (ffap-ido-mode): * test/lisp/files-tests.el (file-test--do-local-variables-test): * test/lisp/net/tramp-tests.el (tramp--test-utf8): * test/lisp/progmodes/elisp-mode-tests.el (find-defs-defgeneric-eval, find-defs-defun-eval) (find-defs-defvar-eval, find-defs-face-eval) (find-defs-feature-eval): Give 'eval' non-nil LEXICAL argument. * test/lisp/subr-tests.el (subr-tests--dolist--wrong-number-of-args): * test/src/eval-tests.el (eval-tests--if-dot-string) (eval-tests--mutating-cond) (eval-tests-19790-backquote-comma-dot-substitution): Test 'eval' using LEXICAL as both nil and non-nil. (eval-tests--let-with-circular-defs): Give explicit nil to 'eval'.
Diffstat (limited to 'test/lisp/emacs-lisp/testcover-resources/testcases.el')
-rw-r--r--test/lisp/emacs-lisp/testcover-resources/testcases.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/testcover-resources/testcases.el b/test/lisp/emacs-lisp/testcover-resources/testcases.el
index 29094526d7e..4d49e5ae70c 100644
--- a/test/lisp/emacs-lisp/testcover-resources/testcases.el
+++ b/test/lisp/emacs-lisp/testcover-resources/testcases.el
@@ -424,7 +424,7 @@
(defmacro testcover-testcase-nth-case (arg vec)
(declare (indent 1)
(debug (form (vector &rest form))))
- `(eval (aref ,vec%%% ,arg%%%))%%%)
+ `(eval (aref ,vec%%% ,arg%%%) t)%%%)
(defun testcover-testcase-use-nth-case (choice val)
(testcover-testcase-nth-case choice