internal LispObject Evaluate(string command)
{
getInterpreter();
LispObject cmd = Lisp.readObjectFromString(command);
LispObject result = Lisp.eval(cmd);
return(result);
}
public override object Read(string p, TextReader stringCodeReader, OutputDelegate WriteLine)
{
try
{
getInterpreter();
return(Lisp.readObjectFromString(stringCodeReader.ReadToEnd()));
}
catch (Exception e)
{
WriteLine(e.ToString());
return(Lisp.EOF);
}
}