sig   type action =       Zed of Zed_edit.action     | Start_macro     | Stop_macro     | Cancel_macro     | Play_macro     | Insert_macro_counter     | Set_macro_counter     | Add_macro_counter     | Custom of (unit -> unit)   val bindings :     LTerm_edit.action list Zed_input.Make(LTerm_key).t Pervasives.ref   val bind : LTerm_key.t list -> LTerm_edit.action list -> unit   val unbind : LTerm_key.t list -> unit   val actions : (LTerm_edit.action * string) list   val doc_of_action : LTerm_edit.action -> string   val action_of_name : string -> LTerm_edit.action   val name_of_action : LTerm_edit.action -> string   val clipboard : Zed_edit.clipboard   val macro : LTerm_edit.action Zed_macro.t   class edit :     ?clipboard:Zed_edit.clipboard ->     ?macro:LTerm_edit.action Zed_macro.t ->     unit ->     object       method allocation : LTerm_geom.rect       method bind : LTerm_key.t list -> LTerm_edit.action list -> unit       method can_focus : bool       method children : LTerm_widget.t list       method clipboard : Zed_edit.clipboard       method context : LTerm_edit.edit Zed_edit.context       method cursor : Zed_cursor.t       method cursor_position : LTerm_geom.coord option       method draw : LTerm_draw.context -> LTerm_widget.t -> unit       method editable : int -> int -> bool       method engine : LTerm_edit.edit Zed_edit.t       method locale : string option       method macro : LTerm_edit.action Zed_macro.t       method match_word : Zed_rope.t -> int -> int option       method on_event :         ?switch:LTerm_widget_callbacks.switch ->         (LTerm_event.t -> bool) -> unit       method parent : LTerm_widget.t option       method queue_draw : unit       method resource_class : string       method resources : LTerm_resources.t       method send_event : LTerm_event.t -> unit       method set_allocation : LTerm_geom.rect -> unit       method set_locale : string option -> unit       method set_parent : LTerm_widget.t option -> unit       method set_queue_draw : (unit -> unit) -> unit       method set_resource_class : string -> unit       method set_resources : LTerm_resources.t -> unit       method size_request : LTerm_geom.size       method text : string       method update_resources : unit     end end