projects
/
tatoo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Abstract result sets beind a Node_list interface.
[tatoo.git]
/
src
/
run.mli
diff --git
a/src/run.mli
b/src/run.mli
index
d57f6c9
..
e124e8a
100644
(file)
--- a/
src/run.mli
+++ b/
src/run.mli
@@
-12,8
+12,16
@@
(* ../LICENSE. *)
(* *)
(***********************************************************************)
(* ../LICENSE. *)
(* *)
(***********************************************************************)
-
-module Make (T : Tree.S) :
+type stats = { run : int;
+ tree_size : int;
+ fetch_trans_cache_access : int;
+ fetch_trans_cache_hit : int;
+ eval_trans_cache_access : int;
+ eval_trans_cache_hit : int;
+ }
+module Make (T : Tree.S) (L : Node_list.S with type node = T.node) :
sig
sig
- val eval : Ata.t -> T.t -> T.node list -> T.node list
+ val eval : Ata.t -> T.t -> L.t -> L.t
+ val full_eval : Ata.t -> T.t -> L.t -> (State.t * L.t) list
+ val stats : unit -> stats
end
end