From: Tuukka Lehtonen <tuukka.lehtonen@semantum.fi>
Date: Thu, 19 Apr 2018 06:25:05 +0000 (+0300)
Subject: Merge "Some SCL functions to control graphical debugger"
X-Git-Tag: v1.43.0~136^2~491
X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=commitdiff_plain;h=801fcbb85a8c63042fd9bb9775448dd962105dde;hp=58a208e96edcddb07af89796859416dc6fc59f14

Merge "Some SCL functions to control graphical debugger"
---

diff --git a/bundles/org.simantics.databoard/src/org/simantics/databoard/binding/impl/ObjectVariantBinding.java b/bundles/org.simantics.databoard/src/org/simantics/databoard/binding/impl/ObjectVariantBinding.java
index edea4d360..45f3ae8f0 100644
--- a/bundles/org.simantics.databoard/src/org/simantics/databoard/binding/impl/ObjectVariantBinding.java
+++ b/bundles/org.simantics.databoard/src/org/simantics/databoard/binding/impl/ObjectVariantBinding.java
@@ -11,6 +11,7 @@
  *******************************************************************************/
 package org.simantics.databoard.binding.impl;
 
+import java.util.Objects;
 import java.util.Set;
 
 import org.simantics.databoard.adapter.AdaptException;
@@ -191,4 +192,9 @@ public class ObjectVariantBinding  extends VariantBinding {
 		ObjectVariantBinding o = (ObjectVariantBinding)obj;
 		return super.baseEquals( obj ) && o.adapterFactory == adapterFactory && o.bindingFactory == bindingFactory;
 	}
+	
+	@Override
+	public boolean equals(Object o1, Object o2) {
+		return Objects.equals(o1, o2);
+	}
 }
diff --git a/bundles/org.simantics.databoard/src/org/simantics/databoard/util/DataValueUtil.java b/bundles/org.simantics.databoard/src/org/simantics/databoard/util/DataValueUtil.java
index c4e41c6da..89b167ad9 100644
--- a/bundles/org.simantics.databoard/src/org/simantics/databoard/util/DataValueUtil.java
+++ b/bundles/org.simantics.databoard/src/org/simantics/databoard/util/DataValueUtil.java
@@ -110,7 +110,7 @@ public class DataValueUtil {
     	// Not implemented yet
     	if (b1 == b2) {
     		try {
-    			return b1.compare(o1, o2) == 0;
+    			return b1.equals(o1, o2);
     		} catch (RuntimeBindingException e) {
     			throw e.getCause();
     		}
diff --git a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl
index e334852ab..1aed9d43e 100644
--- a/bundles/org.simantics.modeling/scl/Simantics/Misc.scl
+++ b/bundles/org.simantics.modeling/scl/Simantics/Misc.scl
@@ -119,6 +119,8 @@ importJava "java.lang.System" where
     getSystemProperty :: String -> Maybe String
     @JavaName setProperty
     setSystemProperty :: String -> String -> <Proc> String
+    
+    currentTimeMillis :: Long
 
 importJava "org.simantics.modeling.LifeCycleContext" where
     data LifeCycleContext