Added failing test

This commit is contained in:
Jack Hodgkinson 2022-02-14 12:11:34 +00:00
parent e55168fce8
commit 4cc3a5f792
3 changed files with 10 additions and 1 deletions

View file

@ -86,6 +86,7 @@ common test-deps
, quickcheck-instances
, tagged
, tasty
, tasty-hunit
, utf8-string
--------------------------------------------------------------------------------

View file

@ -2,3 +2,5 @@ cradle:
cabal:
- path: "./src"
component: "lib:agora"
- path: "./test"
component: "test:agora-test"

View file

@ -5,8 +5,14 @@ import Prelude
--------------------------------------------------------------------------------
import Test.Tasty (defaultMain, testGroup)
import Test.Tasty.HUnit (assertBool, testCase)
--------------------------------------------------------------------------------
main :: IO ()
main = defaultMain $ testGroup "Suites" []
main =
defaultMain $
testGroup
"Suites"
[ testCase "will fail" $ assertBool "false" False
]