hpc-coveralls-0.8.1: test/TestHpcCoverallsLix.hs

{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_GHC -fno-warn-type-defaults #-}

module TestHpcCoverallsLix where

import Test.HUnit
import Trace.Hpc.Coveralls.Lix
import Trace.Hpc.Coveralls.Types

testToHit = "toHit" ~: [
    Irrelevant @=? toHit [],
    None       @=? toHit [False],
    None       @=? toHit [False, False],
    Partial    @=? toHit [False, True],
    Partial    @=? toHit [True, False],
    Partial    @=? toHit [False, False, True],
    Partial    @=? toHit [False, True, False],
    Partial    @=? toHit [True, False, False],
    Full       @=? toHit [True],
    Full       @=? toHit [True, True]]

testLix = "Lix" ~: [testToHit]