From 36fa2a1a0e0b5dfaebe2ae1eb80218c7ec50530c Mon Sep 17 00:00:00 2001 From: Lucas Franceschino Date: Mon, 3 Jun 2024 12:12:52 +0200 Subject: [PATCH] chore(ocamlformat) --- engine/lib/dune | 4 ++-- engine/utils/generate_visitors/errors.ml | 1 - 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/engine/lib/dune b/engine/lib/dune index 3c82e7e97..149ea13e6 100644 --- a/engine/lib/dune +++ b/engine/lib/dune @@ -54,8 +54,8 @@ (with-stdout-to ast_visitors.ml (with-stdin-from - %{ast} - (run generate_visitors))))) + %{ast} + (run generate_visitors))))) (rule (target concrete_ident_generated.ml) diff --git a/engine/utils/generate_visitors/errors.ml b/engine/utils/generate_visitors/errors.ml index e44f68cd6..8288a8474 100644 --- a/engine/utils/generate_visitors/errors.ml +++ b/engine/utils/generate_visitors/errors.ml @@ -44,7 +44,6 @@ open struct end let yojson_of_t (e : t) = into_string e |> [%yojson_of: t_string] - let _ = pp_t_string (* just to silence OCaml warning *) exception Error of t