Action.Variantsval command : (Command.t -> t) Variantslib.Variant.tval disabled_key : (Keystroke.t -> t) Variantslib.Variant.tval fold :
'acc__0 'acc__1 'acc__2. init:'acc__0 ->
command:('acc__0 -> (Command.t -> t) Variantslib.Variant.t -> 'acc__1) ->
disabled_key:('acc__1 -> (Keystroke.t -> t) Variantslib.Variant.t -> 'acc__2) ->
'acc__2val iter :
command:((Command.t -> t) Variantslib.Variant.t -> unit) ->
disabled_key:((Keystroke.t -> t) Variantslib.Variant.t -> unit) ->
unitval map :
'result__. t ->
command:((Command.t -> t) Variantslib.Variant.t -> Command.t -> 'result__) ->
disabled_key:
((Keystroke.t -> t) Variantslib.Variant.t -> Keystroke.t -> 'result__) ->
'result__val make_matcher :
'result__ 'acc__0 'acc__1 'acc__2. command:
((Command.t -> t) Variantslib.Variant.t ->
'acc__0 ->
(Command.t -> 'result__) * 'acc__1) ->
disabled_key:
((Keystroke.t -> t) Variantslib.Variant.t ->
'acc__1 ->
(Keystroke.t -> 'result__) * 'acc__2) ->
'acc__0 ->
(t -> 'result__) * 'acc__2val to_rank : t @ local -> intval to_name : t -> string