Support equality on reference types

1 files changed, 14 insertions, 0 deletions

diff --git a/src/main/java/org/zwobble/couscous/interpreter/values/InternalCouscousInterpeterValue.java b/src/main/java/org/zwobble/couscous/interpreter/values/InternalCouscousInterpeterValue.java
new file mode 100644
index 0000000..30645d6
--- /dev/null
+++ b/src/main/java/org/zwobble/couscous/interpreter/values/InternalCouscousInterpeterValue.java
@@ -0,0 +1,14 @@
+package org.zwobble.couscous.interpreter.values;
+
+import org.zwobble.couscous.values.ObjectValue;
+
+import static java.util.Arrays.asList;
+
+public class InternalCouscousInterpeterValue {
+    public static final ConcreteType TYPE = ConcreteType.classBuilder("_couscous")
+        .staticMethod("same", asList(ObjectValue.REF, ObjectValue.REF),
+            (environment, arguments) ->
+                new BooleanInterpreterValue(arguments.get(0) == arguments.get(1)))
+        
+        .build();
+}