X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=ata.mli;h=545a82691691a000e39caff21c51a1163f89662d;hb=b8aa8e7f1036cf00d0fadc75ccbe0264bae6c1b2;hp=26f55184a57c71d60a0319e5f1340afb97a481b4;hpb=25dd7fcc77c2188732d96d5ff98d759bb81737cb;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;