16 lines
145 B
OCaml
16 lines
145 B
OCaml
|
(* vim: set ts=2 sw=2 et : *)
|
||
|
|
||
|
type t =
|
||
|
| None
|
||
|
| Quit
|
||
|
;;
|
||
|
|
||
|
type event_t = {
|
||
|
label : string;
|
||
|
};;
|
||
|
|
||
|
|
||
|
let execute action =
|
||
|
ignore action
|
||
|
;;
|