hack a bit3

ocaml · Jan 3, 2024 · ebebf08 · ebebf08
1 parent 5e87542
commit ebebf08
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/ocaml-lsp-server/src/diagnostics.ml b/ocaml-lsp-server/src/diagnostics.ml
@@ -365,6 +365,7 @@ let merlin_diagnostics diagnostics merlin =
   set diagnostics (`Merlin (uri, all_diagnostics))
 
 let set_report_dune_diagnostics t ~report_dune_diagnostics =
+  let () = assert false in
   t.report_dune_diagnostics <- report_dune_diagnostics;
   Table.iter t.dune ~f:(fun per_dune ->
       Table.iter per_dune ~f:(fun (uri, _diagnostic) ->