module Map:sig..end
type ('a, 'b) t
val empty : ('a, 'b) tval add : 'a Package.Name.t -> 'b -> ('a, 'b) t -> ('a, 'b) tval find : 'a Package.Name.t -> ('a, 'b) t -> 'bval iter : ('a Package.Name.t -> 'b -> unit) -> ('a, 'b) t -> unitval mapi : ('a Package.Name.t -> 'b -> 'c) ->
('a, 'b) t -> ('a, 'c) tval fold : ('a Package.Name.t -> 'b -> 'c -> 'c) -> ('a, 'b) t -> 'c -> 'cval update_default : 'a ->
('a -> 'a) ->
'b Package.Name.t -> ('b, 'a) t -> ('b, 'a) t