예제 #1
0
        internal LispObject Evaluate(string command)
        {
            getInterpreter();
            LispObject cmd    = Lisp.readObjectFromString(command);
            LispObject result = Lisp.eval(cmd);

            return(result);
        }
예제 #2
0
 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);
     }
 }