From 88f0059c7e8e7680e39611e865b0356bc510adc8 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Tue, 21 Jul 2026 19:40:45 -0400 Subject: pit: Hash table annotations, better dumper --- pit/src/runtime/macroexpand.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'pit/src/runtime/macroexpand.c') diff --git a/pit/src/runtime/macroexpand.c b/pit/src/runtime/macroexpand.c index 6252ae1..7ff1a6a 100644 --- a/pit/src/runtime/macroexpand.c +++ b/pit/src/runtime/macroexpand.c @@ -14,7 +14,7 @@ pit_value pit_macroexpand(pit_runtime *rt, pit_value top) { if (pit_value_is_cons(rt, cur)) { 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_macro(rt, fsym)) { pit_value f = pit_symtab_fget(rt, fsym); pit_value args = pit_value_cons_cdr(rt, cur); @@ -88,7 +88,7 @@ pit_value pit_macroexpand(pit_runtime *rt, pit_value top) { } app = pit_value_cons(rt, f, args); if (ent->in.application.annotation != NULL) { - pit_annotation_set(rt, pit_value_as_ref(rt, app), ent->in.application.annotation->annotation); + pit_annotation_set(rt, pit_value_as_ref(rt, app), *ent->in.application.annotation); } if (pit_vec_push(pit_value)(rt->result_stack, app) < 0) pit_error(rt, "macro expansion stack overflow"); -- cgit v1.3.1