X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Ftypes%2Fimpl_var.c;h=7b690bb0b074769e02a3a45cf07b2b92fe99d245;hp=af5acd2928e74a4d912bb42beeb5070937320357;hb=c9384515a81cb64d345b299908b2852f51bb8e6e;hpb=b029005e56a8913fbb3d17ab497b4a37a00a211c diff --git a/src/types/impl_var.c b/src/types/impl_var.c index af5acd2..7b690bb 100644 --- a/src/types/impl_var.c +++ b/src/types/impl_var.c @@ -67,18 +67,27 @@ void psi_impl_var_free(struct psi_impl_var **var_ptr) } } +void psi_impl_var_dump(int fd, struct psi_impl_var *var, bool vararg) +{ + dprintf(fd, "%s%s%s", + var->reference ? "&" : "", + vararg ? "..." : "", + var->name); +} bool psi_impl_var_validate(struct psi_data *data, struct psi_impl_var *ivar, - struct psi_impl *impl, struct psi_let_exp *current_let_exp, - struct psi_set_exp *current_set_exp) + struct psi_validate_scope *scope) { - if (current_let_exp) { + if (scope && scope->current_let) { + struct psi_let_exp *current_let_exp = scope->current_let; + while ((current_let_exp = current_let_exp->outer)) { struct psi_impl_var *svar = psi_let_exp_get_impl_var(current_let_exp); ivar->fqn = psi_impl_var_name_prepend(ivar->fqn, svar->name + 1); } - } else if (current_set_exp) { + } else if (scope && scope->current_set) { + struct psi_set_exp *current_set_exp = scope->current_set; while ((current_set_exp = current_set_exp->outer)) { struct psi_impl_var *svar = psi_set_exp_get_impl_var(current_set_exp);