package luan.impl;

import luan.LuanCloneable;
import luan.LuanCloner;
import luan.LuanImmutabler;
import luan.LuanException;


public final class Pointer implements LuanCloneable {
	private Object o;
	private boolean immutable = false;

	public Pointer() {}

	public Pointer(Object o) {
		this.o = o;
	}

	@Override public Pointer shallowClone() {
		return new Pointer();
	}

	@Override public void deepenClone(LuanCloneable clone,LuanCloner cloner) {
		((Pointer)clone).o = cloner.get(o);
	}

	@Override public void makeImmutable(LuanImmutabler immutabler) throws LuanException {
		immutabler.makeImmutable(o);
		immutable = true;
	}

	public Object get() {
		return o;
	}

	public void set(Object o) throws LuanException {
		if( immutable )
			throw new LuanException("variable is immutable");
		this.o = o;
	}
}