Buffer_local.Private
val get_in_current_buffer : 'a t -> 'a
val get_in_current_buffer_exn : 'a option t -> 'a
val set_in_current_buffer : 'a t -> 'a -> unit