th-lock-0.0.4: test/Driver.hs

module Driver where

import qualified Discovery
import Test.Tasty

main :: IO ()
main = defaultMain =<< testTree
  where
    testTree :: IO TestTree
    testTree = do
      tests <- Discovery.tests
      pure $ testGroup "haddock-use-refs" [ tests ]