mirror of
https://github.com/polysemy-research/polysemy.git
synced 2024-12-12 13:06:18 +03:00
33 lines
613 B
Haskell
33 lines
613 B
Haskell
|
{-# LANGUAGE CPP #-}
|
||
|
|
|
||
|
|
module DoctestSpec where
|
||
|
|
|
||
|
|
import Test.Hspec
|
||
|
|
import Test.DocTest
|
||
|
|
|
||
|
|
spec :: Spec
|
||
|
|
spec = parallel $ describe "Error messages" $ it "should pass the doctest" $ doctest
|
||
|
|
[ "--fast"
|
||
|
|
, "-fobject-code"
|
||
|
|
, "-XDataKinds"
|
||
|
|
, "-XDeriveFunctor"
|
||
|
|
, "-XFlexibleContexts"
|
||
|
|
, "-XGADTs"
|
||
|
|
, "-XLambdaCase"
|
||
|
|
, "-XPolyKinds"
|
||
|
|
, "-XRankNTypes"
|
||
|
|
, "-XScopedTypeVariables"
|
||
|
|
, "-XStandaloneDeriving"
|
||
|
|
, "-XTypeApplications"
|
||
|
|
, "-XTypeFamilies"
|
||
|
|
, "-XTypeOperators"
|
||
|
|
, "-XUnicodeSyntax"
|
||
|
|
|
||
|
|
#if __GLASGOW_HASKELL__ < 806
|
||
|
|
, "-XMonadFailDesugaring"
|
||
|
|
, "-XTypeInType"
|
||
|
|
#endif
|
||
|
|
|
||
|
|
, "test/TypeErrors.hs"
|
||
|
|
]
|