remove unused exception Invalid_edit ...

ocaml · Jan 19, 2023 · 0759a17 · 0759a17
1 parent 16e5a7d
commit 0759a17
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 19 deletions.
diff --git a/lsp/src/text_document.ml b/lsp/src/text_document.ml
@@ -138,18 +138,6 @@ let version (t : t) = t.document.version
 
 let languageId (t : t) = t.document.languageId
 
-type invalid_edit =
-  { message : string
-  ; change : TextDocumentContentChangeEvent.t
-  }
-
-exception Invalid_edit of invalid_edit
-
-let () =
-  Printexc.register_printer (function
-      | Invalid_edit { message; change = _ } -> Some message
-      | _ -> None)
-
 let apply_change encoding sz (change : TextDocumentContentChangeEvent.t) =
   match change.range with
   | None -> String_zipper.of_string change.text

diff --git a/lsp/src/text_document.mli b/lsp/src/text_document.mli
@@ -15,13 +15,6 @@ val text : t -> string
 
 exception Invalid_utf8
 
-type invalid_edit =
-  { message : string
-  ; change : TextDocumentContentChangeEvent.t
-  }
-
-exception Invalid_edit of invalid_edit
-
 val apply_content_changes :
   ?version:int -> t -> TextDocumentContentChangeEvent.t list -> t