X-Git-Url: https://git.lukelau.me/?a=blobdiff_plain;ds=sidebyside;f=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FServer.hs;h=e66ed0adb9fbfbb221ec030a7590b625b0d7b46a;hb=d7dc40224e71d16d319f725556e217c0343cee18;hp=0a77a6193e6fb9c320531e65f74255576bccf8f4;hpb=0c425260af9cbf0d9991fc0453c975612901c4b4;p=lsp-test.git diff --git a/src/Language/Haskell/LSP/Test/Server.hs b/src/Language/Haskell/LSP/Test/Server.hs index 0a77a61..e66ed0a 100644 --- a/src/Language/Haskell/LSP/Test/Server.hs +++ b/src/Language/Haskell/LSP/Test/Server.hs @@ -2,8 +2,9 @@ module Language.Haskell.LSP.Test.Server (withServer) where import Control.Concurrent.Async import Control.Monad +import Language.Haskell.LSP.Test.Compat import System.IO -import System.Process +import System.Process hiding (withCreateProcess) withServer :: String -> Bool -> (Handle -> Handle -> ProcessHandle -> IO a) -> IO a withServer serverExe logStdErr f = do