sig
  type t
  val create :
    ?width:int -> ?height:int -> ?style:Bogue.Style.t -> unit -> Bogue.Box.t
  val set_background : Bogue.Box.t -> Bogue.Style.background -> unit
  val set_style : Bogue.Box.t -> Bogue.Style.t -> unit
  val get_style : Bogue.Box.t -> Bogue.Style.t
end