X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Frun.mli;h=7704494ba2fb9240d46ea81f69f74b2d459b024d;hp=1efe4a789b579f3a298473455d7dcb94f27baddd;hb=3b9dbcd9318dba41999dc6cc43093edbe5bc4c5d;hpb=6ca42ffbd541cede6afcc473b563e54b848ee534 diff --git a/src/run.mli b/src/run.mli index 1efe4a7..7704494 100644 --- a/src/run.mli +++ b/src/run.mli @@ -13,8 +13,9 @@ (* *) (***********************************************************************) -module Make (T : Tree.S) : + +module Make (T : Tree.S) : sig - val eval : Ata.t -> T.t -> T.node list -> T.node list - val full_eval : Ata.t -> T.t -> T.node list -> (State.t * T.node list) list + val eval : Ata.t -> T.t -> T.node Sequence.t -> T.node Sequence.t + val full_eval : Ata.t -> T.t -> T.node Sequence.t -> (State.t * T.node Sequence.t) list end