Skip to content

Commit

Permalink
[#500] Trails: Add test working notes.
Browse files Browse the repository at this point in the history
  • Loading branch information
a-stacey committed Jul 29, 2019
1 parent fbcf086 commit 77d8afd
Showing 1 changed file with 9 additions and 0 deletions.
9 changes: 9 additions & 0 deletions projects/trails/test/Mirza/Trails/Tests/Client.hs
Original file line number Diff line number Diff line change
Expand Up @@ -20,6 +20,15 @@ import Data.Either (isRight)
-- === Trails Servant Client tests
clientSpec :: IO TestTree
clientSpec = do
-- Test trail head node.
-- Test forked trail (1 into 2).
-- Test joined trail (2 into 1).
-- Test that invalid signature fails.
-- Test that invalid version fails.
-- Test that timestamp in the future is invalid.
-- Test when trying to add an entry where the parent isn't stored in the service fails.


let healthTests = testCaseSteps "Provides health status" $ \step ->
bracket runTrailsApp (\(a,b) -> endWaiApp (a,b)) $ \(_tid, baseurl) -> do
let http = runClient baseurl
Expand Down

0 comments on commit 77d8afd

Please sign in to comment.