diff options
author | Rich Hickey <richhickey@gmail.com> | 2006-08-04 22:31:21 +0000 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2006-08-04 22:31:21 +0000 |
commit | b47c234ac5a398894c8f3ce5dc7c06a5e7926e10 (patch) | |
tree | 198470083f9e1088315c8ce917904c9a2cae2ab7 /src/jvm/clojure | |
parent | 8c2c0ea39e31c05863a5f0d07fb3916a345c3da8 (diff) |
renamed ISequential to IPersistentCollection
Diffstat (limited to 'src/jvm/clojure')
-rw-r--r-- | src/jvm/clojure/lang/Cons.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/IArray.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/IPersistentCollection.java (renamed from src/jvm/clojure/lang/ISequential.java) | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/IPersistentMap.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/PersistentArrayMap.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/PersistentHashtableMap.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/PersistentListIdentityMap.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/PersistentListMap.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/PersistentTreeMap.java | 2 | ||||
-rw-r--r-- | src/jvm/clojure/lang/RT.java | 5 |
10 files changed, 11 insertions, 12 deletions
diff --git a/src/jvm/clojure/lang/Cons.java b/src/jvm/clojure/lang/Cons.java index 66551686..9d2895a1 100644 --- a/src/jvm/clojure/lang/Cons.java +++ b/src/jvm/clojure/lang/Cons.java @@ -12,7 +12,7 @@ package clojure.lang; -public class Cons implements ISeq, ISequential{ +public class Cons implements ISeq, IPersistentCollection { private final Object _first; private final ISeq _rest; diff --git a/src/jvm/clojure/lang/IArray.java b/src/jvm/clojure/lang/IArray.java index f8546c15..62298f94 100644 --- a/src/jvm/clojure/lang/IArray.java +++ b/src/jvm/clojure/lang/IArray.java @@ -10,7 +10,7 @@ package clojure.lang; * You must not remove this notice, or any other, from this software.
*/
-public interface IArray extends ISequential {
+public interface IArray extends IPersistentCollection {
int length();
Object get(int i);
diff --git a/src/jvm/clojure/lang/ISequential.java b/src/jvm/clojure/lang/IPersistentCollection.java index 3cf52e1b..0506ba78 100644 --- a/src/jvm/clojure/lang/ISequential.java +++ b/src/jvm/clojure/lang/IPersistentCollection.java @@ -11,7 +11,7 @@ package clojure.lang; */
-public interface ISequential {
+public interface IPersistentCollection {
ISeq seq() throws Exception;
diff --git a/src/jvm/clojure/lang/IPersistentMap.java b/src/jvm/clojure/lang/IPersistentMap.java index f3e0d45f..a70af0c2 100644 --- a/src/jvm/clojure/lang/IPersistentMap.java +++ b/src/jvm/clojure/lang/IPersistentMap.java @@ -11,7 +11,7 @@ package clojure.lang;
-public interface IPersistentMap extends Iterable, ISequential {
+public interface IPersistentMap extends Iterable, IPersistentCollection {
int count();
diff --git a/src/jvm/clojure/lang/PersistentArrayMap.java b/src/jvm/clojure/lang/PersistentArrayMap.java index c4bae5e7..f04fa5ca 100644 --- a/src/jvm/clojure/lang/PersistentArrayMap.java +++ b/src/jvm/clojure/lang/PersistentArrayMap.java @@ -23,7 +23,7 @@ import java.util.Iterator; * null keys and values are ok, but you won't be able to distinguish a null value via get - use contains/find
*/
-public class PersistentArrayMap extends Obj implements IPersistentMap, ISequential, Cloneable {
+public class PersistentArrayMap extends Obj implements IPersistentMap, IPersistentCollection, Cloneable {
final Object[] array;
static final int HASHTABLE_THRESHOLD = 42;
diff --git a/src/jvm/clojure/lang/PersistentHashtableMap.java b/src/jvm/clojure/lang/PersistentHashtableMap.java index c5e75a32..039d911c 100644 --- a/src/jvm/clojure/lang/PersistentHashtableMap.java +++ b/src/jvm/clojure/lang/PersistentHashtableMap.java @@ -193,7 +193,7 @@ static class Seq implements ISeq{ return new Seq(buckets,b,e.rest());
for(b = b+1;b<buckets.length();b++)
{
- ISequential a = (ISequential) buckets.get(b);
+ IPersistentCollection a = (IPersistentCollection) buckets.get(b);
if(a != null && a.seq() != null)
return new Seq(buckets,b,a.seq());
}
diff --git a/src/jvm/clojure/lang/PersistentListIdentityMap.java b/src/jvm/clojure/lang/PersistentListIdentityMap.java index 0fd86339..efc1f38a 100644 --- a/src/jvm/clojure/lang/PersistentListIdentityMap.java +++ b/src/jvm/clojure/lang/PersistentListIdentityMap.java @@ -28,7 +28,7 @@ import java.util.Iterator; * code duplication here is kind of gross, but most efficient
*/
-public class PersistentListIdentityMap extends Obj implements IPersistentMap, IMapEntry, ISeq, ISequential,Cloneable
+public class PersistentListIdentityMap extends Obj implements IPersistentMap, IMapEntry, ISeq, IPersistentCollection,Cloneable
{
static public PersistentListIdentityMap EMPTY = new PersistentListIdentityMap();
diff --git a/src/jvm/clojure/lang/PersistentListMap.java b/src/jvm/clojure/lang/PersistentListMap.java index f8fe6656..984c7c99 100644 --- a/src/jvm/clojure/lang/PersistentListMap.java +++ b/src/jvm/clojure/lang/PersistentListMap.java @@ -26,7 +26,7 @@ import java.util.Iterator; * * null keys and values are ok, but you won't be able to distinguish a null value via get - use contains/find */ -public class PersistentListMap extends Obj implements IPersistentMap, IMapEntry, ISeq, ISequential, Cloneable +public class PersistentListMap extends Obj implements IPersistentMap, IMapEntry, ISeq, IPersistentCollection, Cloneable { static public PersistentListMap EMPTY = new PersistentListMap(); diff --git a/src/jvm/clojure/lang/PersistentTreeMap.java b/src/jvm/clojure/lang/PersistentTreeMap.java index c83378c6..a18af9e0 100644 --- a/src/jvm/clojure/lang/PersistentTreeMap.java +++ b/src/jvm/clojure/lang/PersistentTreeMap.java @@ -22,7 +22,7 @@ import java.util.*; * See Okasaki, Kahrs, Larsen et al */ -public class PersistentTreeMap extends Obj implements IPersistentMap, ISequential, Cloneable { +public class PersistentTreeMap extends Obj implements IPersistentMap, IPersistentCollection, Cloneable { public final Comparator comp; public final Node tree; diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java index 8411508b..68f81982 100644 --- a/src/jvm/clojure/lang/RT.java +++ b/src/jvm/clojure/lang/RT.java @@ -16,7 +16,6 @@ import java.util.Iterator; import java.io.Reader; import java.io.PushbackReader; import java.io.Writer; -import java.io.IOException; public class RT{ @@ -67,8 +66,8 @@ public class RT{ static public ISeq seq(Object coll) throws Exception { if(coll == null || coll instanceof ISeq) return (ISeq) coll; - else if(coll instanceof ISequential) - return ((ISequential) coll).seq(); + else if(coll instanceof IPersistentCollection) + return ((IPersistentCollection) coll).seq(); else if(coll instanceof Iterable) return IteratorSeq.create(((Iterable) coll).iterator()); else if(coll instanceof Object[]) |