1 import "MMap" as MMap
\r
3 importJava "org.simantics.fileimport.scl.DropinsSCL" where
\r
4 uploadToDropinsBase64 :: String -> String -> <Proc> ()
\r
5 getUploadedFiles :: () -> <Proc> MMap.T String Long
\r
6 removeFileForId :: Long -> <Proc> ()
\r
8 getUploadedDropinFiles :: () -> <Proc> [Long]
\r
9 getUploadedDropinFiles dummy = do
\r
10 files = getUploadedFiles ()
\r