From 5ad3861afa10ac3eba5cb6bb83d44fbc89db2cb3 Mon Sep 17 00:00:00 2001 From: dawe Date: Tue, 16 Apr 2024 23:10:57 +0200 Subject: [PATCH] - remove an ignored call to protocolRangeToRange (#1266) - remove an ignored instance of StreamJsonRpcTracingStrategy --- src/FsAutoComplete/LspServers/AdaptiveFSharpLspServer.fs | 4 ---- 1 file changed, 4 deletions(-) diff --git a/src/FsAutoComplete/LspServers/AdaptiveFSharpLspServer.fs b/src/FsAutoComplete/LspServers/AdaptiveFSharpLspServer.fs index 51442d29a..fcbdb86fc 100644 --- a/src/FsAutoComplete/LspServers/AdaptiveFSharpLspServer.fs +++ b/src/FsAutoComplete/LspServers/AdaptiveFSharpLspServer.fs @@ -1947,8 +1947,6 @@ type AdaptiveFSharpLspServer let! tyRes = state.GetOpenFileTypeCheckResults filePath |> AsyncResult.ofStringErr - let _fcsRange = protocolRangeToRange (UMX.untag filePath) p.Range - let! pipelineHints = Commands.inlineValues volatileFile.Source tyRes let hints = @@ -3008,8 +3006,6 @@ module AdaptiveFSharpLspServer = None | _ -> None - let _strategy = StreamJsonRpcTracingStrategy(Tracing.fsacActivitySource) - let (|Flatten|_|) (e: exn) = match e with | :? AggregateException as aex ->