Split the Options module in two to remove a circular dependency in

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

diff --git a/src/cache.mli b/src/cache.mli
index 9057c10..bc4cd48 100644 (file)
--- a/src/cache.mli
+++ b/src/cache.mli
@@ -7,7 +7,7 @@ sig
   val find : 'a t -> int -> 'a
   val add : 'a t -> int -> 'a -> unit
   val dummy : 'a t -> 'a
-
+  val iteri : (int -> 'a -> bool -> unit) -> 'a t -> unit
 end
 
 module Lvl2:
@@ -17,7 +17,7 @@ sig
     val find : 'a t -> int -> int -> 'a
     val add : 'a t -> int -> int -> 'a -> unit
     val dummy : 'a t -> 'a
-
+    val iteri : (int -> int -> 'a -> bool -> unit) -> 'a t -> unit
 end
 
 module Lvl3 :
@@ -29,5 +29,6 @@ module Lvl3 :
     val find : 'a t -> int -> int -> int -> 'a
     val add : 'a t -> int -> int -> int -> 'a -> unit
     val dummy : 'a t -> 'a
+    val iteri : (int -> int -> int -> 'a -> bool -> unit) -> 'a t -> unit
  
   end