public override object Do(KObject args, KEnvironment env, Continuation <KObject> cont) { CPara(args, 1); Continuation <KObject> result = myc.Value; if (result.Context == null) { return(CPS.Return(First(args), CPS.RootContinuation <KObject>())); } return(result.Call(First(args))); }
public static KObject Eval(KObject datum, KEnvironment env) { return(CPS.Execute <KObject>(() => rceval(datum, env, CPS.RootContinuation <KObject>()))); }