]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/DEVEL/lablgtk/lablgtk_20000829-0.1.0/applications/radtest/common.mli
This commit was manufactured by cvs2svn to create branch 'init'.
[helm.git] / helm / DEVEL / lablgtk / lablgtk_20000829-0.1.0 / applications / radtest / common.mli
diff --git a/helm/DEVEL/lablgtk/lablgtk_20000829-0.1.0/applications/radtest/common.mli b/helm/DEVEL/lablgtk/lablgtk_20000829-0.1.0/applications/radtest/common.mli
deleted file mode 100644 (file)
index 7050f9f..0000000
+++ /dev/null
@@ -1,27 +0,0 @@
-(* $Id$ *)
-
-type range =
-  |  String
-  | Int
-  | Float of float * float
-  | Enum of string list
-  | Enum_string of string list
-  | Adjust
-  | CList_titles
-  | File
-
-class type prop =
-  object
-    method name : string       (* name of the property *)
-    method range : range       (* range of its values *)
-    method get : string                (* current value *)
-    method set : string -> unit        (* change value *)
-    method modified : bool     (* value differs from default *)
-    method code : string       (* encoded value for the ml code *)
-    method save_code : string   (* encoded value for saving *)
-  end
-
-class type tiwidget_base = object
-  method name : string
-  method proplist : (string * prop) list
-end