Implement a new automaton run (non optimized) with cleaner semantics w.r.t. ranked...

[tatoo.git] / src / ata.mli

diff --git a/src/ata.mli b/src/ata.mli
index 443bb0b..89593cc 100644 (file)
--- a/src/ata.mli
+++ b/src/ata.mli
@@ -122,8 +122,12 @@ val get_starting_states : t -> StateSet.t
 val get_selecting_states : t -> StateSet.t
 (** return the set of selecting states of the automaton *)
 
-val get_states_by_rank : t -> StateSet.t array
-(** return an array of states ordered by ranks.
+type rank = { td : StateSet.t;
+              bu : StateSet.t;
+              exit : StateSet.t }
+
+val get_states_by_rank : t -> rank array
+(** return an array of states (sources, states) ordered by ranks.
 *)
 
 val get_max_rank : t -> int