X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fata.mli;h=a0778a1db564aeb5f101925dff94d66ba33c61ab;hp=fd75e2ed9b19b35bfca96e63984716f97960614f;hb=969febf12344a3fe3bf793a323b2e88f7b20ebae;hpb=317ee66c18ebb68fdcb5ef57e88b9c61951b6ffb diff --git a/src/ata.mli b/src/ata.mli index fd75e2e..a0778a1 100644 --- a/src/ata.mli +++ b/src/ata.mli @@ -14,7 +14,7 @@ (***********************************************************************) (* - Time-stamp: + Time-stamp: *) type predicate = @@ -74,6 +74,7 @@ type config = { unsat : StateSet.t; todo : TransList.t; summary : node_summary; + mutable round : int; } module Config : Hcons.S with type data = config @@ -92,6 +93,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