···394394 used after this function returns. *)
395395396396 val without_binding : 'a key -> (unit -> 'b) -> 'b
397397- (** [with_binding key value fn] runs [fn] with any binding for [key] removed.
397397+ (** [without_binding key value fn] runs [fn] with any binding for [key] removed.
398398 *)
399399end
400400