X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=append-ed%2Ftest.icl;fp=append-ed%2Ftest.icl;h=0000000000000000000000000000000000000000;hb=4b62b5d397d86147e393c05b3083af74a3a0c4af;hp=5c101f5dd1ab74008df213a2fa47bb889b317cf4;hpb=e5305ee9d4290e1aa803a2e62a14f32e5cd29782;p=clean-tests.git diff --git a/append-ed/test.icl b/append-ed/test.icl deleted file mode 100644 index 5c101f5..0000000 --- a/append-ed/test.icl +++ /dev/null @@ -1,11 +0,0 @@ -module test - -import qualified Data.Map as DM -import iTasks - -Start w = startEngine t w - -t = withShared ["somedata"] \l-> - forever (chooseAction [((Action "Empty"), ())] >>- \_->set [] l) - //-&&- updateSharedInformation [UpdateAs 11 - -&&- viewSharedInformation "View" [] l