Minor refactor
This commit is contained in:
parent
ce3e586e0c
commit
6f3855ce4b
@ -22,10 +22,11 @@ main :: IO ()
|
|||||||
main =
|
main =
|
||||||
defaultMain
|
defaultMain
|
||||||
. localOption (Always :: UseColor)
|
. localOption (Always :: UseColor)
|
||||||
$ testGroup
|
. testGroup "tests"
|
||||||
"tests"
|
$ map
|
||||||
[ puzzleTest puzzle1
|
puzzleTest
|
||||||
, puzzleTest puzzle2
|
[ puzzle1
|
||||||
|
, puzzle2
|
||||||
]
|
]
|
||||||
|
|
||||||
puzzleTest :: Puzzle -> TestTree
|
puzzleTest :: Puzzle -> TestTree
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user