th-lock-0.0.4: test/Tests/Language/Haskell/TH/Lock/ModuleY.hs

module Tests.Language.Haskell.TH.Lock.ModuleY where

import Language.Haskell.TH.Lock
import Test.Tasty.HUnit ((@=?))
import Tests.Language.Haskell.TH.Lock.State

ensureSerialCompilationVerbose

set "Y"

unit_check_state :: IO ()
unit_check_state = "Y" @=? $(get)