1 files changed, 12 insertions, 5 deletions
diff --git a/src/cli/runtime/Obj.cs b/src/cli/runtime/Obj.cs
index 7058ebe3..9a165e67 100644
--- a/src/cli/runtime/Obj.cs
+++ b/src/cli/runtime/Obj.cs
@@ -20,9 +20,9 @@ public class Obj
 {
 
 HybridDictionary attrs;
-public static int INITIAL_SIZE = 7;
-
-public Object put(Keyword key, Object val)
+public static int INITIAL_SIZE = 7;
+
+public Object put(IComparable key, Object val)
 	{
 	if(attrs == null)
 		attrs = new HybridDictionary(INITIAL_SIZE);
@@ -30,11 +30,18 @@ public Object put(Keyword key, Object val)
 	return val;
 	}
 
-public Object get(Keyword key)
+public Object get(IComparable key)
 	{
 	if(attrs == null)
 		return null;
 	return attrs[key];
-	}
+	}
+
+public bool has(IComparable key)
+    {
+    if (attrs == null)
+        return false;
+    return attrs.Contains(key);
+    }
 }
 }
 \ No newline at end of file