summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/generator-tests.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2025-02-22 19:14:51 +0100
committerStefan Kangas <stefankangas@gmail.com>2025-02-23 00:38:22 +0100
commit042dc5929b706b5fbc0ea8ada6014661d44a1b53 (patch)
tree56a6912abd934f2b540f414d4b84ceaad9f7fccd /test/lisp/emacs-lisp/generator-tests.el
parent9d7d4db7eb3398e754872f4c82d3d2071ae10fb2 (diff)
downloademacs-042dc5929b706b5fbc0ea8ada6014661d44a1b53.tar.gz
emacs-042dc5929b706b5fbc0ea8ada6014661d44a1b53.tar.bz2
emacs-042dc5929b706b5fbc0ea8ada6014661d44a1b53.zip
Prefer incf to cl-incf in tests
* test/lisp/emacs-lisp/bytecomp-tests.el (bytecomp-reify-function): * test/lisp/emacs-lisp/cl-extra-tests.el (cl-getf): * test/lisp/emacs-lisp/cl-macs-tests.el (cl-macs-loop-for-as-arith-order-side-effects) (cl-macs-loop-for-as-equals-then, cl-macs-loop-do, cl-macs-loop-finally) (cl-macs-loop-in-ref, cl-macs-loop-being-elements-of-ref) (cl-macs-test--symbol-macrolet, cl-the): * test/lisp/emacs-lisp/cl-seq-tests.el (cl-lib-test-remove) (cl-lib-test-remove-if-not): * test/lisp/emacs-lisp/edebug-resources/edebug-test-code.el (edebug-test-code-range): * test/lisp/emacs-lisp/edebug-tests.el (edebug-tests-deduplicate): * test/lisp/emacs-lisp/generator-tests.el (cps-while-incf): (cps-test-iter-cleanup-once-only): * test/lisp/emacs-lisp/hierarchy-tests.el (hierarchy-labelfn-button-if-does-not-button-unless-condition) (hierarchy-labelfn-button-if-does-button-when-condition): * test/lisp/emacs-lisp/let-alist-tests.el (let-alist-evaluate-once): * test/lisp/emacs-lisp/lisp-mode-tests.el (indent-sexp, lisp-indent-region): * test/lisp/emacs-lisp/map-tests.el (test-map-elt-gv) (test-setf-map-with-function): * test/lisp/emacs-lisp/multisession-tests.el (multi-test-sqlite-simple) (multi-test-sqlite-busy, multi-test-files-simple) (multi-test-files-busy): * test/lisp/emacs-lisp/oclosure-tests.el (oclosure-test, oclosure-test-mutate): * test/lisp/emacs-lisp/track-changes-tests.el (track-changes-tests--random): * test/lisp/files-tests.el (files-tests--with-buffer-offer-save): * test/lisp/net/shr-tests.el (shr-test/zoom-image): * test/lisp/replace-tests.el (replace-tests-with-undo): * test/src/buffer-tests.el (test-overlay-randomly): * test/src/data-tests.el (test-bool-vector-bv-from-hex-string): * test/src/fns-tests.el (fns-tests-sort): * test/src/json-tests.el (json-insert/signal, json-insert/throw): * test/src/minibuf-tests.el (minibuf-tests--strings-to-symbol-alist) (minibuf-tests--strings-to-string-alist) (minibuf-tests--strings-to-string-hashtable) (minibuf-tests--strings-to-symbol-hashtable): * test/src/process-tests.el (make-process/file-handler/found): Prefer incf to cl-incf.
Diffstat (limited to 'test/lisp/emacs-lisp/generator-tests.el')
-rw-r--r--test/lisp/emacs-lisp/generator-tests.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/generator-tests.el b/test/lisp/emacs-lisp/generator-tests.el
index 773619d8f03..01d2f978909 100644
--- a/test/lisp/emacs-lisp/generator-tests.el
+++ b/test/lisp/emacs-lisp/generator-tests.el
@@ -113,7 +113,7 @@ identical output."
(cps-testcase cps-while-incf
(let* ((i 0) (j 10))
(while (< i 10)
- (cl-incf i)
+ (incf i)
(setf j (+ j (* i 10))))
j))
@@ -273,7 +273,7 @@ identical output."
(iter-yield 1)
(error "Test")
(iter-yield 2))
- (cl-incf nr-unwound))))))
+ (incf nr-unwound))))))
(should (equal (iter-next iter) 1))
(should-error (iter-next iter))
(should (equal nr-unwound 1))))