diff --git a/test/Semantic/StatSpec.hs b/test/Semantic/StatSpec.hs index 64c6a4600..4dd062770 100644 --- a/test/Semantic/StatSpec.hs +++ b/test/Semantic/StatSpec.hs @@ -6,12 +6,6 @@ import Test.Hspec.Expectations.Pretty import System.Environment import Control.Exception -setup :: String -> String -> IO () -setup = setEnv - -teardown :: String -> () -> IO () -teardown key _ = unsetEnv key - withEnvironment :: String -> String -> (() -> IO ()) -> IO () withEnvironment key value = bracket (setEnv key value) (const (unsetEnv key))