polysemy-chronos-0.1.3.0: test/Main.hs

module Main where

import Polysemy.Chronos.ChronosTimeTest (test_chronosTime, test_chronosTimeAt)
import Polysemy.Test (unitTest)
import Test.Tasty (TestTree, defaultMain, testGroup)

tests :: TestTree
tests =
  testGroup "unit" [
    unitTest "chronos time" test_chronosTime,
    unitTest "chronos time at specified instant" test_chronosTimeAt
  ]

main :: IO ()
main =
  defaultMain tests