diff --git a/test/pattern.test.mjs b/test/pattern.test.mjs index f6e0d545..ddb2e981 100644 --- a/test/pattern.test.mjs +++ b/test/pattern.test.mjs @@ -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"]) + }) + }) }) \ No newline at end of file