Mercurial Hosting > luan
view core/src/luan/LuanState.java @ 550:b2139b21b49c 0.10
use Io.repr() in lucene/Web_search
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Wed, 17 Jun 2015 19:50:32 -0600 |
parents | ef0336efe33c |
children | f1601a4ce1aa |
line wrap: on
line source
package luan; import java.io.Closeable; import java.io.IOException; import java.lang.ref.Reference; import java.lang.ref.WeakReference; import java.util.List; import java.util.ArrayList; import java.util.Map; import java.util.HashMap; import luan.impl.LuanCompiler; import luan.modules.BasicLuan; public abstract class LuanState implements DeepCloneable { final List<StackTraceElement> stackTrace = new ArrayList<StackTraceElement>(); private Map registry; private final List<Reference<Closeable>> onClose = new ArrayList<Reference<Closeable>>(); protected LuanState() { registry = new HashMap(); } protected LuanState(LuanState luan) {} @Override public void deepenClone(DeepCloneable clone,DeepCloner cloner) { ((LuanState)clone).registry = cloner.deepClone(registry); } public abstract boolean hasJava(); public abstract void setJava(); public abstract LuanSource currentSource(); public final Map registry() { return registry; } public void onClose(Closeable c) { onClose.add(new WeakReference<Closeable>(c)); } public void close() throws IOException { for( Reference<Closeable> ref : onClose ) { Closeable c = ref.get(); if( c != null ) c.close(); } onClose.clear(); } public static LuanState newInstance() { return LuanCompiler.newLuanState(); } public final Object eval(String cmd) throws LuanException { return eval(cmd,new LuanTable()); } public final Object eval(String cmd,LuanTable env) throws LuanException { LuanFunction fn = BasicLuan.load(this,cmd,"eval",env,true); return call(fn); } public String toString(Object obj) throws LuanException { if( obj instanceof LuanTable ) { LuanTable tbl = (LuanTable)obj; return tbl.toString(this); } if( obj == null ) return "nil"; if( obj instanceof Number ) return Luan.toString((Number)obj); if( obj instanceof byte[] ) return "binary: " + Integer.toHexString(obj.hashCode()); return obj.toString(); } public final LuanBit bit(LuanElement el) { return new LuanBit(this,el); } // convenience methods final LuanBit JAVA = bit(null); public LuanException exception(Object msg) throws LuanException { return JAVA.exception(msg); } public Object call(LuanFunction fn) throws LuanException { return call(fn,null,LuanFunction.NOTHING); } public Object call(LuanFunction fn,String fnName) throws LuanException { return call(fn,fnName,LuanFunction.NOTHING); } public Object call(LuanFunction fn,Object[] args) throws LuanException { return call(fn,null,args); } public Object call(LuanFunction fn,String fnName,Object[] args) throws LuanException { return JAVA.call(fn,fnName,args); } public Boolean checkBoolean(Object obj) throws LuanException { return JAVA.checkBoolean(obj); } public String checkString(Object obj) throws LuanException { return JAVA.checkString(obj); } public LuanFunction checkFunction(Object obj) throws LuanException { return JAVA.checkFunction(obj); } public boolean isLessThan(Object o1,Object o2) throws LuanException { return JAVA.isLessThan(o1,o2); } }