mirror of
https://github.com/barrucadu/dejafu.git
synced 2024-12-30 00:52:37 +03:00
11 lines
250 B
Haskell
11 lines
250 B
Haskell
module Main (main) where
|
|
|
|
import Control.Monad.Conc.SCT.Tests (doTests')
|
|
import Tests.Cases
|
|
import System.Exit (exitFailure, exitSuccess)
|
|
|
|
main :: IO ()
|
|
main = do
|
|
success <- doTests' id True testCases
|
|
if success then exitSuccess else exitFailure
|