diff options
author | Camil Staps | 2015-08-19 09:44:03 +0200 |
---|---|---|
committer | Camil Staps | 2015-08-19 09:44:03 +0200 |
commit | 47c6fb6fad27497acd2a55e18acca974907d8908 (patch) | |
tree | c08b35e1cba831d8687ebd3a759ba47d31eb2a03 /hello.icl | |
parent | Chapter 5 examples & tests (diff) |
Comments & cleanup
Diffstat (limited to 'hello.icl')
-rw-r--r-- | hello.icl | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/hello.icl b/hello.icl deleted file mode 100644 index 1988c6a..0000000 --- a/hello.icl +++ /dev/null @@ -1,17 +0,0 @@ -module hello - -import StdEnv, StdIO - -Start :: *World -> *World -Start world = startIO NDI Void initialise [] world -where - initialise pst - # (error,pst) = openDialog Void hello pst - | error <> NoError = closeProcess pst - | otherwise = pst - - hello = Dialog "ObjectIO" controls [WindowClose (noLS closeProcess)] - controls = TextControl "Hello World!" [] :+: - TextControl "Text 2" [] :+: - ButtonControl "Button" [] - |