diff options
| author | LLLL Colonq <llll@colonq> | 2026-07-21 19:40:45 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2026-07-21 19:40:45 -0400 |
| commit | 88f0059c7e8e7680e39611e865b0356bc510adc8 (patch) | |
| tree | 1328b80cf74069e5aac114a6a041e0ccfe9cb189 /pit/src/runtime/eval.c | |
| parent | ca8daa96caed9d53db95336bad917d2e03e7b00f (diff) | |
pit: Hash table annotations, better dumper
Diffstat (limited to 'pit/src/runtime/eval.c')
| -rw-r--r-- | pit/src/runtime/eval.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/pit/src/runtime/eval.c b/pit/src/runtime/eval.c index 301d8d0..f923760 100644 --- a/pit/src/runtime/eval.c +++ b/pit/src/runtime/eval.c @@ -16,7 +16,7 @@ pit_value pit_eval(pit_runtime *rt, pit_value top) { if (pit_value_is_cons(rt, cur)) { /* compound expressions: function/macro application special forms */ pit_value fsym = pit_value_cons_car(rt, cur); bool is_symbol = pit_value_is_symbol(rt, fsym); - pit_annotated_ref *ann = pit_annotation_get(rt, pit_value_as_ref(rt, cur)); + pit_annotation *ann = pit_annotation_get(rt, pit_value_as_ref(rt, cur)); if (is_symbol && pit_symtab_is_symbol_special_form(rt, fsym)) { /* special forms */ pit_value f = pit_symtab_fget(rt, fsym); pit_value args = pit_value_cons_cdr(rt, cur); @@ -82,9 +82,9 @@ pit_value pit_eval(pit_runtime *rt, pit_value top) { args = pit_value_cons(rt, a, args); } if (ent->in.application.annotation != NULL) { - rt->source_line = ent->in.application.annotation->annotation.line; - rt->source_column = ent->in.application.annotation->annotation.column; - pit_vec_push(pit_annotated_ref)(rt->backtrace, *ent->in.application.annotation); + rt->source_line = ent->in.application.annotation->line; + rt->source_column = ent->in.application.annotation->column; + // pit_vec_push(pit_annotated_ref)(rt->backtrace, *ent->in.application.annotation); } if (pit_vec_push(pit_value)(rt->result_stack, pit_value_apply(rt, f, args)) < 0) pit_error(rt, "evaluation result stack underflow"); |
