mirror of https://github.com/voidlizard/hbs2
wip
This commit is contained in:
parent
8b1e3fbbfd
commit
defa1540e5
|
@ -395,7 +395,7 @@ main = do
|
|||
|
||||
fake <- newFakeP2P True <&> Fabriq
|
||||
|
||||
let (p0:ps) = [0..4] :: [Peer Fake]
|
||||
let (p0:ps) = [0..1] :: [Peer Fake]
|
||||
|
||||
-- others
|
||||
others <- forM ps $ \p -> async $ runTestPeer p $ \s cw -> do
|
||||
|
|
Loading…
Reference in New Issue