|
Java example source code file (ASeq.java)
The ASeq.java Java example source code/** * Copyright (c) Rich Hickey. All rights reserved. * The use and distribution terms for this software are covered by the * Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php) * which can be found in the file epl-v10.html at the root of this distribution. * By using this software in any fashion, you are agreeing to be bound by * the terms of this license. * You must not remove this notice, or any other, from this software. **/ package clojure.lang; import java.io.Serializable; import java.util.*; public abstract class ASeq extends Obj implements ISeq, Sequential, List, Serializable, IHashEq { transient int _hash; transient int _hasheq; public String toString(){ return RT.printString(this); } public IPersistentCollection empty(){ return PersistentList.EMPTY; } protected ASeq(IPersistentMap meta){ super(meta); } protected ASeq(){ } public boolean equiv(Object obj){ if(!(obj instanceof Sequential || obj instanceof List)) return false; ISeq ms = RT.seq(obj); for(ISeq s = seq(); s != null; s = s.next(), ms = ms.next()) { if(ms == null || !Util.equiv(s.first(), ms.first())) return false; } return ms == null; } public boolean equals(Object obj){ if(this == obj) return true; if(!(obj instanceof Sequential || obj instanceof List)) return false; ISeq ms = RT.seq(obj); for(ISeq s = seq(); s != null; s = s.next(), ms = ms.next()) { if(ms == null || !Util.equals(s.first(), ms.first())) return false; } return ms == null; } public int hashCode(){ if(_hash == 0) { int hash = 1; for(ISeq s = seq(); s != null; s = s.next()) { hash = 31 * hash + (s.first() == null ? 0 : s.first().hashCode()); } this._hash = hash; } return _hash; } public int hasheq(){ if(_hasheq == 0) { // int hash = 1; // for(ISeq s = seq(); s != null; s = s.next()) // { // hash = 31 * hash + Util.hasheq(s.first()); // } // this._hasheq = hash; _hasheq = Murmur3.hashOrdered(this); } return _hasheq; } //public Object reduce(IFn f) { // Object ret = first(); // for(ISeq s = rest(); s != null; s = s.rest()) // ret = f.invoke(ret, s.first()); // return ret; //} // //public Object reduce(IFn f, Object start) { // Object ret = f.invoke(start, first()); // for(ISeq s = rest(); s != null; s = s.rest()) // ret = f.invoke(ret, s.first()); // return ret; //} //public Object peek(){ // return first(); //} // //public IPersistentList pop(){ // return rest(); //} public int count(){ int i = 1; for(ISeq s = next(); s != null; s = s.next(), i++) if(s instanceof Counted) return i + s.count(); return i; } final public ISeq seq(){ return this; } public ISeq cons(Object o){ return new Cons(o, this); } public ISeq more(){ ISeq s = next(); if(s == null) return PersistentList.EMPTY; return s; } //final public ISeq rest(){ // Seqable m = more(); // if(m == null) // return null; // return m.seq(); //} // java.util.Collection implementation public Object[] toArray(){ return RT.seqToArray(seq()); } public boolean add(Object o){ throw new UnsupportedOperationException(); } public boolean remove(Object o){ throw new UnsupportedOperationException(); } public boolean addAll(Collection c){ throw new UnsupportedOperationException(); } public void clear(){ throw new UnsupportedOperationException(); } public boolean retainAll(Collection c){ throw new UnsupportedOperationException(); } public boolean removeAll(Collection c){ throw new UnsupportedOperationException(); } public boolean containsAll(Collection c){ for(Object o : c) { if(!contains(o)) return false; } return true; } public Object[] toArray(Object[] a){ return RT.seqToPassedArray(seq(), a); } public int size(){ return count(); } public boolean isEmpty(){ return seq() == null; } public boolean contains(Object o){ for(ISeq s = seq(); s != null; s = s.next()) { if(Util.equiv(s.first(), o)) return true; } return false; } public Iterator iterator(){ return new SeqIterator(this); } //////////// List stuff ///////////////// private List reify(){ return Collections.unmodifiableList(new ArrayList(this)); } public List subList(int fromIndex, int toIndex){ return reify().subList(fromIndex, toIndex); } public Object set(int index, Object element){ throw new UnsupportedOperationException(); } public Object remove(int index){ throw new UnsupportedOperationException(); } public int indexOf(Object o){ ISeq s = seq(); for(int i = 0; s != null; s = s.next(), i++) { if(Util.equiv(s.first(), o)) return i; } return -1; } public int lastIndexOf(Object o){ return reify().lastIndexOf(o); } public ListIterator listIterator(){ return reify().listIterator(); } public ListIterator listIterator(int index){ return reify().listIterator(index); } public Object get(int index){ return RT.nth(this, index); } public void add(int index, Object element){ throw new UnsupportedOperationException(); } public boolean addAll(int index, Collection c){ throw new UnsupportedOperationException(); } } Other Java examples (source code examples)Here is a short list of links related to this Java ASeq.java source code file: |
... this post is sponsored by my books ... | |
#1 New Release! |
FP Best Seller |
Copyright 1998-2024 Alvin Alexander, alvinalexander.com
All Rights Reserved.
A percentage of advertising revenue from
pages under the /java/jwarehouse
URI on this website is
paid back to open source projects.