Esempio n. 1
0
void lenv_add_builtins(lenv* e){
    lenv_add_builtin(e, "list", builtin_list);
    lenv_add_builtin(e, "head", builtin_head);
    lenv_add_builtin(e, "tail", builtin_head);
    lenv_add_builtin(e, "eval", builtin_eval);
    lenv_add_builtin(e, "join", builtin_join);

    lenv_add_builtin(e, "+", builtin_add);
    lenv_add_builtin(e, "-", builtin_sub);
    lenv_add_builtin(e, "*", builtin_mul);
    lenv_add_builtin(e, "/", builtin_div);
}
Esempio n. 2
0
void lenv_add_builtins(lenv* e)
{
  // List functions
  lenv_add_builtin(e, "list", builtin_list);
  lenv_add_builtin(e, "head", builtin_head);
  lenv_add_builtin(e, "tail", builtin_tail);
  lenv_add_builtin(e, "join", builtin_join);
  lenv_add_builtin(e, "eval", builtin_eval);

  // Math functions
  lenv_add_builtin(e, "+", builtin_add);
  lenv_add_builtin(e, "-", builtin_sub);
  lenv_add_builtin(e, "*", builtin_mul);
  lenv_add_builtin(e, "/", builtin_div);

  // Variable functions
  lenv_add_builtin(e, "\\",  builtin_lambda);
  lenv_add_builtin(e, "def", builtin_def);
  lenv_add_builtin(e, "=",   builtin_add);
}
Esempio n. 3
0
void lenv_add_builtins(lenv *e)
{
  /* List Functions */
  lenv_add_builtin(e, "=", builtin_put);
  lenv_add_builtin(e, "\\", builtin_lambda);
  lenv_add_builtin(e, "def",  builtin_def);
  lenv_add_builtin(e, "eval", builtin_eval);
  lenv_add_builtin(e, "head", builtin_head);
  lenv_add_builtin(e, "join", builtin_join);
  lenv_add_builtin(e, "list", builtin_list);
  lenv_add_builtin(e, "tail", builtin_tail);

  /* Mathematical Functions */
  lenv_add_builtin(e, "+", builtin_add);
  lenv_add_builtin(e, "/", builtin_div);
  lenv_add_builtin(e, "%", builtin_mod);
  lenv_add_builtin(e, "*", builtin_mul);
  lenv_add_builtin(e, "-", builtin_sub);
}
Esempio n. 4
0
void lenv_add_builtins(struct lenv* e) {
    lenv_add_builtin(e, "id", lval_builtin_id);

    lenv_add_builtin(e, "+", lval_builtin_add);
    lenv_add_builtin(e, "-", lval_builtin_sub);
    lenv_add_builtin(e, "*", lval_builtin_mul);
    lenv_add_builtin(e, "/", lval_builtin_div);
    lenv_add_builtin(e, "%", lval_builtin_mod);
    lenv_add_builtin(e, "^", lval_builtin_pow);
    lenv_add_builtin(e, "min", lval_builtin_min);
    lenv_add_builtin(e, "max", lval_builtin_max);

    lenv_add_builtin(e, "!", lval_builtin_not);
    lenv_add_builtin(e, "<", lval_builtin_lt);
    lenv_add_builtin(e, "<=", lval_builtin_lte);
    lenv_add_builtin(e, ">", lval_builtin_gt);
    lenv_add_builtin(e, ">=", lval_builtin_gte);
    lenv_add_builtin(e, "=", lval_builtin_eq);
    lenv_add_builtin(e, "!=", lval_builtin_neq);

    lenv_add_builtin(e, "list", lval_builtin_list);
    lenv_add_builtin(e, "head", lval_builtin_head);
    lenv_add_builtin(e, "tail", lval_builtin_tail);
    lenv_add_builtin(e, "last", lval_builtin_last);
    lenv_add_builtin(e, "init", lval_builtin_init);
    lenv_add_builtin(e, "join", lval_builtin_join);
    lenv_add_builtin(e, "cons", lval_builtin_cons);
    lenv_add_builtin(e, "len",  lval_builtin_len);
    lenv_add_builtin(e, "eval", lval_builtin_eval);

    lenv_add_builtin(e, "if", lval_builtin_if);

    lenv_add_builtin(e, "def", lval_builtin_def);
    lenv_add_builtin(e, "env", lval_builtin_env);

    lenv_add_builtin(e, "\\", lval_builtin_lambda);

    lenv_add_builtin(e, "exit", lval_builtin_exit);
}
Esempio n. 5
0
void lenv_add_builtins(lenv *e) {
    lenv_add_builtin(e, "list", builtin_list);
    lenv_add_builtin(e, "head", builtin_head);
    lenv_add_builtin(e, "tail",  builtin_tail);
    lenv_add_builtin(e, "eval", builtin_eval);
    lenv_add_builtin(e, "join",  builtin_join);
    lenv_add_builtin(e, "init", builtin_init);
    lenv_add_builtin(e, "cons", builtin_cons);
    lenv_add_builtin(e, "len", builtin_len);
    lenv_add_builtin(e, "def", builtin_def);
    lenv_add_builtin(e, "==", builtin_eq);
    lenv_add_builtin(e, "!=", builtin_neq);
    lenv_add_builtin(e, ">", builtin_gt);
    lenv_add_builtin(e, "<", builtin_lt);
    lenv_add_builtin(e, ">=", builtin_gte);
    lenv_add_builtin(e, "<=", builtin_lte);
    lenv_add_builtin(e, "if", builtin_if);
    lenv_add_builtin(e, "\\", builtin_lambda);
    lenv_add_builtin(e, "=", builtin_put);
    lenv_add_builtin(e, "dump", builtin_dump);
    lenv_add_builtin(e, "exit", builtin_exit);

    lenv_add_builtin(e, "+", builtin_add);
    lenv_add_builtin(e, "-", builtin_sub);
    lenv_add_builtin(e, "*", builtin_mul);
    lenv_add_builtin(e, "/", builtin_div);
}
Esempio n. 6
0
File: lval.c Progetto: pimeys/musti
void lenv_add_builtins(lenv* e) {
  lenv_add_builtin(e, "\\", builtin_lambda);
  lenv_add_builtin(e, "def", builtin_def);
  lenv_add_builtin(e, "list", builtin_list);
  lenv_add_builtin(e, "head", builtin_head);
  lenv_add_builtin(e, "tail", builtin_tail);
  lenv_add_builtin(e, "eval", builtin_eval);
  lenv_add_builtin(e, "join", builtin_join);
  lenv_add_builtin(e, "load", builtin_load);
  lenv_add_builtin(e, "print", builtin_print);
  lenv_add_builtin(e, "error", builtin_error);
  lenv_add_builtin(e, "if", builtin_if);
  lenv_add_builtin(e, "+", builtin_sum);
  lenv_add_builtin(e, "-", builtin_sub);
  lenv_add_builtin(e, "*", builtin_mul);
  lenv_add_builtin(e, "/", builtin_div);
  lenv_add_builtin(e, "%", builtin_mod);
  lenv_add_builtin(e, "=", builtin_put);
  lenv_add_builtin(e, "==", builtin_eq);
  lenv_add_builtin(e, "!=", builtin_ne);
  lenv_add_builtin(e, ">", builtin_gt);
  lenv_add_builtin(e, "<", builtin_lt);
  lenv_add_builtin(e, ">=", builtin_ge);
  lenv_add_builtin(e, "<=", builtin_le);
}