projects
/
lsp-test.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
0708f1e
)
Fix dodgy merge
author
Luke Lau
<luke_lau@icloud.com>
Wed, 14 Oct 2020 16:26:54 +0000
(17:26 +0100)
committer
Luke Lau
<luke_lau@icloud.com>
Wed, 14 Oct 2020 17:32:58 +0000
(18:32 +0100)
src/Language/LSP/Test/Session.hs
patch
|
blob
|
history
diff --git
a/src/Language/LSP/Test/Session.hs
b/src/Language/LSP/Test/Session.hs
index 5839a15619a18963296a35d632a1f4233a95944c..6a6cf15a5a484d90a10a4da50217ab277b5d6c5f 100644
(file)
--- a/
src/Language/LSP/Test/Session.hs
+++ b/
src/Language/LSP/Test/Session.hs
@@
-274,7
+274,10
@@
runSession' serverIn serverOut mServerProc serverHandler config caps rootDir exi
let cleanup
| Just sp <- mServerProc = do
-- Give the server some time to exit cleanly
+ -- It makes the server hangs in windows so we have to avoid it
+#ifndef mingw32_HOST_OS
timeout msgTimeoutMs (waitForProcess sp)
+#endif
cleanupProcess (Just serverIn, Just serverOut, Nothing, sp)
| otherwise = pure ()
finally (timeout msgTimeoutMs (runSession' exitServer))