From a5f03d96eee482cd84861fc8cefff9eb451c0cad Mon Sep 17 00:00:00 2001 From: xleroy Date: Sun, 29 Mar 2009 09:47:11 +0000 Subject: Cleaned up configure script. Distribution of CIL as an expanded source tree with changes applied (instead of original .tar.gz + patches to be applied at config time). git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1020 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- cil/ocamlutil/inthash.mli | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100755 cil/ocamlutil/inthash.mli (limited to 'cil/ocamlutil/inthash.mli') diff --git a/cil/ocamlutil/inthash.mli b/cil/ocamlutil/inthash.mli new file mode 100755 index 00000000..f62fcd2b --- /dev/null +++ b/cil/ocamlutil/inthash.mli @@ -0,0 +1,27 @@ +type 'a t + +(* These functions behave the same as Hashtbl, but the key type is + always int. (Specializing on int improves the performance) *) + +val create: int -> 'a t +val clear: 'a t -> unit +val length : 'a t -> int + +val copy: 'a t -> 'a t +val copy_into: 'a t -> 'a t -> unit + +val add: 'a t -> int -> 'a -> unit +val replace: 'a t -> int -> 'a -> unit +val remove: 'a t -> int -> unit +val remove_all: 'a t -> int -> unit + +val mem: 'a t -> int -> bool +val find: 'a t -> int -> 'a +val find_all: 'a t -> int -> 'a list + +val iter: (int -> 'a -> unit) -> 'a t -> unit +val fold: (int -> 'a -> 'b -> 'b) -> 'a t -> 'b -> 'b + +val memoize: 'a t -> int -> (int -> 'a) -> 'a + +val tolist: 'a t -> (int * 'a) list -- cgit