@@ -25,7 +25,7 @@ module TypeHierarchy =
2525 : AsyncLspResult < TypeHierarchyItem [] option > =
2626 async {
2727 match ! context.FindSymbol p.TextDocument.Uri p.Position with
28- | Some wf, Some symbol when isTypeSymbol symbol ->
28+ | Some wf, Some( symbol, _, _) when isTypeSymbol symbol ->
2929 let! itemList = TypeHierarchyItem.fromSymbol context.ResolveSymbolLocations symbol
3030 return itemList |> List.toArray |> Some |> LspResult.success
3131
@@ -38,7 +38,7 @@ module TypeHierarchy =
3838 : AsyncLspResult < TypeHierarchyItem [] option > =
3939 async {
4040 match ! context.FindSymbol p.Item.Uri p.Item.Range.Start with
41- | Some wf, Some symbol when isTypeSymbol symbol ->
41+ | Some wf, Some( symbol, _, _) when isTypeSymbol symbol ->
4242 let typeSymbol = symbol :?> INamedTypeSymbol
4343
4444 let baseType =
@@ -68,7 +68,7 @@ module TypeHierarchy =
6868 let! ct = Async.CancellationToken
6969
7070 match ! context.FindSymbol p.Item.Uri p.Item.Range.Start with
71- | Some wf, Some symbol when isTypeSymbol symbol ->
71+ | Some wf, Some( symbol, _, _) when isTypeSymbol symbol ->
7272 let typeSymbol = symbol :?> INamedTypeSymbol
7373 // We only want immediately derived classes/interfaces/implementations here (we only need
7474 // subclasses not subclasses' subclasses)
0 commit comments