1 module Language.Haskell.LSP.Test.Capabilities where
2 import Language.Haskell.LSP.Types
3 import Language.Haskell.LSP.Types.Capabilities
5 -- | Capabilities for full conformance to the LSP specification.
7 fullCaps :: ClientCapabilities
8 fullCaps = ClientCapabilities (Just w) (Just td) Nothing
10 w = WorkspaceClientCapabilities
12 (Just (WorkspaceEditClientCapabilities (Just True)))
13 (Just (DidChangeConfigurationClientCapabilities (Just True)))
14 (Just (DidChangeWatchedFilesClientCapabilities (Just True)))
15 (Just (SymbolClientCapabilities (Just True)))
16 (Just (ExecuteClientCapabilities (Just True)))
17 td = TextDocumentClientCapabilities
19 (Just (CompletionClientCapabilities
21 (Just (CompletionItemClientCapabilities (Just True)))))
22 (Just (HoverClientCapabilities (Just True)))
23 (Just (SignatureHelpClientCapabilities (Just True)))
24 (Just (ReferencesClientCapabilities (Just True)))
25 (Just (DocumentHighlightClientCapabilities (Just True)))
26 (Just (DocumentSymbolClientCapabilities (Just True)))
27 (Just (FormattingClientCapabilities (Just True)))
28 (Just (RangeFormattingClientCapabilities (Just True)))
29 (Just (OnTypeFormattingClientCapabilities (Just True)))
30 (Just (DefinitionClientCapabilities (Just True)))
32 (Just (CodeLensClientCapabilities (Just True)))
33 (Just (DocumentLinkClientCapabilities (Just True)))
34 (Just (RenameClientCapabilities (Just True)))
35 sync = SynchronizationTextDocumentClientCapabilities
40 codeAction = CodeActionClientCapabilities
42 (Just (CodeActionLiteralSupport kinds))
43 kinds = CodeActionKindValueSet
44 (List [ CodeActionQuickFix
46 , CodeActionRefactorExtract
47 , CodeActionRefactorInline
48 , CodeActionRefactorRewrite
50 , CodeActionSourceOrganizeImports