From fb0ade9daf1e9d1cd0a29dd1abe87468ab03a174 Mon Sep 17 00:00:00 2001 From: Marcos Magueta Date: Sat, 22 Mar 2025 14:00:01 -0300 Subject: add relation type and format --- lib/protocol.ml | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'lib/protocol.ml') diff --git a/lib/protocol.ml b/lib/protocol.ml index 9dea3ce..79ed8d0 100644 --- a/lib/protocol.ml +++ b/lib/protocol.ml @@ -1,8 +1,7 @@ open Protocol_conv_xml open Sexplib0.Sexp_conv -type tuple = string list -[@@deriving sexp, protocol ~driver:(module Xml_light)] +type tuple = string list [@@deriving sexp, protocol ~driver:(module Xml_light)] type relation = { attribute_name : string; @@ -12,4 +11,4 @@ type relation = { [@@deriving sexp, protocol ~driver:(module Xml_light)] type facts = relation list -[@@deriving sexp, protocol ~driver:(module Xml_light)] \ No newline at end of file +[@@deriving sexp, protocol ~driver:(module Xml_light)] -- cgit v1.2.3