Defunctorize the ResJIT module.

[SXSI/xpathcomp.git] / src / resJIT.mli

diff --git a/src/resJIT.mli b/src/resJIT.mli
index a870bc0..6822b0b 100644 (file)
--- a/src/resJIT.mli
+++ b/src/resJIT.mli
@@ -31,6 +31,13 @@ type 'a update = 'a -> 'a -> 'a -> Tree.t -> Tree.node -> StateSet.t * 'a
 type 'a cache = 'a update Cache.Lvl3.t
 val dummy_update : 'a update
 val create : unit -> 'a cache
+val update :
+  ('a array -> 'a array -> 'a array -> Tree.node -> code -> unit) ->
+  'a array cache -> Ata.t -> Translist.t -> StateSet.t -> StateSet.t ->
+      'a array -> 'a array -> 'a array -> Tree.t -> Tree.node -> StateSet.t * 'a array
+
+val count_exec : NodeSet.Count.t array -> NodeSet.Count.t array -> NodeSet.Count.t array -> Tree.node -> code -> unit
+val mat_exec : NodeSet.Mat.t array -> NodeSet.Mat.t array -> NodeSet.Mat.t array -> Tree.node -> code -> unit
 
 module type S =
   sig