Merge branch 'master' of git.martlubbers.net:clean-tests
[clean-tests.git] / test.icl
index 13d4dd1..21d4a89 100644 (file)
--- a/test.icl
+++ b/test.icl
@@ -1,9 +1,3 @@
 module test
+class C m :: u:m -> v:m
 
-import iTasks
-
-Start w = doTasks hello w
-
-hello :: Task String
-hello = enterInformation [] <<@ Title "What is your name?"
-       >>? \n->viewInformation [] ("Hello " +++ n) <<@ Title "Hello"