X-Git-Url: http://git.lukelau.me/?a=blobdiff_plain;f=src%2FLanguage%2FHaskell%2FLSP%2FTest.hs;h=2e0926a58539581e2053cc14d4fff750e8424f3f;hb=88c70a40654c7152fb50b2a4e171fbdc00324f51;hp=068fc2dd0a3cbc17e9da1b98b0f92c5238263f5b;hpb=3081abf6552222c5dfc7928d4c708dd03015548e;p=lsp-test.git diff --git a/src/Language/Haskell/LSP/Test.hs b/src/Language/Haskell/LSP/Test.hs index 068fc2d..2e0926a 100644 --- a/src/Language/Haskell/LSP/Test.hs +++ b/src/Language/Haskell/LSP/Test.hs @@ -28,35 +28,26 @@ module Language.Haskell.LSP.Test , response , notification , loggingNotification + , publishDiagnosticsNotification -- * Combinators , choice , option , optional - , skipOptional , between , some , many , sepBy , sepBy1 - , sepByNonEmpty , sepEndBy1 - , sepEndByNonEmpty , sepEndBy , endBy1 - , endByNonEmpty , endBy , count - , chainl - , chainr - , chainl1 - , chainr1 , manyTill - , try - , () , skipMany , skipSome - , unexpected - , notFollowedBy + , skipManyTill + , skipSomeTill , (<|>) , satisfy -- * Utilities @@ -66,6 +57,7 @@ module Language.Haskell.LSP.Test ) where import Control.Applicative +import Control.Applicative.Combinators import Control.Monad import Control.Monad.IO.Class import Control.Concurrent @@ -86,7 +78,6 @@ import System.Directory import System.FilePath import Language.Haskell.LSP.Test.Decoding import Language.Haskell.LSP.Test.Parsing -import Text.Parser.Combinators -- | Starts a new session. runSession :: FilePath -- ^ The filepath to the root directory for the session.