summaryrefslogtreecommitdiff
path: root/test/test.icl
diff options
context:
space:
mode:
Diffstat (limited to 'test/test.icl')
-rw-r--r--test/test.icl18
1 files changed, 18 insertions, 0 deletions
diff --git a/test/test.icl b/test/test.icl
new file mode 100644
index 0000000..5717add
--- /dev/null
+++ b/test/test.icl
@@ -0,0 +1,18 @@
+module test
+
+import StdMaybe
+
+import Control.Applicative
+import Control.Monad
+import Control.Monad.Identity
+import Control.Monad.State
+
+import Gtk.Signal
+import Gtk.State
+import Gtk.Widgets
+
+Start w = runGtk app w
+where
+ app =
+ newWindow "Hello!" Nothing >>= \window ->
+ installSignalHandler window (DestroyHandler quit)