stream->generator

1 files changed, 32 insertions, 32 deletions

diff --git a/test/suite11.janet b/test/suite11.janet
index a292e18..7a887f8 100644
--- a/test/suite11.janet
+++ b/test/suite11.janet
@@ -1,70 +1,70 @@
 (use ../spork/test)
 (import ../spork/ev-utils :as eu)
-(import ../spork/streams :as streams)
+(import ../spork/generators :as generators)
 
 (start-suite 11)
 
-(defn- stream-assert!
+(defn- generator-assert!
   [s]
   (assert (fiber? s))
   (assert (= :new (fiber/status s))))
 
-(def s (streams/from-iterable [1 2 3]))
-(stream-assert! s)
+(def s (generators/from-iterable [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[1 2 3] (values s)))
 
-(def s (streams/from-iterable @[1 2 3]))
-(stream-assert! s)
+(def s (generators/from-iterable @[1 2 3]))
+(generator-assert! s)
 (assert (deep= @[1 2 3] (values s)))
 
-(def s (streams/from-iterable @[1 2 3]))
-(def s2 (streams/from-iterable s))
-(stream-assert! s)
+(def s (generators/from-iterable @[1 2 3]))
+(def s2 (generators/from-iterable s))
+(generator-assert! s)
 (assert (deep= @[1 2 3] (values s2)))
 
-(def s (streams/range 1 10))
-(stream-assert! s)
+(def s (generators/range 1 10))
+(generator-assert! s)
 (assert (deep= @[1 2 3 4 5 6 7 8 9] (values s)))
 
-(def s (streams/concat [1] @[2] (streams/from-iterable [3 4 5])))
-(stream-assert! s)
+(def s (generators/concat [1] @[2] (generators/from-iterable [3 4 5])))
+(generator-assert! s)
 (assert (deep= @[1 2 3 4 5] (values s)))
 
-(def s (streams/map inc [1 2 3]))
-(stream-assert! s)
+(def s (generators/map inc [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[2 3 4] (values s)))
 
-(def s (streams/filter odd? [1 2 3]))
-(stream-assert! s)
+(def s (generators/filter odd? [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[1 3] (values s)))
 
-(def s (streams/take 2 [1 2 3]))
-(stream-assert! s)
+(def s (generators/take 2 [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[1 2] (values s)))
 
-(def s (streams/take-while odd? [1 2 3]))
-(stream-assert! s)
+(def s (generators/take-while odd? [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[1] (values s)))
 
-(def s (streams/take-until even? [1 2 3]))
-(stream-assert! s)
+(def s (generators/take-until even? [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[1] (values s)))
 
-(def s (streams/drop 1 [1 2 3]))
-(stream-assert! s)
+(def s (generators/drop 1 [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[2 3] (values s)))
 
-(def s (streams/drop-while odd? [1 2 3]))
-(stream-assert! s)
+(def s (generators/drop-while odd? [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[2 3] (values s)))
 
-(def s (streams/drop-until even? [1 2 3]))
-(stream-assert! s)
+(def s (generators/drop-until even? [1 2 3]))
+(generator-assert! s)
 (assert (deep= @[2 3] (values s)))
 
-(def s (streams/cycle [1 2 3]))
-(stream-assert! s)
-(def taken (streams/take 10 s))
+(def s (generators/cycle [1 2 3]))
+(generator-assert! s)
+(def taken (generators/take 10 s))
 (assert (deep= @[1 2 3 1 2 3 1 2 3 1] (values taken)))
 
 (end-suite)