17 lines
285 B
Haskell
17 lines
285 B
Haskell
|
import Golden.Real
|
||
|
|
import Specs.Megaparsec
|
||
|
|
|
||
|
|
import Test.Tasty
|
||
|
|
import Test.Tasty.Hspec
|
||
|
|
|
||
|
|
|
||
|
|
main :: IO ()
|
||
|
|
main = do
|
||
|
|
ms <- testSpec "megaparsec spec" megaparsecSpec
|
||
|
|
gs <- goldenTests
|
||
|
|
defaultMain (tests [ms, gs])
|
||
|
|
|
||
|
|
tests :: [TestTree] -> TestTree
|
||
|
|
tests ts = testGroup "Tests" (ts++[])
|
||
|
|
|