sig
  val map :
    Lit.Renderer.T.t ->
    [ `R | `RW | `W ] ->
    Lit.Buf.t -> ('a, 'b) Bigarray.kind -> ('a, 'b) Lit.bigarray
  val unmap : Lit.Renderer.T.t -> Lit.Buf.t -> unit
end