Initial test framework.

Signed-off-by: Nick Waywood <n.waywood@gmail.com>

Author: Nick Waywood

package.yaml

@@ -82,3 +82,5 @@ tests:
       - -with-rtsopts=-N
     dependencies:
       - fabric-chaincode-haskell
+      - tasty
+      - tasty-hunit

test/Spec.hs

@@ -1,2 +1,17 @@
+import           Test.Tasty
+import           Test.Tasty.HUnit
+
+import           Stub
+
 main :: IO ()
-main = putStrLn "Test suite not yet implemented"
+main = defaultMain tests
+
+tests :: TestTree
+tests = testGroup "Tests" [stubUnitTests]
+
+stubUnitTests :: TestTree
+stubUnitTests = testGroup "Stub Unit Tests" [getState]
+
+getTxId :: TestTree
+getState = testCase "getState" $ [1, 2, 3] `compare` [1, 2] @?= GT
+    -- where stub =