got rid of LazyCons

1 files changed, 0 insertions, 78 deletions

diff --git a/src/jvm/clojure/lang/LazyCons.java b/src/jvm/clojure/lang/LazyCons.java
deleted file mode 100644
index 515cd2e9..00000000
--- a/src/jvm/clojure/lang/LazyCons.java
+++ /dev/null
@@ -1,78 +0,0 @@
-/**
- *   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.
- **/
-
-/* rich Aug 9, 2008 */
-
-package clojure.lang;
-
-final public class LazyCons extends ASeq{
-final private static ISeq sentinel = new Cons(null, null);
-IFn f;
-Object _first;
-ISeq _rest;
-
-public LazyCons(IFn f){
-	this.f = f;
-	this._first = sentinel;
-	this._rest = sentinel;
-}
-
-LazyCons(IPersistentMap meta, Object first, ISeq rest){
-	super(meta);
-	this._first = first;
-	this._rest = rest;
-}
-
-final
-synchronized
-public Object first(){
-	if(_first == sentinel)
-		{
-		try
-			{
-			_first = f.invoke();
-			}
-		catch(Exception ex)
-			{
-			throw new RuntimeException(ex);
-			}
-		}
-	return _first;
-}
-
-final
-synchronized
-public ISeq next(){
-	if(_rest == sentinel)
-		{
-		try
-			{
-			//force sequential evaluation
-			if(_first == sentinel)
-				first();
-			_rest = RT.seq(f.invoke(null));
-			}
-		catch(Exception ex)
-			{
-			throw new RuntimeException(ex);
-			}
-		f = null;
-		}
-	return _rest;
-}
-
-public LazyCons withMeta(IPersistentMap meta){
-	if(meta == meta())
-		return this;
-	//force before copying
-	next();
-	return new LazyCons(meta, _first, _rest);
-}
-}