X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.modeling%2Fscl%2FSimantics%2FMisc.scl;h=945e913a69fd71b925581eede8f4a76ad3999387;hb=3edbf85ff8a7f1bd596857a24b1bdebd66943d6b;hp=e3c7977155964bea6611bafe067df0d05f277211;hpb=0ae2b770234dfc3cbb18bd38f324125cf0faca07;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 e3c797715..945e913a6 100644 --- a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl +++ b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl @@ -140,7 +140,7 @@ loop4 testScan testList found = do importJava "java.lang.System" where @JavaName "getProperty" - getSystemProperty :: String -> String + getSystemProperty :: String -> Maybe String importJava "org.simantics.modeling.LifeCycleContext" where data LifeCycleContext @@ -148,5 +148,10 @@ importJava "org.simantics.modeling.LifeCycleContext" where 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