This commit is contained in:
Efim Poberezkin 2022-02-15 16:03:33 +04:00
parent 60119eef62
commit 8122167c4f
2 changed files with 3 additions and 3 deletions

View File

@ -43,8 +43,8 @@ opts :: ChatOpts
opts =
ChatOpts
{ dbFilePrefix = undefined,
-- smp://Ufcpyx7utrV45fUopHVvKh4NECi5Z3Fa1TyL4L7tGgc=@smp7.simplex.im
smpServers = ["smp://LcJUMfVhwD8yxjAiSaDzzGF3-kLG4Uh0Fl_ZIjrRwjI=@localhost:5001"],
smpServers = ["smp://Ufcpyx7utrV45fUopHVvKh4NECi5Z3Fa1TyL4L7tGgc=@smp7.simplex.im"],
-- smpServers = ["smp://LcJUMfVhwD8yxjAiSaDzzGF3-kLG4Uh0Fl_ZIjrRwjI=@localhost:5001"],
logging = False
}

View File

@ -80,7 +80,7 @@ testStressServer =
connectUsers alice bob
loop alice bob sentTVar 0
)
(take 1 ([1 ..] :: [Int]))
(take 100 ([1 ..] :: [Int]))
where
loop :: TestCC -> TestCC -> TVar Int -> Int -> IO ()
loop alice bob sentTVar k = do