1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/clojure/lang/ATransientSet.java	Sat Aug 21 06:25:44 2010 -0400
     1.3 @@ -0,0 +1,54 @@
     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 Mar 3, 2008 */
    1.15 +
    1.16 +package clojure.lang;
    1.17 +
    1.18 +public abstract class ATransientSet extends AFn implements ITransientSet{
    1.19 +	ITransientMap impl;
    1.20 +
    1.21 +	ATransientSet(ITransientMap impl) {
    1.22 +		this.impl = impl;
    1.23 +	}
    1.24 +	
    1.25 +	public int count() {
    1.26 +		return impl.count();
    1.27 +	}
    1.28 +
    1.29 +	public ITransientSet conj(Object val) {
    1.30 +		ITransientMap m = impl.assoc(val, val);
    1.31 +		if (m != impl) this.impl = m;
    1.32 +		return this;
    1.33 +	}
    1.34 +
    1.35 +	public boolean contains(Object key) {
    1.36 +		return this != impl.valAt(key, this);
    1.37 +	}
    1.38 +
    1.39 +	public ITransientSet disjoin(Object key) throws Exception {
    1.40 +		ITransientMap m = impl.without(key);
    1.41 +		if (m != impl) this.impl = m;
    1.42 +		return this;
    1.43 +	}
    1.44 +
    1.45 +	public Object get(Object key) {
    1.46 +		return impl.valAt(key);
    1.47 +	}
    1.48 +
    1.49 +	public Object invoke(Object key, Object notFound) throws Exception {
    1.50 +		return impl.valAt(key, notFound);
    1.51 +	}
    1.52 +
    1.53 +	public Object invoke(Object key) throws Exception {
    1.54 +		return impl.valAt(key);	
    1.55 +	}
    1.56 +	
    1.57 +}