+
+importJava "org.simantics.fileimport.FileImportService" where
+ performFileImport :: String -> String -> <Proc> String
+ importGenericFileWithExtension :: String -> String -> <Proc> String
+ importGenericFileWithExtensionAndParent :: Resource -> String -> String -> <Proc> Resource
+ filterSupportedExtensions :: String -> <Proc> [String]
+
+importGenericFileToResource :: String -> String -> <Proc> Resource
+importGenericFileToResource path extension = do
+ resourceId = importGenericFileWithExtension path extension
+ syncRead (\_ -> resourceFromId (read resourceId :: Long))
+