diff gui.urs @ 8:90be8b8917d5

Add a widget that opens and closes a panel.
author Karn Kallio <kkallio@eka>
date Fri, 17 Jun 2011 10:12:05 -0430
parents
children 16447dc6a68c
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/gui.urs	Fri Jun 17 10:12:05 2011 -0430
@@ -0,0 +1,14 @@
+(* Gui framework elements common across individual components. *)
+
+class gui
+(* Types of this class describe gui components. *)
+
+val toXml : t ::: Type -> gui t -> t -> xbody
+(* Currently the only thing a gui component can do is be
+ * pretty printed to a piece of xml. *)
+
+val gui_xbody : gui xbody
+(* Xml itself can be a gui component. *)
+
+val mkGui : t ::: Type -> (t -> xbody) -> gui t
+(* How to add components to the gui class. *)