refactor: add lib interface to lsp_fiber

ps-id: CF7F11C0-BACB-4E1D-9DDB-416EC6522C47
garnermt · May 12, 2022 · cd60547 · cd60547
1 parent 4aa9d06
commit cd60547
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 3 deletions.
diff --git a/lsp-fiber/src/lsp_fiber.ml b/lsp-fiber/src/lsp_fiber.ml
@@ -0,0 +1,9 @@
+module Fiber_io = Fiber_io
+module Lazy_fiber = Lazy_fiber
+module Rpc = Rpc
+module Client = Client
+module Server = Server
+
+module Private = struct
+  module Log = Import.Log
+end
diff --git a/lsp-fiber/test/lsp_fiber_test.ml b/lsp-fiber/test/lsp_fiber_test.ml
@@ -88,8 +88,6 @@ module End_to_end_client = struct
 end
 
 module End_to_end_server = struct
-  module Server = Rpc.Server
-
   type status =
     | Started
     | Initialized

diff --git a/ocaml-lsp-server/src/import.ml b/ocaml-lsp-server/src/import.ml
@@ -102,7 +102,7 @@ module Browse_raw = Merlin_specific.Browse_raw
    listed alphabetically. Try to keep the order. *)
 include struct
   open Lsp_fiber
-  module Log = Import.Log
+  module Log = Private.Log
   module Reply = Rpc.Reply
   module Server = Server
   module Lazy_fiber = Lsp_fiber.Lazy_fiber