예제 #1
0
파일: evaluation.c 프로젝트: WilenceYao/ml
lval* lval_eval(lval* v) {
    /* Evaluate Sexpressions */
    if (v->type == LVAL_SEXPR) { return lval_eval_sexpr(v); }

    /* All other lval types remain the same */
    return v;
}
예제 #2
0
파일: eval.c 프로젝트: beatrichartz/lispy
lval *lval_eval(lval *v) {
    if (v->type == LVAL_SEXPR) {
        return lval_eval_sexpr(v);
    }

    return v;
}
예제 #3
0
파일: lval.c 프로젝트: tsmarsh/lispy
lval* lval_eval(lenv* e, lval* v) {
  if (v->type == LVAL_SYM) {
    lval* x = lenv_get(e, v);
    lval_del(v);
    return x;
  }
  if (v->type == LVAL_SEXPR) { return lval_eval_sexpr(e, v); }
  return v;
}
예제 #4
0
파일: lirad.c 프로젝트: VileVial/Lirad
lval *lval_eval(lenv *e, lval *v)
{
  if (v->type == LVAL_SYM)
  {
    lval *x = lenv_get(e, v);
    lval_del(v);
    return x;
  }
  // eval sexpr
  if (v->type == LVAL_SEXPR)
  {
    return lval_eval_sexpr(e, v);
  }
  // other lval type remain the same
  return v;
}