From 2ddc33759433fc19185140227a232a2cf8017de9 Mon Sep 17 00:00:00 2001 From: Luke Lau Date: Tue, 13 Nov 2018 20:35:49 +0000 Subject: [PATCH] Fix 8.0.2 builds --- lsp-test.cabal | 2 +- src/Language/Haskell/LSP/Test/Compat.hs | 4 ++++ 2 files changed, 5 insertions(+), 1 deletion(-) 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 -- 2.30.2