/* now check for known vars */
exp->let = calloc(psi_plist_count(exp->vars), sizeof(*exp->let));
for (i = 0; psi_plist_get(exp->vars, i, &free_var); ++i) {
- if (!psi_decl_arg_get_by_var(free_var, impl->decl->args,
- impl->decl->func)) {
+ if (!psi_impl_get_decl_arg(impl, free_var)) {
data->error(data, free_var->token, PSI_WARNING,
"Unknown variable '%s' of `free` statement"
" of implementation '%s'",
void **args;
struct psi_decl_var *dvar;
struct psi_call_frame *free_call;
+ struct psi_context *ctx = psi_call_frame_get_context(frame);
- free_call = psi_call_frame_init(frame->context, f->decl, NULL);
+ free_call = psi_call_frame_init(ctx, f->decl, NULL);
psi_call_frame_enter(free_call);
args = psi_call_frame_get_arg_pointers(free_call);