1 files changed, 14 insertions, 0 deletions
diff --git a/tests/Hakyll/Core/Util/Arrow/Tests.hs b/tests/Hakyll/Core/Util/Arrow/Tests.hs
new file mode 100644
index 0000000..c0c7eaa
--- /dev/null
+++ b/tests/Hakyll/Core/Util/Arrow/Tests.hs
@@ -0,0 +1,14 @@
+module Hakyll.Core.Util.Arrow.Tests
+    ( tests
+    ) where
+
+import Test.Framework (Test)
+import Test.HUnit ((@=?))
+
+import Hakyll.Core.Util.Arrow
+import TestSuite.Util
+
+tests :: [Test]
+tests = fromAssertions "sequenceA"
+    [ [8, 20, 1] @=? sequenceA [(+ 4), (* 5), signum] (4 :: Int)
+    ]