refactor: remove some dead code (#1243)

Signed-off-by: Rudi Grinberg <me@rgrinberg.com>
ocaml · May 8, 2024 · c917d8a · c917d8a
1 parent e485128
commit c917d8a
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 6 deletions.
diff --git a/ocaml-lsp-server/src/progress.ml b/ocaml-lsp-server/src/progress.ml
@@ -93,7 +93,3 @@ let build_progress t (progress : Drpc.Progress.t) =
                        sprintf "Building [%d/%d]" progress.complete total
                      in
                      WorkDoneProgressReport.create ~percentage ~message ())))))
-
-let should_report_build_progress = function
-  | Disabled -> false
-  | Enabled _ -> true
diff --git a/ocaml-lsp-server/src/progress.mli b/ocaml-lsp-server/src/progress.mli
@@ -11,5 +11,3 @@ val create :
 val end_build_if_running : t -> unit Fiber.t
 
 val build_progress : t -> Drpc.Progress.t -> unit Fiber.t
-
-val should_report_build_progress : t -> bool