From 8e012f4804ecf1665819e761283120a3c0e73643 Mon Sep 17 00:00:00 2001
From: Sébastien Dailly <sebastien@dailly.me>
Date: Fri, 17 Jan 2025 20:48:43 +0100
Subject: Switched from OUnit to alcotest

---
 lib/configuration/syntax.ml | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/configuration/syntax.ml')

diff --git a/lib/configuration/syntax.ml b/lib/configuration/syntax.ml
index 253720e..ee47277 100644
--- a/lib/configuration/syntax.ml
+++ b/lib/configuration/syntax.ml
@@ -21,6 +21,7 @@ module Extern = struct
     allow_missing : bool;
     match_rule : string option;
   }
+  [@@deriving show, eq]
   (** Describe a relation beteween two tables *)
 
   let toml_of_extern extern =
@@ -28,7 +29,7 @@ module Extern = struct
       [
         ( "intern_key",
           Otoml.string
-          @@ ImportExpression.Repr.repr ~top:true Path.repr extern.intern_key );
+          @@ ImportExpression.Repr.repr ~top:true Path.show extern.intern_key );
         ( "extern_key",
           Otoml.string
           @@ ImportExpression.Repr.repr ~top:true
@@ -67,7 +68,7 @@ let repr t =
   let repr_expression_list l =
     Otoml.array
       (List.map l ~f:(fun v ->
-           Otoml.string (ImportExpression.Repr.repr ~top:true Path.repr v)))
+           Otoml.string (ImportExpression.Repr.repr ~top:true Path.show v)))
   in
 
   let sheet =
-- 
cgit v1.2.3