test/doctests.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

module Main
  ( main
  ) where

import Build_doctests (flags, module_sources, pkgs)
import Data.Foldable (traverse_)
import Test.DocTest (doctest)

main :: IO ()
main = do
  traverse_ putStrLn args
  doctest args
  where
    args = flags ++ pkgs ++ module_sources