X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbin%2Froles%2FrolesEngine.mli;h=828e529946ef38ce08565a71642b944abe12122e;hb=3be6630ba2a592488502b320e85e45b55a099580;hp=4ccae9de0391df84fd645683590ddb8a2c6fb088;hpb=f07cd97493f650ee779be874d1159c0e807f8273;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/bin/roles/rolesEngine.mli b/matita/matita/contribs/lambdadelta/bin/roles/rolesEngine.mli
index 4ccae9de0..828e52994 100644
--- a/matita/matita/contribs/lambdadelta/bin/roles/rolesEngine.mli
+++ b/matita/matita/contribs/lambdadelta/bin/roles/rolesEngine.mli
@@ -11,7 +11,7 @@
 
 val new_stage: RolesTypes.version -> unit
 
-val toggle_entry: RolesTypes.pointer -> unit
+val select_entry: RolesTypes.pointer -> unit
 
 val add_role: unit -> unit
 
@@ -26,3 +26,10 @@ val read_status: unit -> unit
 val write_status: unit -> unit
 
 val print_status: unit -> unit
+
+val visit_status:
+  (string -> string -> unit) -> (string -> bool -> string -> unit) ->
+  (unit -> unit) -> (unit -> unit) -> (unit -> unit) -> (string -> bool -> unit) ->
+  (string -> string -> unit) -> (string -> bool -> string -> unit) -> (unit -> unit) ->
+  (string -> string -> unit) -> (string -> bool -> string -> unit) -> (unit -> unit) ->
+  unit