enddef
def Test_call_func_defined_later()
- call assert_equal('one', DefinedLater('one'))
+ call assert_equal('one', g:DefinedLater('one'))
call assert_fails('call NotDefined("one")', 'E117:')
enddef
+func DefinedLater(arg)
+ return a:arg
+endfunc
+
+def Test_call_funcref()
+ assert_equal(3, g:SomeFunc('abc'))
+ assert_fails('NotAFunc()', 'E117:')
+ assert_fails('g:NotAFunc()', 'E117:')
+enddef
+
+let SomeFunc = function('len')
+let NotAFunc = 'text'
+
def CombineFuncrefTypes()
" same arguments, different return type
let Ref1: func(bool): string
Refb3 = g:cond ? Refb1 : Refb2
enddef
-func DefinedLater(arg)
- return a:arg
-endfunc
-
def FuncWithForwardCall()
- return DefinedEvenLater("yes")
+ return g:DefinedEvenLater("yes")
enddef
def DefinedEvenLater(arg: string): string
so Xdef
call delete('Xdef')
- call assert_equal(0, Func0())
- call assert_equal('Func1', Func1())
- call assert_equal('Func2', Func2())
+ call assert_equal(0, g:Func0())
+ call assert_equal('Func1', g:Func1())
+ call assert_equal('Func2', g:Func2())
delfunc! Func0
delfunc! Func1
goto theend;
}
- // The function may be defined only later. Need to figure out at runtime.
- res = generate_UCALL(cctx, name, argcount);
+ // A global function may be defined only later. Need to figure out at
+ // runtime.
+ if (STRNCMP(namebuf, "g:", 2) == 0)
+ res = generate_UCALL(cctx, name, argcount);
+ else
+ semsg(_(e_unknownfunc), namebuf);
theend:
vim_free(tofree);
if (call_by_name(name, argcount, ectx, iptr) == FAIL
&& called_emsg == called_emsg_before)
{
- // "name" may be a variable that is a funcref or partial
- // if find variable
- // call_partial()
- // else
- // semsg(_(e_unknownfunc), name);
- emsg("call_eval_func(partial) not implemented yet");
- return FAIL;
+ dictitem_T *v;
+
+ v = find_var(name, NULL, FALSE);
+ if (v == NULL)
+ {
+ semsg(_(e_unknownfunc), name);
+ return FAIL;
+ }
+ if (v->di_tv.v_type != VAR_PARTIAL && v->di_tv.v_type != VAR_FUNC)
+ {
+ semsg(_(e_unknownfunc), name);
+ return FAIL;
+ }
+ return call_partial(&v->di_tv, argcount, ectx);
}
return OK;
}