cleanup

src/FsAutoComplete/FsAutoComplete.fsproj

@@ -30,7 +30,6 @@
     <Compile Include="LspServers/IFSharpLspServer.fs" />
     <Compile Include="LspServers/FSharpLspClient.fs" />
     <Compile Include="LspServers/Common.fs" />
-    <Compile Include="LspServers/CallHierarchy.fs" />
     <Compile Include="LspServers/AdaptiveFSharpLspServer.fsi" />
     <Compile Include="LspServers/AdaptiveFSharpLspServer.fs" />
     <Compile Include="LspServers/FsAutoComplete.Lsp.fsi" />

src/FsAutoComplete/LspHelpers.fs

@@ -18,24 +18,14 @@ module FcsRange = FSharp.Compiler.Text.Range
 type FcsPos = FSharp.Compiler.Text.Position
 module FcsPos = FSharp.Compiler.Text.Position
 
-// type LspPos = Ionide.LanguageServerProtocol.Types.Position
-// type LspRange = Ionide.LanguageServerProtocol.Types.Range
-
-module Lsp = Ionide.LanguageServerProtocol.Types
-
-module LspRange =
-  // static member Create (start: LspPos) (end_: LspPos) : LspRange =
-  //   { Start = start; End = end_ }
-  let Zero: Lsp.Range =
-    { Start = { Line = 0; Character = 0 }
-      End = { Line = 0; Character = 0 } }
 
 module FcsPos =
   let subtractColumn (pos: FcsPos) (column: int) = FcsPos.mkPos pos.Line (pos.Column - column)
 
 [<AutoOpen>]
 module Conversions =
 
+  module Lsp = Ionide.LanguageServerProtocol.Types
   /// convert an LSP position to a compiler position
   let protocolPosToPos (pos: Lsp.Position) : FcsPos = FcsPos.mkPos (pos.Line + 1) (pos.Character)
 

src/FsAutoComplete/LspHelpers.fsi

@@ -17,14 +17,12 @@ module FcsPos = FSharp.Compiler.Text.Position
 
 module Lsp = Ionide.LanguageServerProtocol.Types
 
-module LspRange =
-  val Zero: Lsp.Range
-
 module FcsPos =
   val subtractColumn: pos: FcsPos -> column: int -> FcsPos
 
 [<AutoOpen>]
 module Conversions =
+  module Lsp = Ionide.LanguageServerProtocol.Types
   /// convert an LSP position to a compiler position
   val protocolPosToPos: pos: Lsp.Position -> FcsPos
   val protocolPosToRange: pos: Lsp.Position -> Range