diff options
Diffstat (limited to 'src/jvm')
-rw-r--r-- | src/jvm/clojure/lang/AnArray.java | 4 | ||||
-rw-r--r-- | src/jvm/clojure/lang/Associative.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/IPersistentMap.java | 1 |
3 files changed, 4 insertions, 3 deletions
diff --git a/src/jvm/clojure/lang/AnArray.java b/src/jvm/clojure/lang/AnArray.java index 93ead181..f9eaa9f4 100644 --- a/src/jvm/clojure/lang/AnArray.java +++ b/src/jvm/clojure/lang/AnArray.java @@ -43,11 +43,11 @@ public IMapEntry find(Object key) { return null;
}
-public IPersistentMap assoc(Object key, Object val) {
+public Associative assoc(Object key, Object val) {
if(key instanceof Number)
{
int i = ((Number)key).intValue();
- return (IPersistentMap) assocN(i,val);
+ return (Associative) assocN(i,val);
}
throw new IllegalAccessError("Key must be integer");
}
diff --git a/src/jvm/clojure/lang/Associative.java b/src/jvm/clojure/lang/Associative.java index 160a357e..cab4f23a 100644 --- a/src/jvm/clojure/lang/Associative.java +++ b/src/jvm/clojure/lang/Associative.java @@ -14,7 +14,7 @@ boolean contains(Object key); IMapEntry find(Object key);
-IPersistentMap assoc(Object key, Object val);
+Associative assoc(Object key, Object val);
Object get(Object key);
}
diff --git a/src/jvm/clojure/lang/IPersistentMap.java b/src/jvm/clojure/lang/IPersistentMap.java index 0ada98dc..3a32b27a 100644 --- a/src/jvm/clojure/lang/IPersistentMap.java +++ b/src/jvm/clojure/lang/IPersistentMap.java @@ -14,6 +14,7 @@ package clojure.lang; public interface IPersistentMap extends Iterable, IPersistentCollection, Associative {
+IPersistentMap assoc(Object key, Object val);
IPersistentMap assocEx(Object key, Object val) throws Exception;
IPersistentMap without(Object key);
|