Make.editval mutable curr_mode : Mode.tmethod keyin : < bindings : Mode.action Mode.KeyTrie.node
; getMode : Mode.t
; i : Key.t MsgBox.t
; keyin : Key.t -> unit Concurrent.Thread.t
; o : Key.t MsgBox.t
; setMode : Mode.Modes.key -> unit
; timeout : float.. > ->
Key.t ->
unit Concurrent.Thread.tmethod getMode : 'b -> Mode.tmethod setMode : 'b -> Mode.Modes.key -> unitmethod bindings : 'b -> Mode.action Mode.KeyTrie.node