projects
/
SXSI
/
xpathcomp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
changes
[SXSI/xpathcomp.git]
/
ata.mli
diff --git
a/ata.mli
b/ata.mli
index
cd6610b
..
4ec2f59
100644
(file)
--- a/
ata.mli
+++ b/
ata.mli
@@
-34,16
+34,21
@@
type dispatch = { first : Tree.t -> Tree.t;
flabel : string;
next : Tree.t -> Tree.t -> Tree.t;
nlabel : string;
flabel : string;
next : Tree.t -> Tree.t -> Tree.t;
nlabel : string;
+ consres : Tree.t -> TS.t -> TS.t -> bool -> bool -> TS.t;
}
}
+
+type formlist = Nil | Cons of state*formula*int*formlist
+
type t = {
id : int;
mutable states : Ptset.t;
init : Ptset.t;
mutable final : Ptset.t;
universal : Ptset.t;
type t = {
id : int;
mutable states : Ptset.t;
init : Ptset.t;
mutable final : Ptset.t;
universal : Ptset.t;
+ starstate : Ptset.t option;
(* Transitions of the Alternating automaton *)
phi : (state,(TagSet.t*(bool*formula*bool)) list) Hashtbl.t;
(* Transitions of the Alternating automaton *)
phi : (state,(TagSet.t*(bool*formula*bool)) list) Hashtbl.t;
- sigma : (dispatch*bool*form
ula
) HTagSet.t;
+ sigma : (dispatch*bool*form
list*Ptset.t*Ptset.t
) HTagSet.t;
}
val dump : Format.formatter -> t -> unit
}
val dump : Format.formatter -> t -> unit