From: Luke Lau Date: Tue, 13 Nov 2018 20:35:49 +0000 (+0000) Subject: Fix 8.0.2 builds X-Git-Tag: 0.5.0.1 X-Git-Url: http://git.lukelau.me/?p=lsp-test.git;a=commitdiff_plain;h=2ddc33759433fc19185140227a232a2cf8017de9 Fix 8.0.2 builds --- diff --git a/lsp-test.cabal b/lsp-test.cabal index 319cc8a..00e16ae 100644 --- a/lsp-test.cabal +++ b/lsp-test.cabal @@ -1,5 +1,5 @@ name: lsp-test -version: 0.5.0.0 +version: 0.5.0.1 synopsis: Functional test framework for LSP servers. description: A test framework for writing tests against diff --git a/src/Language/Haskell/LSP/Test/Compat.hs b/src/Language/Haskell/LSP/Test/Compat.hs index f616331..9467a32 100644 --- a/src/Language/Haskell/LSP/Test/Compat.hs +++ b/src/Language/Haskell/LSP/Test/Compat.hs @@ -36,7 +36,11 @@ getProcessID p = fromIntegral . fromJust <$> getProcessID' p #if MIN_VERSION_process(1,6,3) getProcessID' = System.Process.getPid #else +#if MIN_VERSION_process(1,6,0) getProcessID' (ProcessHandle mh _ _) = do +#else + getProcessID' (ProcessHandle mh _) = do +#endif p_ <- readMVar mh case p_ of #ifdef mingw32_HOST_OS