Test.hs

module Niv.Test (tests, test) where

import Niv.GitHub.Test
import Niv.Update.Test
import qualified Test.Tasty as Tasty
import qualified Test.Tasty.HUnit as Tasty

test :: IO ()
test = Tasty.defaultMain tests

tests :: Tasty.TestTree
tests = Tasty.testGroup "niv"
    [ Tasty.testGroup "update"
        [ Tasty.testCase "simply runs" simplyRuns
        , Tasty.testCase "picks first" picksFirst
        , Tasty.testCase "loads" loads
        , Tasty.testCase "survives checks" survivesChecks
        , Tasty.testCase "isn't too eager" isNotTooEager
        , Tasty.testCase "dirty forces update" dirtyForcesUpdate
        , Tasty.testCase "should run when no changes" shouldNotRunWhenNoChanges
        , Tasty.testCase "templates expand" templatesExpand
        ]
    , Tasty.testGroup "github"
        [ Tasty.testCase "inits properly" test_githubInitsProperly
        , Tasty.testCase "updates" test_githubUpdates
        , Tasty.testCase "updates once" test_githubUpdatesOnce
        , Tasty.testCase "doesn't override rev" test_githubDoesntOverrideRev
        , Tasty.testCase "falls back to URL" test_githubURLFallback
        ]
    ]