Пример #1
0
void lenv_add_builtin(struct lenv* e, char* name, lfunc fn) {
    struct lval* v = lval_builtin(name, fn);
    lenv_put(e, name, v);
    lval_del(v);
}
void lenv_add_builtin(lenv* e, char* name, lbuiltin func) {
  lval* k = lval_sym(name);
  lval* v = lval_builtin(func);
  lenv_put(e, k, v);
  lval_del(k); lval_del(v);
}