X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fata.mli;h=8de0c5815dd6b46c6d3d60bb21bb2b542ed51d2a;hp=8a1119ec5d5d62d164d97813bf58f001029ef184;hb=e3474bb976d161aa5c42f3d42583bbe290bbfcc4;hpb=acd23a33d837d03c813212ec3896a86edef16e87 diff --git a/src/ata.mli b/src/ata.mli index 8a1119e..8de0c58 100644 --- a/src/ata.mli +++ b/src/ata.mli @@ -14,7 +14,7 @@ (***********************************************************************) (* - Time-stamp: + Time-stamp: *) type predicate = @@ -74,11 +74,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 +92,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