diff options
| -rw-r--r-- | lib/condition.ml | 2 | ||||
| -rw-r--r-- | 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 |