X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Futils%2Fcache.mli;h=d6c0ebb884728d50872bc0890b0ccce1444def49;hp=dba99172674cd0c2ea53d537ac33a66e0f3a4d60;hb=738218592e41da4ceb46f4dba41f292a60ba1f7b;hpb=748057239bad98bebc0f38403f05c1feb3712e82 diff --git a/src/utils/cache.mli b/src/utils/cache.mli index dba9917..d6c0ebb 100644 --- a/src/utils/cache.mli +++ b/src/utils/cache.mli @@ -14,7 +14,7 @@ (***********************************************************************) (* - Time-stamp: + Time-stamp: *) (** N-dimentional caches *) @@ -69,3 +69,13 @@ module N5 : val dummy : 'a t -> 'a val iteri : (int -> int -> int -> int -> int -> 'a -> bool -> unit) -> 'a t -> unit end + +module N6 : + sig + type 'a t + val create : int -> 'a -> 'a t + val find : 'a t -> int -> int -> int -> int -> int -> int -> 'a + val add : 'a t -> int -> int -> int -> int -> int -> int -> 'a -> unit + val dummy : 'a t -> 'a + val iteri : (int -> int -> int -> int -> int -> int -> 'a -> bool -> unit) -> 'a t -> unit + end