Add Future to SCL API

[simantics/platform.git] / bundles / org.simantics.scl.runtime / scl / Files.scl

diff --git a/bundles/org.simantics.scl.runtime/scl/Files.scl b/bundles/org.simantics.scl.runtime/scl/Files.scl
index 6af9a176022139ccc8d8ae7a8dcbbb41341ba960..069076fefdd2edaf261e6c62e4a21aa00a15cc6a 100644 (file)
--- a/bundles/org.simantics.scl.runtime/scl/Files.scl
+++ b/bundles/org.simantics.scl.runtime/scl/Files.scl
@@ -76,7 +76,7 @@ importJava "java.nio.file.Files" where
     createDirectoriesWithFileAttributes :: Path -> Vector FileAttribute -> <Proc, Exception> Path
 
     @JavaName createTempFile
-    createTempFileWithFileAttributes :: Path -> String -> String -> Vector FileAttribute -> <Proc, Exception> Path
+    createTempFileWithFileAttributes :: String -> String -> Vector FileAttribute -> <Proc, Exception> Path
 
     delete :: Path -> <Proc, Exception> ()
 
@@ -113,6 +113,7 @@ importJava "java.nio.file.Files" where
     copyToOutputStream :: Path -> OutputStream -> <Proc, Exception> Long 
 
     readAllBytes :: Path -> <Proc, Exception> Vector Byte
+    write :: Path -> Vector Byte -> Vector OpenOption -> <Proc,Exception> ()
 
     @JavaName readAllLines
     readAllLinesWithCharset :: Path -> Charset -> <Proc, Exception> [String]
@@ -137,8 +138,8 @@ createDirectory path = createDirectoryWithFileAttributes path (vector [])
 createDirectories :: Path -> <Proc, Exception> Path
 createDirectories path = createDirectoriesWithFileAttributes path (vector [])
 
-createTempFile :: Path -> String -> String -> <Proc, Exception> Path
-createTempFile dir prefix suffix = createTempFileWithFileAttributes dir prefix suffix (vector [])
+createTempFile :: String -> String -> <Proc, Exception> Path
+createTempFile prefix suffix = createTempFileWithFileAttributes prefix suffix (vector [])
 
 copy :: Path -> Path -> <Proc, Exception> Path
 copy source target = copyWithCopyOptions source target (vector [])