+import "MMap" as MMap\r
+\r
+importJava "org.simantics.fileimport.scl.DropinsSCL" where\r
+ uploadToDropinsBase64 :: String -> String -> <Proc> ()\r
+ getUploadedFiles :: () -> <Proc> MMap.T String Long\r
+ removeFileForId :: Long -> <Proc> ()\r
+\r
+getUploadedDropinFiles :: () -> <Proc> [Long]\r
+getUploadedDropinFiles dummy = do\r
+ files = getUploadedFiles ()\r
+ MMap.values files
\ No newline at end of file