slowcat test

2026-07-13 06:19:33 -04:00 · 2022-01-26 12:44:15 +00:00
parent fc542861e8
commit c924057c56
1 changed files with 6 additions and 0 deletions
@@ -109,4 +109,10 @@ describe('Pattern', function() {
      assert.deepStrictEqual(fastcat([pure("a"), pure("b")]).firstCycle.map(x => x.value), ["a", "b"])
    })
  })
+  describe('slowcat()', function () {
+    it('Can concatenate things slowly', function () {
+      assert.deepStrictEqual(slowcat([pure("a"), pure("b")]).firstCycle.map(x => x.value), ["a"])
+      assert.deepStrictEqual(slowcat([pure("a"), pure("b")])._early(1).firstCycle.map(x => x.value), ["b"])
+    })
+  })
 })