Merge branch 'master' of git.martlubbers.net:clean-tests
authorMart Lubbers <mart@martlubbers.net>
Mon, 23 Mar 2020 07:34:17 +0000 (08:34 +0100)
committerMart Lubbers <mart@martlubbers.net>
Mon, 23 Mar 2020 07:34:17 +0000 (08:34 +0100)
cloudiTasks/cloudiTasks.icl
cloudiTasks/slave/cloudiTasks [deleted file]

index 73dec05..f5dbace 100644 (file)
@@ -10,13 +10,11 @@ master :: Task ()
 master
        = get applicationOptions
        >>- \eo->traceValue ("Master started on port " +++ toString eo.serverPort)
+//     >-| set 42 (remoteShare (sharedStore "bork" 42) {domain="localhost",port=9099})
 //     >-| asyncTask (ExistingNode "localhost" 9099) (blockWait 5)
 //     >-| asyncTask "localhost" 9090 (blockWait 5)
 //     >-| asyncTask (PrivateNode 9099) (traceValue 5 >-| traceValue 42)
-       >-| asyncTaskSpawn 9099 (return 42)
-       >-| asyncTaskSpawn 9099 (updateInformation [] 42)
-//     >-| (updateInformation [] 42 -&&- updateInformation [] 22) @. ("localhost", 9099)
-//     >-| asyncTaskSpawn 9099 (updateInformation [] 42 -&&- updateInformation [] 22)
+       >-| asyncTask "localhost" 9099 (updateInformation [] 5)
 //     >-| sleepSortPar [5,1,3,8]
        >&^ viewSharedInformation []
        @! ()
diff --git a/cloudiTasks/slave/cloudiTasks b/cloudiTasks/slave/cloudiTasks
deleted file mode 100755 (executable)
index 6c6bf4d..0000000
Binary files a/cloudiTasks/slave/cloudiTasks and /dev/null differ