changed return type of assoc to Associative

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);