mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-28 19:42:02 +00:00
generator-tests.el: make cps-test-iter-cleanup-once-only work
* test/automated/generator-tests.el (cps-test-iter-cleanup-once-only): Replace undefined incf with cl-incf.
This commit is contained in:
parent
15ddf7a6f2
commit
88f8a9d7d8
@ -9,8 +9,8 @@
|
||||
|
||||
2015-03-03 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* automated/generator-tests.el (cps-while-incf):
|
||||
Replace undefined incf with cl-incf.
|
||||
* automated/generator-tests.el (cps-while-incf)
|
||||
(cps-test-iter-cleanup-once-only): Replace undefined incf with cl-incf.
|
||||
(cps-test-iter-do): Use should not undefined assert.
|
||||
|
||||
2015-03-03 Daniel Colascione <dancol@dancol.org>
|
||||
|
@ -283,7 +283,7 @@ identical output.
|
||||
(iter-yield 1)
|
||||
(error "test")
|
||||
(iter-yield 2))
|
||||
(incf nr-unwound))))))
|
||||
(cl-incf nr-unwound))))))
|
||||
(should (equal (iter-next iter) 1))
|
||||
(should-error (iter-next iter))
|
||||
(should (equal nr-unwound 1))))
|
||||
|
Loading…
Reference in New Issue
Block a user