import System.FilePath.Glob (glob)
import Test.DocTest

exts :: [String]
exts =
  [ "-XDataKinds"
  , "-XKindSignatures"
  , "-XTypeFamilies"
  , "-XTypeOperators"
  , "-XUndecidableInstances"
  ]

main :: IO ()
main = do
  xs <- glob "src/**/*.hs"
  doctest (exts ++ xs)