summaryrefslogtreecommitdiff
path: root/otherlibs/labltk/support/textvariable.mli
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/labltk/support/textvariable.mli')
-rw-r--r--otherlibs/labltk/support/textvariable.mli45
1 files changed, 0 insertions, 45 deletions
diff --git a/otherlibs/labltk/support/textvariable.mli b/otherlibs/labltk/support/textvariable.mli
deleted file mode 100644
index 09a19148a1..0000000000
--- a/otherlibs/labltk/support/textvariable.mli
+++ /dev/null
@@ -1,45 +0,0 @@
-(***********************************************************************)
-(* *)
-(* MLTk, Tcl/Tk interface of Objective Caml *)
-(* *)
-(* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *)
-(* projet Cristal, INRIA Rocquencourt *)
-(* Jacques Garrigue, Kyoto University RIMS *)
-(* *)
-(* Copyright 2002 Institut National de Recherche en Informatique et *)
-(* en Automatique and Kyoto University. All rights reserved. *)
-(* This file is distributed under the terms of the GNU Library *)
-(* General Public License, with the special exception on linking *)
-(* described in file LICENSE found in the Objective Caml source tree. *)
-(* *)
-(***********************************************************************)
-
-(* $Id$ *)
-
-(* Support for Tk -textvariable option *)
-open Widget
-open Protocol
-
-type textVariable
- (* TextVariable is an abstract type *)
-
-val create : ?on: 'a widget -> unit -> textVariable
- (* Allocation of a textVariable with lifetime associated to widget
- if a widget is specified *)
-val set : textVariable -> string -> unit
- (* Setting the val of a textVariable *)
-val get : textVariable -> string
- (* Reading the val of a textVariable *)
-val name : textVariable -> string
- (* Its tcl name *)
-
-val cCAMLtoTKtextVariable : textVariable -> tkArgs
- (* Internal conversion function *)
-
-val handle : textVariable -> callback:(unit -> unit) -> unit
- (* Callbacks on variable modifications *)
-
-val coerce : string -> textVariable
-
-(*-*)
-val free : textVariable -> unit