Commit a23643ee authored by Iustin Pop's avatar Iustin Pop
Browse files

Fix bug in the Luxi client-server test



We didn't close the server correctly, so for test sizes bigger than
the max-open-files ulimit, the tests were failing in accept().
Signed-off-by: default avatarIustin Pop <iustin@google.com>
Reviewed-by: default avatarAgata Murawska <agatamurawska@google.com>
parent 12e8358c
...@@ -1931,7 +1931,7 @@ prop_Luxi_ClientServer dnschars = monadicIO $ do ...@@ -1931,7 +1931,7 @@ prop_Luxi_ClientServer dnschars = monadicIO $ do
_ <- run . forkIO $ _ <- run . forkIO $
bracket bracket
(Luxi.acceptClient server) (Luxi.acceptClient server)
(\c -> Luxi.closeClient c >> removeFile fpath) (\c -> Luxi.closeClient c >> Luxi.closeServer fpath server)
luxiServerPong luxiServerPong
replies <- run $ replies <- run $
bracket bracket
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment