summaryrefslogtreecommitdiff
path: root/src/cli/runtime/PersistentArrayMap.cs
diff options
context:
space:
mode:
Diffstat (limited to 'src/cli/runtime/PersistentArrayMap.cs')
-rw-r--r--src/cli/runtime/PersistentArrayMap.cs21
1 files changed, 17 insertions, 4 deletions
diff --git a/src/cli/runtime/PersistentArrayMap.cs b/src/cli/runtime/PersistentArrayMap.cs
index 6cc42aad..df874d1a 100644
--- a/src/cli/runtime/PersistentArrayMap.cs
+++ b/src/cli/runtime/PersistentArrayMap.cs
@@ -62,10 +62,23 @@ public IMapEntry find(Object key) {
return null;
}
-public IPersistentMap add(Object key) {
-
- return put(key,null);
-}
+public IPersistentMap add(Object key, Object val) {
+ int i = indexOf(key);
+ Object[] newArray;
+ if(i >= 0)
+ {
+ throw new Exception("Key already present");
+ }
+ else //didn't have key, grow
+ {
+ newArray = new Object[array.Length + 2];
+ if(array.Length > 0)
+ Array.Copy(array,0,newArray,2,array.Length);
+ newArray[0] = key;
+ newArray[1] = val;
+ }
+ return create(newArray);
+ }
public IPersistentMap put(Object key, Object val) {
int i = indexOf(key);