module OrdArray:sig
..end
type
entry = {
|
mutable prev : |
|
mutable next : |
type 'a
t = {
|
last_used : |
(* |
The ordered list of indices.
| *) |
|
mutable first : |
(* |
The indice of the first element.
| *) |
|
mutable last : |
(* |
and the last one.
| *) |
|
data : |
val make_from_data : 'a array -> 'a t
val make : int -> 'a -> 'a t
val init : int -> (int -> 'a) -> 'a t
val get : 'a t -> int -> 'a
val set : 'a t -> int -> 'a -> unit
val first : 'a t -> int
val last : 'a t -> int
val remove : 'a t -> int -> unit
val add_head : 'a t -> int -> unit
val promote : 'a t -> int -> unit