pipes-attoparsec-0.2.0.0: tests/Main.hs

module Main (main) where

import Test.Framework (defaultMain, testGroup)
import Test.Framework.Providers.QuickCheck2 (testProperty)
import Test.Framework.Providers.HUnit (testCase)
import Test.HUnit

import qualified Test.Attoparsec

main = defaultMain tests

tests =
    [ testGroup "Sample."   sampleTests
    , testGroup "Attoparsec." Test.Attoparsec.tests
    ]

sampleTests = [ testProperty "QuickCheck" $ \x -> const True (x :: Int) == True
              , testCase     "HUnit"      $ True @?= True
              ]