From 02bd636e990e8e9cf2a20eaf4cd0e0f22acb0ab3 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Sun, 21 Feb 2021 09:49:37 -0600 Subject: version bump Added resumable generators --- gtwiwtg-test.lisp | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'gtwiwtg-test.lisp') diff --git a/gtwiwtg-test.lisp b/gtwiwtg-test.lisp index be79e23..80c3c86 100644 --- a/gtwiwtg-test.lisp +++ b/gtwiwtg-test.lisp @@ -106,6 +106,15 @@ '(#\r #\e #\e #\r #\n)) + (let ((res (make-resumable! + (concat! (seq "hello") + (indexed! (filter! 'alpha-char-p (seq "a b c 1 2 3 easy as"))))))) + (take 1 res) + (setf res (resume! res)) + (is '(#\e #\l #\l #\o (0 #\a) (1 #\b) (2 #\c) (3 #\e) (4 #\a) (5 #\s) (6 #\y) + (7 #\a) (8 #\s)) + (collect res))) + ) -- cgit v1.2.3