Added failing test
This commit is contained in:
parent
e55168fce8
commit
4cc3a5f792
3 changed files with 10 additions and 1 deletions
|
|
@ -86,6 +86,7 @@ common test-deps
|
|||
, quickcheck-instances
|
||||
, tagged
|
||||
, tasty
|
||||
, tasty-hunit
|
||||
, utf8-string
|
||||
|
||||
--------------------------------------------------------------------------------
|
||||
|
|
|
|||
2
hie.yaml
2
hie.yaml
|
|
@ -2,3 +2,5 @@ cradle:
|
|||
cabal:
|
||||
- path: "./src"
|
||||
component: "lib:agora"
|
||||
- path: "./test"
|
||||
component: "test:agora-test"
|
||||
|
|
|
|||
|
|
@ -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
|
||||
]
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue