Scrollbar (hardcaml_waveterm.Hardcaml_waveterm

type t = {

scrollable : Scrollable.t;

mutable bar_style : Scroll_bar_style.t;

incr_key : Notty.Unescape.key;

decr_key : Notty.Unescape.key;

mutable bounds : Hardcaml_waveterm.Expert.Draw.rect;

orientation : Orientation.t;

}

val sexp_of_t : t -> Sexplib0.Sexp.t

val mouse_event : t -> Notty.Unescape.mouse -> Base.bool

val key_event : t -> Notty.Unescape.key -> Base.bool

val set_bounds : t -> Hardcaml_waveterm.Expert.Draw.rect -> Base.unit