Ambient_context_tls.M
val name : string
val get_map : unit -> Hmap.t option
val with_map : Hmap.t -> (unit -> 'a) -> 'b
val create_key : unit -> 'a Hmap.key
val get : 'a Hmap.key -> 'b option
val with_binding : 'a Hmap.key -> 'b -> (unit -> 'c) -> 'd
val without_binding : 'a Hmap.key -> (unit -> 'b) -> 'c