]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/bin/roles/rolesTypes.ml
update in binaries for λδ
[helm.git] / matita / matita / contribs / lambdadelta / bin / roles / rolesTypes.ml
index 1535c493be77a484e42547a93fa4c0e62a055cc7..f02af702181744c001b75bd2f95b3c070a72f231 100644 (file)
@@ -20,6 +20,7 @@ type obj = version * name
 type objs = (bool*obj) list
 
 type role = {
+  mutable x: bool;
   mutable v: version;
   mutable o: objs;
   mutable n: names;
@@ -28,6 +29,7 @@ type role = {
 type roles = (bool*role) list
 
 type status = {
+  mutable m: bool;
   mutable r: roles;
   mutable s: version;
   mutable t: objs;