X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Ftypes%2Flet_exp.c;h=d4fe6db63d556072463ac2736fed65b8b1e5c646;hp=38c055b6cf4e10f357c6cc7ed9a421a38a2a8cf2;hb=b78637d9020222f1032349f231c0dc84a69797bc;hpb=440ff658995f1378fd74c0101ff6c2b4951ffdf9 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;