X-Git-Url: https://git.m6w6.name/?a=blobdiff_plain;f=src%2Ftypes%2Flet_exp.c;h=d4fe6db63d556072463ac2736fed65b8b1e5c646;hb=ef40ce43c98a00823e06c14f5cf7a8241f637ab1;hp=38c055b6cf4e10f357c6cc7ed9a421a38a2a8cf2;hpb=53495ef4bd0321f7f92dd05eef8e01b90d7b415a;p=m6w6%2Fext-psi diff --git a/src/types/let_exp.c b/src/types/let_exp.c index 38c055b..d4fe6db 100644 --- a/src/types/let_exp.c +++ b/src/types/let_exp.c @@ -162,22 +162,23 @@ bool psi_let_exp_validate(struct psi_data *data, struct psi_let_exp *val, switch (val->kind) { case PSI_LET_TMP: - if (!psi_decl_var_validate(data, val->data.var, impl->decl, val, NULL)) { + if (!psi_decl_var_validate(data, val->data.var, impl, impl->decl, val, NULL)) { data->error(data, dvar->token ? : **(struct psi_token ***) &val->data, - PSI_WARNING, "Unknown variable '%s'", dvar->name); + PSI_WARNING, "Unknown variable '%s' in temp let statment of implementation '%s'", + dvar->name, impl->func->name); return false; } break; default: - if (!psi_decl_var_validate(data, dvar, impl->decl, val, NULL)) { + if (!psi_decl_var_validate(data, dvar, impl, impl->decl, val, NULL)) { data->error(data, dvar->token ? : **(struct psi_token ***) &val->data, - PSI_WARNING, "Unknown variable '%s'", dvar->name); + PSI_WARNING, "Unknown variable '%s' in let statement of implementation '%s'", + dvar->name, impl->func->name); return false; } break; } - switch (val->kind) { case PSI_LET_NULL: break;