1module Main (main) where 2 3import System.Environment 4 5import Test.Hspec.Discover.Run (run) 6 7main :: IO () 8main = getArgs >>= run 9