mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2024-12-17 17:20:21 +01:00
Efim Poberezkin
17 lines
406 B
Haskell
17 lines
406 B
Haskell
module Main where
|
|
|
|
import Simplex.StressTest
|
|
import System.Directory
|
|
import Test.Hspec
|
|
import Control.Monad
|
|
import System.IO
|
|
|
|
main :: IO ()
|
|
main = do
|
|
hSetBuffering stdout LineBuffering
|
|
hSetBuffering stderr LineBuffering
|
|
dirExists <- doesDirectoryExist "test"
|
|
when dirExists $ removeDirectoryRecursive "test"
|
|
createDirectoryIfMissing True "test"
|
|
hspec $ describe "SimpleX chat client" chatTests
|