From: Jussi Koskela <jussi.koskela@semantum.fi>
Date: Thu, 15 Feb 2018 10:48:51 +0000 (+0200)
Subject: Add Future to SCL API
X-Git-Tag: v1.43.0~136^2~588
X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=commitdiff_plain;h=8e8367aa523006cefa590f8cda8ed30818a6eb71;hp=fb2f890caf6406f83c2598c28519da7bfee57644

Add Future to SCL API

refs #7772

Change-Id: Ibcc74f90e3111b720d8969a393e2b115bbeefd72
---

diff --git a/bundles/org.simantics.scl.runtime/scl/Future.scl b/bundles/org.simantics.scl.runtime/scl/Future.scl
new file mode 100644
index 000000000..65bcd88e3
--- /dev/null
+++ b/bundles/org.simantics.scl.runtime/scl/Future.scl
@@ -0,0 +1,11 @@
+importJava "java.util.concurrent.Future" where
+    data Future a
+    
+    @JavaName get
+    getFutureResult :: Future a -> <Proc, Exception> a
+    @JavaName cancel
+    cancelFuture :: Future a -> Boolean -> <Proc> Boolean
+    @JavaName isCancelled
+    isFutureCancelled :: Future a -> <Proc> Boolean
+    @JavaName isDone
+    isFutureDone :: Future a -> <Proc> Boolean
\ No newline at end of file