X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.modeling%2Fscl%2FSimantics%2FMisc.scl;h=1aed9d43eacfda41b6f63be5dce29dc3ad52f0bf;hp=8b76629928f2a3ffca982025af3378de13be89a3;hb=269ebef90930b55f6bfb61caa559d5df93be67ce;hpb=4e4e1a6afd61fb03feaba789d99bd24c0ce68e8c diff --git a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl index 8b7662992..1aed9d43e 100644 --- a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl +++ b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl @@ -2,15 +2,6 @@ import "Simantics/Entity" hiding (nameOf) include "File" import "StandardLibrary" hiding (group) -/* -importJava "java.io.File" where - data File - - @JavaName "" - file :: String -> File - -*/ - importJava "java.util.Scanner" where data Scanner @@ -29,22 +20,7 @@ importJava "java.util.Scanner" where @JavaName "nextLine" scanNextLine :: Scanner -> String -importJava "java.util.regex.Pattern" where - data Pattern - - @JavaName "compile" - compile :: String -> Pattern - - @JavaName "matcher" - matcher :: Pattern -> String -> Matcher - -importJava "java.util.regex.Matcher" where - data Matcher - - @JavaName "matches" - matches :: Matcher -> Boolean - - group :: Matcher -> String +include "String" importJava "org.simantics.utils.ui.BundleUtils" where @JavaName "findFile" @@ -143,6 +119,8 @@ importJava "java.lang.System" where getSystemProperty :: String -> Maybe String @JavaName setProperty setSystemProperty :: String -> String -> String + + currentTimeMillis :: Long importJava "org.simantics.modeling.LifeCycleContext" where data LifeCycleContext