From 8e8367aa523006cefa590f8cda8ed30818a6eb71 Mon Sep 17 00:00:00 2001
From: Jussi Koskela <jussi.koskela@semantum.fi>
Date: Thu, 15 Feb 2018 12:48:51 +0200
Subject: [PATCH 1/1] Add Future to SCL API

refs #7772

Change-Id: Ibcc74f90e3111b720d8969a393e2b115bbeefd72
---
 bundles/org.simantics.scl.runtime/scl/Future.scl | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 bundles/org.simantics.scl.runtime/scl/Future.scl

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
-- 
2.43.2