Popularity
3.3
Declining
Activity
0.1
-
3
2
1

Monthly Downloads: 16
Programming language: Haskell
License: BSD 3-clause "New" or "Revised" License
Tags: Testing     Tasty    
Latest version: v0.2.0.1

tasty-travis alternatives and similar packages

Based on the "tasty" category.
Alternatively, view tasty-travis alternatives based on common mentions on social networks and blogs.

Do you think we are missing an alternative of tasty-travis or a related project?

Add another 'tasty' Package

README

Tasty Travis: Fancy Travis CI output for tasty tests

BSD3 Hackage hackage-ci Build Status

Tasty Travis provides fancy Tasty test output on Travis CI.

It allows you get coloured test output, folding and collapsing groups of tests, and hiding the output of successful tests.

Example

Here's what an example test.hs might look:

import Data.List
import Data.Ord
import Data.Tagged (Tagged)
import Data.Typeable (Typeable)
import Options.Applicative (switch, long, help)

import Test.Tasty
import Test.Tasty.Options
import Test.Tasty.Travis (travisTestReporter, defaultConfig)
import Test.Tasty.HUnit

newtype EnableTravis = EnableTravis Bool
  deriving (Eq, Ord, Typeable)

instance IsOption EnableTravis where
  defaultValue = EnableTravis False
  parseValue = fmap EnableTravis . safeRead
  optionName = return "enable-travis"
  optionHelp = return "Run Travis tests."
  optionCLParser =
    fmap EnableTravis $
    switch
      (  long (untag (optionName :: Tagged EnableTravis String))
      <> help (untag (optionHelp :: Tagged EnableTravis String))
      )

main = travisTestReporter cfg [] tests
  where
    cfg = defaultConfig { travisTestOptions = setOption (EnableTravis True) }

tests :: TestTree
tests = testGroup "Unit tests"
  [ testCase "List comparison (different length)" $
      [1, 2, 3] `compare` [1,2] @?= GT

  -- the following test does not hold
  , testCase "List comparison (same length)" $
      [1, 2, 3] `compare` [1,2,2] @?= LT
  , askOption $ \(EnableTravis enable) ->
    if enable then travisTests else testGroup "" []
  ]

travisTests :: TestTree
travisTests = testGroup "Travis" [ {- Travis tests here -} ]


*Note that all licence references and agreements mentioned in the tasty-travis README section above are relevant to that project's source code only.