git.iko.soy/rel8
on master help sign in
Drop some coverage conditions from tests (#89)

These are just making tests flaky. For now, they are removed. In the future we should make these tests more likely to have full coverage. Fixes #86.

commit6950d691ba00a75a37faa39ac6ceecbba3ed65a6 authorOllie Charles <oliver.charles@circuithub.com> dateTue 29 Jun 2021, 17:55 (5 years ago) parent18a414a
1 file changed−6
compare with master
unifiedsplit
tests/Main.hs−6
tests/Main.hs−6
@@ -473,9 +473,6 @@ testDBEq getTestDatabase = testGroup "DBEq instances"
473473 [res] <- liftIO $ Rel8.select connection $ pure $ Rel8.litExpr x Rel8.==. Rel8.litExpr y
474474 res === (x == y)
475475
476− cover 1 "Equal" $ x == y
477− cover 1 "Not Equal" $ x /= y
478−
479476
480477testTableEquality :: IO TmpPostgres.DB -> TestTree
481478testTableEquality = databasePropertyTest "TestTable equality" \transaction -> do
@@ -487,9 +484,6 @@ testTableEquality = databasePropertyTest "TestTable equality" \transaction -> do
487484
488485 eq === (x == y)
489486
490− cover 1 "Equal" $ x == y
491− cover 1 "Not Equal" $ x /= y
492−
493487
494488testFromString :: IO TmpPostgres.DB -> TestTree
495489testFromString = databasePropertyTest "FromString" \transaction -> do