-- | Runs the test suite for the replay library
main :: IO ()
main = do
  results <- return [True]
  if and results
    then return ()
    else exitFailure
main :: IO ()
main = do
  results <- return [True]
  if and results
    then return ()
    else exitFailure
main = do
  results <- return [True]
  if and results
    then return ()
    else exitFailure