Adhoc.Tui
Ad hoc TUI spinners.
type spin_scheme = string array * float
Array of frames and frame duration.
type stop = unit -> unit
val spin : ?scheme:spin_scheme -> msg:string -> unit -> stop