From 2190193397596663c4de4f51f8355300c1833997 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Sat, 23 May 2026 00:23:12 +0000 Subject: Migrate `Server` over --- lib/condition.ml | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lib/condition.ml') diff --git a/lib/condition.ml b/lib/condition.ml index c0e4a12..67915b6 100644 --- a/lib/condition.ml +++ b/lib/condition.ml @@ -33,3 +33,6 @@ let to_sexp { name; properties } = |> BatSeq.map (fun (k, v) -> List [Atom k; v#as_sexp]) |> BatList.of_seq in List (Atom name :: properties') + +let to_string e = (* FIXME *) + Sexplib.Sexp.to_string_hum (to_sexp e) -- cgit v1.2.3