blob: 66ae6b7349f7d685fcc82e002ed0b53955aa89f4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
##ifdef CAMLTK
val handle_set : icccm list -> widget -> (int -> int -> unit) -> unit
(** tk invocation: selection handle <icccm list> <widget> <command> *)
##else
val handle_set :
command: (pos:int -> len:int -> string) ->
?format: string -> ?selection:string -> ?typ: string -> 'a widget -> unit
(** tk invocation: selection handle <icccm list> <widget> <command> *)
##endif
|
