test(cata): add tests for non catamorphic monads

Ref #58
char0n · Apr 27, 2017 · 905dc4f · 905dc4f
1 parent 1c6fdc6
commit 905dc4f
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/test/cata.js b/test/cata.js
@@ -28,4 +28,10 @@ describe('cata', function() {
     chai.assert.throws(RA.cata.bind(null, identity, null, eitherR), TypeError);
     eq(RA.cata(null, identity, eitherR), 1);
   });
+
+  it('tests on monad without catamorphic behavior', function() {
+    chai.assert.throws(RA.cata.bind(null, identity, identity, {}), TypeError);
+    chai.assert.throws(RA.cata.bind(null, identity, identity, null), TypeError);
+    chai.assert.throws(RA.cata.bind(null, identity, identity, undefined), TypeError);
+  });
 });