2018-09-28 20:44:38 +00:00
|
|
|
open Vmm_core
|
|
|
|
|
|
|
|
type 'a t
|
|
|
|
|
|
|
|
val empty : 'a t
|
|
|
|
|
|
|
|
val insert : id -> 'a -> 'a t -> 'a t * 'a option
|
|
|
|
|
|
|
|
val remove : id -> 'a t -> 'a t
|
|
|
|
|
|
|
|
val find : id -> 'a t -> 'a option
|
|
|
|
|
|
|
|
val collect : id -> 'a t -> (id * 'a) list
|
|
|
|
|
|
|
|
val all : 'a t -> (id * 'a) list
|
2018-10-12 23:05:21 +00:00
|
|
|
|
|
|
|
val fold : id -> 'a t -> (id -> 'a -> 'b -> 'b) -> 'b -> 'b
|