polysemy-time-0.1.0.0: test/Main.hs

module Main where

import Polysemy.Test (unitTest)
import Polysemy.Time.GhcTimeTest (test_ghcTime, test_ghcTimeAt)
import Test.Tasty (TestTree, defaultMain, testGroup)

tests :: TestTree
tests =
  testGroup "unit" [
    unitTest "ghc time" test_ghcTime,
    unitTest "ghc time at instant" test_ghcTimeAt
  ]

main :: IO ()
main =
  defaultMain tests