made (stream astream) identity

Author: richhickey

src/jvm/clojure/lang/AStream.java

@@ -35,9 +35,9 @@ final synchronized public ISeq seq() {
     }
 
     final synchronized public AStream stream() throws Exception {
-        if (seq == NO_SEQ)
+//        if (seq == NO_SEQ)
             return this;
-        return RT.stream(seq);
+//        return RT.stream(seq);
     }
 
     final synchronized public Iter iter() {

src/jvm/clojure/lang/RT.java

@@ -703,7 +703,7 @@ else if(coll instanceof String)
 		return Character.valueOf(((String) coll).charAt(n));
 	else if(coll.getClass().isArray())
 		return Reflector.prepRet(Array.get(coll, n));
-	else if(coll instanceof List)
+	else if(coll instanceof RandomAccess)
 		return ((List) coll).get(n);
 	else if(coll instanceof Matcher)
 		return ((Matcher) coll).group(n);
@@ -758,7 +758,7 @@ else if(coll.getClass().isArray())
 			return Reflector.prepRet(Array.get(coll, n));
 		return notFound;
 		}
-	else if(coll instanceof List)
+	else if(coll instanceof RandomAccess)
 		{
 		List list = (List) coll;
 		if(n < list.size())