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=8b76629928f2a3ffca982025af3378de13be89a3;hp=1ab714b789b9e635eb8ec8ab874daddfff8b1449;hb=4e4e1a6afd61fb03feaba789d99bd24c0ce68e8c;hpb=1ace215e82ee630279b6db4984c1f8c7a48e9a8b

diff --git a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl
index 1ab714b78..8b7662992 100644
--- a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl
+++ b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl
@@ -141,7 +141,9 @@ loop4 testScan testList found = do
 importJava "java.lang.System" where
     @JavaName "getProperty"
     getSystemProperty :: String -> Maybe String
-    
+    @JavaName setProperty
+    setSystemProperty :: String -> String -> <Proc> String
+
 importJava "org.simantics.modeling.LifeCycleContext" where
     data LifeCycleContext
 
@@ -150,5 +152,8 @@ importJava "org.simantics.modeling.ModelingUtils" where
     untrackDependencies :: <Proc> ()
     trackOntologicalRequirements :: <Proc> ()
     untrackOntologicalRequirements :: <Proc> ()
-    
+
+importJava "org.simantics.modeling.scl.SCLDependencyChangeListener" where
+    @JavaName "create"
+    createDependencyChangeListener :: (<Proc> Boolean) -> (MetadataI -> DependencyChanges -> <ReadGraph,Proc> ()) -> ChangeListener
     
\ No newline at end of file