From: jsimomaa <jani.simomaa@gmail.com>
Date: Thu, 4 Jan 2018 07:19:15 +0000 (+0200)
Subject: Added <Proc>-effect for function pmap in Async module
X-Git-Tag: v1.43.0~136^2~640
X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=commitdiff_plain;h=refs%2Fchanges%2F47%2F1347%2F1;p=simantics%2Fplatform.git

Added <Proc>-effect for function pmap in Async module

refs #7703

Change-Id: I435c69382b0e7a242c393f8529fd6ca40b4a68ed
---

diff --git a/bundles/org.simantics.scl.runtime/scl/Async.scl b/bundles/org.simantics.scl.runtime/scl/Async.scl
index 9ff397f19..f4b3a9298 100644
--- a/bundles/org.simantics.scl.runtime/scl/Async.scl
+++ b/bundles/org.simantics.scl.runtime/scl/Async.scl
@@ -1,3 +1,3 @@
 importJava "org.simantics.scl.runtime.utils.AsyncUtils" where
     runAsync :: (<Proc> a) -> <Proc> ()
-    pmap :: (a -> b) -> [a] -> [b]
+    pmap :: (a -> <Proc> b) -> [a] -> <Proc> [b]