int call_callback(callback_T *callback, int len, typval_T *rettv, int argcount, typval_T *argvars);
void user_func_error(int error, char_u *name);
int call_func(char_u *funcname, int len, typval_T *rettv, int argcount_in, typval_T *argvars_in, funcexe_T *funcexe);
+char_u *printable_func_name(ufunc_T *fp);
char_u *trans_function_name(char_u **pp, int *is_global, int skip, int flags, funcdict_T *fdp, partial_T **partial);
char_u *untrans_function_name(char_u *name);
ufunc_T *def_function(exarg_T *eap, char_u *name_arg);
{
if (called_emsg == called_emsg_before)
semsg(_("E1091: Function is not compiled: %s"),
- ufunc->uf_name_exp == NULL
- ? ufunc->uf_name : ufunc->uf_name_exp);
+ printable_func_name(ufunc));
return FAIL;
}
switch (iptr->isn_type)
{
- case ISN_LOADG: d = get_globvar_dict(); break;
- case ISN_LOADB: d = &curbuf->b_vars; break;
- case ISN_LOADW: d = &curwin->w_vars; break;
- case ISN_LOADT: d = &curtab->tp_vars; break;
+ case ISN_LOADGDICT: d = get_globvar_dict(); break;
+ case ISN_LOADBDICT: d = curbuf->b_vars; break;
+ case ISN_LOADWDICT: d = curwin->w_vars; break;
+ case ISN_LOADTDICT: d = curtab->tp_vars; break;
default: // Cannot reach here
goto failed;
}
vim_free(ectx.ec_stack.ga_data);
vim_free(ectx.ec_trystack.ga_data);
+
+ if (ret != OK && called_emsg == called_emsg_before)
+ semsg(_("E1099: Unknown error while executing %s"),
+ printable_func_name(ufunc));
return ret;
}