Add missing tests

Author: July541

lsp-test/test/data/documentSymbolFail/example/Main.hs

@@ -68,6 +68,7 @@ main = do
         (Just (LSP.CodeLensClientCapabilities (Just False)))
         (Just (LSP.DocumentLinkClientCapabilities (Just False)))
         (Just (LSP.RenameClientCapabilities (Just False)))
+        (Just (LSP.CallHierarchyClientCapabilities (Just False)))
 
       initializeParams :: LSP.InitializeParams
       initializeParams = LSP.InitializeParams (Just pid) Nothing Nothing Nothing caps Nothing

lsp-types/src/Language/LSP/Types/ClientCapabilities.hs

@@ -144,7 +144,7 @@ data TextDocumentClientCapabilities =
       -- Since LSP 3.15.0
     , _selectionRange :: Maybe SelectionRangeClientCapabilities
 
-      -- | Call hierarchy specific to the `textDocument/callHierarchy` request.
+      -- | Call hierarchy specific to the `textDocument/prepareCallHierarchy` request.
       -- Since LSP 3.16.0
     , _callHierarchy :: Maybe CallHierarchyClientCapabilities
     } deriving (Show, Read, Eq)

lsp/test/MethodSpec.hs

@@ -56,6 +56,9 @@ clientMethods = [
   ,"documentLink/resolve"
   ,"textDocument/rename"
   ,"textDocument/prepareRename"
+  ,"textDocument/prepareCallHierarchy"
+  ,"callHierarchy/incomingCalls"
+  ,"callHierarchy/outgoingCalls"
   ]
 
 serverMethods :: [T.Text]