1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/clojure/lang/LazilyPersistentVector.java	Sat Aug 21 06:25:44 2010 -0400
     1.3 @@ -0,0 +1,34 @@
     1.4 +/**
     1.5 + *   Copyright (c) Rich Hickey. All rights reserved.
     1.6 + *   The use and distribution terms for this software are covered by the
     1.7 + *   Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php)
     1.8 + *   which can be found in the file epl-v10.html at the root of this distribution.
     1.9 + *   By using this software in any fashion, you are agreeing to be bound by
    1.10 + * 	 the terms of this license.
    1.11 + *   You must not remove this notice, or any other, from this software.
    1.12 + **/
    1.13 +
    1.14 +/* rich May 14, 2008 */
    1.15 +
    1.16 +package clojure.lang;
    1.17 +
    1.18 +import java.util.Collection;
    1.19 +
    1.20 +public class LazilyPersistentVector{
    1.21 +
    1.22 +
    1.23 +static public IPersistentVector createOwning(Object... items){
    1.24 +	if(items.length == 0)
    1.25 +		return PersistentVector.EMPTY;
    1.26 +	else if(items.length <= 32)
    1.27 +		return new PersistentVector(items.length, 5, PersistentVector.EMPTY_NODE,items);
    1.28 +	return PersistentVector.create(items);
    1.29 +}
    1.30 +
    1.31 +static public IPersistentVector create(Collection coll){
    1.32 +	if(!(coll instanceof ISeq) && coll.size() <= 32)
    1.33 +		return createOwning(coll.toArray());
    1.34 +	return PersistentVector.create(RT.seq(coll));
    1.35 +}
    1.36 +
    1.37 +}