1 (*************************************************************************)
3 (* Objective Caml LablTk library *)
5 (* Jacques Garrigue, Kyoto University RIMS *)
7 (* Copyright 1999 Institut National de Recherche en Informatique et *)
8 (* en Automatique and Kyoto University. All rights reserved. *)
9 (* This file is distributed under the terms of the GNU Library *)
10 (* General Public License, with the special exception on linking *)
11 (* described in file ../../../LICENSE. *)
13 (*************************************************************************)
15 (* $Id: jg_bind.mli 4144 2001-12-07 13:41:02Z xleroy $ *)
19 val enter_focus : 'a widget -> unit
20 val escape_destroy : ?destroy:'a widget -> 'a widget ->unit
21 val return_invoke : 'a widget -> button:button widget -> unit