X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=ata.mli;h=545a82691691a000e39caff21c51a1163f89662d;hb=8b3283c30149065d761e38cf0818c8ede62d48ab;hp=26f55184a57c71d60a0319e5f1340afb97a481b4;hpb=09870a49122b3d7048422818dbb0a038513b4d14;p=SXSI%2Fxpathcomp.git diff --git a/ata.mli b/ata.mli index 26f5518..545a826 100644 --- a/ata.mli +++ b/ata.mli @@ -64,7 +64,7 @@ module Transition : val ( ?< ) : State.t -> State.t val ( >< ) : State.t -> TagSet.t * bool -> State.t*(TagSet.t*bool*bool) val ( ><@ ) : State.t -> TagSet.t * bool -> State.t*(TagSet.t*bool*bool) - val ( >=> ) : State.t *(TagSet.t*bool*bool) -> Formula.t -> (State.t*TagSet.t*t) + val ( >=> ) : State.t * (TagSet.t*bool*bool) -> Formula.t -> (State.t*TagSet.t*t) end val print : Format.formatter -> t -> unit end @@ -73,7 +73,7 @@ module SetTagKey : Hashtbl.HashedType with type t = StateSet.t*Tag.t module CachedTransTable : Hashtbl.S with type key = SetTagKey.t -module Formlist : Ptset.S with type elt = Transition.t +module Formlist : Hlist.S with type elt = Transition.t type 'a t = { id : int;