X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;ds=sidebyside;f=bundles%2Forg.simantics.modeling%2Fscl%2FSimantics%2FMisc.scl;h=9beae67b3be509b2d9d51fede98549adb987a763;hb=bb2fdfbd51d98e44950c3236a606e587842689e2;hp=c00c564e839fb8d662134c0821e78baaa0f51689;hpb=51006ffec13cbf8e0d9c8b07212d69478e4bdd4e;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl index c00c564e8..9beae67b3 100644 --- a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl +++ b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl @@ -141,12 +141,21 @@ loop4 testScan testList found = do importJava "java.lang.System" where @JavaName "getProperty" getSystemProperty :: String -> Maybe String + @JavaName setProperty + setSystemProperty :: String -> String -> String + currentTimeMillis :: Long + importJava "org.simantics.modeling.LifeCycleContext" where data LifeCycleContext importJava "org.simantics.modeling.ModelingUtils" where trackDependencies :: () untrackDependencies :: () - + trackOntologicalRequirements :: () + untrackOntologicalRequirements :: () + +importJava "org.simantics.modeling.scl.SCLDependencyChangeListener" where + @JavaName "create" + createDependencyChangeListener :: ( Boolean) -> (MetadataI -> DependencyChanges -> ()) -> ChangeListener \ No newline at end of file