value openTk : unit -> widget value openTkClass : string -> widget value openTkDisplayClass : string -> string -> widget
value mainLoop : unit -> unit
value closeTk : unit -> unit
value bind : widget -> (modifier list * xEvent) list -> bindAction -> unit
value class_bind : string -> (modifier list * xEvent) list -> bindAction -> unit
value tag_bind : string -> (modifier list * xEvent) list -> bindAction -> unit
value add_fileinput : file_descr -> (unit -> unit) -> unit value remove_fileinput : file_descr -> unit value add_fileoutput : file_descr -> (unit -> unit) -> unit value remove_fileoutput : file_descr -> unit
value add_timer : int -> (unit -> unit) -> timer value remove_timer : timer -> unit