diff options
Diffstat (limited to 'stdlib/source/test/lux/data/collection/stream.lux')
-rw-r--r-- | stdlib/source/test/lux/data/collection/stream.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/data/collection/stream.lux b/stdlib/source/test/lux/data/collection/stream.lux index df001ce0e..f14f53131 100644 --- a/stdlib/source/test/lux/data/collection/stream.lux +++ b/stdlib/source/test/lux/data/collection/stream.lux @@ -26,7 +26,7 @@ (All (_ a) (-> (Equivalence a) (Equivalence (/.Stream a)))) (implementation (def (= reference subject) - (at (list.equivalence super) = + (of (list.equivalence super) = (/.first 100 reference) (/.first 100 subject))))) @@ -46,9 +46,9 @@ (let [(open "list#[0]") (list.equivalence n.equivalence)]) (do [! random.monad] [repeated random.nat - index (at ! each (n.% 100) random.nat) - size (at ! each (|>> (n.% 10) ++) random.nat) - offset (at ! each (n.% 100) random.nat) + index (of ! each (n.% 100) random.nat) + size (of ! each (|>> (n.% 10) ++) random.nat) + offset (of ! each (n.% 100) random.nat) cycle_start random.nat cycle_next (random.list size random.nat)] (all _.and |