projects
/
lsp-test.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add runSessionWithHandles
[lsp-test.git]
/
src
/
Language
/
Haskell
/
LSP
/
Test
/
Compat.hs
diff --git
a/src/Language/Haskell/LSP/Test/Compat.hs
b/src/Language/Haskell/LSP/Test/Compat.hs
index 883bfc9ef32e5db25a0eb22a22e204fa9cf3d512..12031c34dff77d8f44f4245feeecbf23063844bd 100644
(file)
--- a/
src/Language/Haskell/LSP/Test/Compat.hs
+++ b/
src/Language/Haskell/LSP/Test/Compat.hs
@@
-1,4
+1,4
@@
-{-# LANGUAGE CPP #-}
+{-# LANGUAGE CPP
, OverloadedStrings
#-}
-- For some reason ghc warns about not using
-- Control.Monad.IO.Class but it's needed for
-- MonadIO
-- For some reason ghc warns about not using
-- Control.Monad.IO.Class but it's needed for
-- MonadIO
@@
-7,6
+7,7
@@
module Language.Haskell.LSP.Test.Compat where
import Data.Maybe
import System.IO
import Data.Maybe
import System.IO
+import Language.Haskell.LSP.Types
#if MIN_VERSION_process(1,6,3)
-- We have to hide cleanupProcess for process-1.6.3.0
#if MIN_VERSION_process(1,6,3)
-- We have to hide cleanupProcess for process-1.6.3.0
@@
-113,3
+114,7
@@
withCreateProcess c action =
(\(m_in, m_out, m_err, ph) -> action m_in m_out m_err ph)
#endif
(\(m_in, m_out, m_err, ph) -> action m_in m_out m_err ph)
#endif
+
+
+lspTestClientInfo :: ClientInfo
+lspTestClientInfo = ClientInfo "lsp-test" (Just CURRENT_PACKAGE_VERSION)