From fe65d95041cb9ab67c853dfc7e8e34a870a5892b Mon Sep 17 00:00:00 2001 From: Earl Hyatt Date: Sat, 5 Oct 2024 21:19:18 -0400 Subject: [PATCH 5/5] Add test for delayed evaluation for seq-drop-while for streams. * tests/stream-tests.el (deftest-for-delayed-evaluation): Add a test for seq-drop-while. --- tests/stream-tests.el | 1 + 1 file changed, 1 insertion(+) diff --git a/tests/stream-tests.el b/tests/stream-tests.el index 5d3f116..defc544 100644 --- a/tests/stream-tests.el +++ b/tests/stream-tests.el @@ -321,6 +321,7 @@ (deftest-for-delayed-evaluation (stream-append (make-delayed-test-stream) (make (deftest-for-delayed-evaluation (seq-take (make-delayed-test-stream) 2)) (deftest-for-delayed-evaluation (seq-drop (make-delayed-test-stream) 2)) (deftest-for-delayed-evaluation (seq-take-while #'numberp (make-delayed-test-stream))) +(deftest-for-delayed-evaluation (seq-drop-while #'numberp (make-delayed-test-stream))) (deftest-for-delayed-evaluation (seq-map #'identity (make-delayed-test-stream))) (deftest-for-delayed-evaluation (seq-mapn #'cons (make-delayed-test-stream) -- 2.34.1