projects
/
opengl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Rename sendRequest to request, sendRequest' to sendRequest
[opengl.git]
/
example
/
Main.hs
diff --git
a/example/Main.hs
b/example/Main.hs
index c992b8ea67390760497b6fdee187078c428489a8..1e2e3baf3356b36f6eb09967a02ce2e7fbd12c0a 100644
(file)
--- a/
example/Main.hs
+++ b/
example/Main.hs
@@
-3,7
+3,7
@@
import Control.Monad.IO.Class
import Language.Haskell.LSP.Test
import Language.Haskell.LSP.Types
import Language.Haskell.LSP.Test
import Language.Haskell.LSP.Types
-main = runSession "hie --lsp"
"test/recordings
/renamePass" $ do
+main = runSession "hie --lsp"
fullCaps "test/data
/renamePass" $ do
docItem <- openDoc "Desktop/simple.hs" "haskell"
-- Use your favourite favourite combinators.
docItem <- openDoc "Desktop/simple.hs" "haskell"
-- Use your favourite favourite combinators.
@@
-11,8
+11,8
@@
main = runSession "hie --lsp" "test/recordings/renamePass" $ do
-- Send requests and notifications and receive responses
let params = DocumentSymbolParams docItem
-- Send requests and notifications and receive responses
let params = DocumentSymbolParams docItem
- r
esponse <- sendR
equest TextDocumentDocumentSymbol params :: Session DocumentSymbolsResponse
- liftIO $ print r
esponse
+ r
sp <- r
equest TextDocumentDocumentSymbol params :: Session DocumentSymbolsResponse
+ liftIO $ print r
sp
-- Or use one of the helper functions
getDocumentSymbols docItem >>= liftIO . print
-- Or use one of the helper functions
getDocumentSymbols docItem >>= liftIO . print