diff options
| author | Mistivia <i@mistivia.com> | 2025-06-19 08:16:09 +0800 |
|---|---|---|
| committer | Mistivia <i@mistivia.com> | 2025-06-19 08:16:09 +0800 |
| commit | 5cf6d5b34c2bdb42af5b3551378026079435a3b8 (patch) | |
| tree | 5e7f14c1225bc9b92ecf422b7145df746c7a1b5e /src/parser.c | |
| parent | d96ab7d81aeb9676779faa7c1380dd48f5440b07 (diff) | |
add eval
Diffstat (limited to 'src/parser.c')
| -rw-r--r-- | src/parser.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/parser.c b/src/parser.c index f60946a..4f46c41 100644 --- a/src/parser.c +++ b/src/parser.c @@ -140,7 +140,7 @@ static SExpRef build_list_from_vector(Interp *ctx, SExpRefVector elems) { i--; for (; i >= 0; i--) { SExpRef cur = *SExpRefVector_ref(&elems, i); - ret = cons(ctx, cur, ret); + ret = lisp_cons(ctx, cur, ret); } return ret; } @@ -332,7 +332,7 @@ ParseResult parse_abbrev(Parser *parser, const char *name) { ret = parse_sexp(parser); if (ParseResult_is_err(ret)) return ret; SExpRef sym = new_symbol(parser->ctx, name); - return ParseOk(cons(parser->ctx, sym, ret.val)); + return ParseOk(lisp_cons(parser->ctx, sym, ret.val)); } ParseResult parse_quote(Parser *parser) { |
