X-Git-Url: http://git.lukelau.me/?a=blobdiff_plain;f=README.md;h=4a8762be7cf90bf11cb298fec70e1025362aed00;hb=bf94a6e6874dc58734aa56391ce058cba870dc25;hp=b42dfcf81a7b6f4b4138e98028990b2e2a7ad3a2;hpb=41ecc7bd7a4c9c92f966562bff4bfc2adbc20cff;p=lsp-test.git diff --git a/README.md b/README.md index b42dfcf..4a8762b 100644 --- a/README.md +++ b/README.md @@ -1,2 +1,42 @@ -# haskell-lsp-test -This is the functional testing framework for [haskell-ide-engine](https://github.com/haskell/haskell-ide-engine), and potentially any other Language Server Protocol server. +# haskell-lsp-test [![Build Status](https://travis-ci.com/Bubba/haskell-lsp-test.svg?branch=master)](https://travis-ci.com/Bubba/haskell-lsp-test) +haskell-lsp-test is a functional testing framework for Language Server Protocol servers. + +```haskell +import Language.Haskell.LSP.Test +runSession "hie" fullCaps "proj/dir" $ do + doc <- openDoc "Foo.hs" "haskell" + skipMany anyNotification + symbols <- getDocumentSymbols doc +``` + +## Examples + +### Unit tests with HSpec +```haskell +describe "diagnostics" $ + it "report errors" $ runSession "hie" fullCaps "test/data" $ do + openDoc "Error.hs" "haskell" + [diag] <- waitForDiagnosticsSource "ghcmod" + liftIO $ do + diag ^. severity `shouldBe` Just DsError + diag ^. source `shouldBe` Just "ghcmod" +``` + +### Replaying captured session +```haskell +replaySession "hie --lsp" "test/data/renamePass" +``` + +### Parsing with combinators +```haskell +skipManyTill loggingNotification publishDiagnosticsNotification +count 4 (message :: Session ApplyWorkspaceEditRequest) +anyRequest <|> anyResponse +``` + +For more examples check the [Wiki](https://github.com/Bubba/haskell-lsp-test/wiki/Introduction) + +## Developing +To test make sure you have the following language servers installed: +- [haskell-ide-engine](https://github.com/haskell/haskell-ide-engine) +- [javascript-typescript-langserver](https://github.com/sourcegraph/javascript-typescript-langserver)