X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fata.mli;h=d65fabb329c54540cda70735e95bdfe330fbb0ff;hp=0861773c17c284ddaf13cf09244827c4c28bd93b;hb=41dd1fed04cabad212f10fce3484545f6e9d9444;hpb=556c8805fcfd27f485bdd63cd704e4df7eac8a06 diff --git a/src/ata.mli b/src/ata.mli index 0861773..d65fabb 100644 --- a/src/ata.mli +++ b/src/ata.mli @@ -13,10 +13,6 @@ (* *) (***********************************************************************) -(* - Time-stamp: -*) - type predicate = First_child | Next_sibling @@ -74,11 +70,10 @@ type config = { unsat : StateSet.t; todo : TransList.t; summary : node_summary; - mutable round : int; } module Config : Hcons.S with type data = config - +val dummy_config : Config.t type t = private { id : Uid.t; @@ -93,6 +88,7 @@ type t = private { val create : StateSet.t -> StateSet.t -> t val reset : t -> unit +val full_reset : t -> unit val get_trans : t -> QNameSet.elt -> StateSet.t -> TransList.t