From 9c3af0be76fa7aef5c92b080440271149453f41c Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Thu, 21 May 2026 01:04:24 +0000 Subject: `Condition.condition` -> `Condition.t` --- lib/condition.ml | 2 +- lib/manipulation.ml | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/condition.ml b/lib/condition.ml index 72eb773..ecd822d 100644 --- a/lib/condition.ml +++ b/lib/condition.ml @@ -10,7 +10,7 @@ end let of_sexp (expr : Sexplib.Sexp.t) = new literal expr let of_string (s : string) = new literal (Sexplib.Sexp.Atom s) -type condition = { name : string; properties : (string, serializable) BatMap.t } +type t = { name : string; properties : (string, serializable) BatMap.t } let condition name ?parent props = { name; diff --git a/lib/manipulation.ml b/lib/manipulation.ml index f0b5d1c..d98127c 100644 --- a/lib/manipulation.ml +++ b/lib/manipulation.ml @@ -15,7 +15,7 @@ (** Functor to create manipulation operations with a storage backend *) module Make (Storage : Management.Physical.S) = struct type storage = Storage.t - type error = Condition.condition + type error = Condition.t module Error = struct open Condition -- cgit v1.2.3