return &curtab->tp_vars->dv_hashtab;
if (*name == 'v') // v: variable
return &vimvarht;
- if (current_sctx.sc_version != SCRIPT_VERSION_VIM9)
+ if (get_current_funccal() != NULL
+ && get_current_funccal()->func->uf_dfunc_idx < 0)
{
+ // a: and l: are only used in functions defined with ":function"
if (*name == 'a') // a: function argument
return get_funccal_args_ht();
if (*name == 'l') // l: local function variable
call assert_fails('call MyDefaultArgs("one", "two")', 'E118:')
endfunc
+func TakesOneArg(arg)
+ echo a:arg
+endfunc
+
+def Test_call_wrong_arg_count()
+ call CheckDefFailure(['TakesOneArg()'], 'E119:')
+ call CheckDefFailure(['TakesOneArg(11, 22)'], 'E118:')
+enddef
+
" Default arg and varargs
def MyDefVarargs(one: string, two = 'foo', ...rest: list<string>): string
let res = one .. ',' .. two
assert_equal('one,two,three', MyDefVarargs('one', 'two', 'three'))
enddef
+def Test_call_func_defined_later()
+ call assert_equal('one', DefinedLater('one'))
+ call assert_fails('call NotDefined("one")', 'E117:')
+enddef
-"def Test_call_func_defined_later()
-" call assert_equal('one', DefineLater('one'))
-" call assert_fails('call NotDefined("one")', 'E99:')
-"enddef
-
-func DefineLater(arg)
+func DefinedLater(arg)
return a:arg
endfunc
cctx_T *cctx,
char_u *name, // variable NUL terminated
char_u *start, // start of variable
- char_u **end) // end of variable
+ char_u **end, // end of variable
+ int error) // when TRUE may give error
{
scriptitem_T *si = SCRIPT_ITEM(current_sctx.sc_sid);
int idx = get_script_item_idx(current_sctx.sc_sid, name, FALSE);
return OK;
}
- semsg(_("E1050: Item not found: %s"), name);
+ if (error)
+ semsg(_("E1050: Item not found: %s"), name);
return FAIL;
}
}
else if (**arg == 's')
{
- res = compile_load_scriptvar(cctx, name, NULL, NULL);
+ res = compile_load_scriptvar(cctx, name, NULL, NULL, error);
}
else
{
else if (SCRIPT_ITEM(current_sctx.sc_sid)->sn_version
== SCRIPT_VERSION_VIM9)
// in Vim9 script "var" can be script-local.
- res = compile_load_scriptvar(cctx, name, *arg, &end);
+ res = compile_load_scriptvar(cctx, name, *arg, &end, error);
}
}
if (gen_load)
generate_LOAD(cctx, ISN_LOADG, 0, name + 2, type);
break;
case dest_script:
- compile_load_scriptvar(cctx, name + (name[1] == ':' ? 2 : 0), NULL, NULL);
+ compile_load_scriptvar(cctx,
+ name + (name[1] == ':' ? 2 : 0), NULL, NULL, TRUE);
break;
case dest_env:
// Include $ in the name here