0
0
mirror of https://github.com/vim/vim.git synced 2025-09-27 04:14:06 -04:00

patch 8.2.3091: Vim9: default argument expr. cannot use previous argument

Problem:    Vim9: default argument expression cannot use previous argument
Solution:   Correct argument index. (closes #8496)
This commit is contained in:
Bram Moolenaar
2021-07-03 18:56:53 +02:00
parent 00aaa512d5
commit e28d9b3bd4
4 changed files with 13 additions and 4 deletions

View File

@@ -1610,6 +1610,8 @@ typedef struct
int uf_dfunc_idx; // only valid if uf_def_status is UF_COMPILED int uf_dfunc_idx; // only valid if uf_def_status is UF_COMPILED
garray_T uf_args; // arguments, including optional arguments garray_T uf_args; // arguments, including optional arguments
garray_T uf_def_args; // default argument expressions garray_T uf_def_args; // default argument expressions
int uf_args_visible; // normally uf_args.ga_len, less when
// compiling default argument expression.
// for :def (for :function uf_ret_type is NULL) // for :def (for :function uf_ret_type is NULL)
type_T **uf_arg_types; // argument types (count == uf_args.ga_len) type_T **uf_arg_types; // argument types (count == uf_args.ga_len)

View File

@@ -452,6 +452,12 @@ def Test_call_default_args()
MyDefaultThird('->', 'xx', v:none)->assert_equal('->xxbb') MyDefaultThird('->', 'xx', v:none)->assert_equal('->xxbb')
MyDefaultThird('->', v:none, 'yy')->assert_equal('->aayy') MyDefaultThird('->', v:none, 'yy')->assert_equal('->aayy')
MyDefaultThird('->', 'xx', 'yy')->assert_equal('->xxyy') MyDefaultThird('->', 'xx', 'yy')->assert_equal('->xxyy')
def DefArg(mandatory: any, optional = mandatory): string
return mandatory .. optional
enddef
DefArg(1234)->assert_equal('12341234')
DefArg("ok")->assert_equal('okok')
END END
CheckDefAndScriptSuccess(lines) CheckDefAndScriptSuccess(lines)

View File

@@ -755,6 +755,8 @@ static char *(features[]) =
static int included_patches[] = static int included_patches[] =
{ /* Add new patch number below this line */ { /* Add new patch number below this line */
/**/
3091,
/**/ /**/
3090, 3090,
/**/ /**/

View File

@@ -274,7 +274,7 @@ arg_exists(
if (len == 0) if (len == 0)
return FAIL; return FAIL;
for (idx = 0; idx < cctx->ctx_ufunc->uf_args.ga_len; ++idx) for (idx = 0; idx < cctx->ctx_ufunc->uf_args_visible; ++idx)
{ {
char_u *arg = FUNCARG(cctx->ctx_ufunc, idx); char_u *arg = FUNCARG(cctx->ctx_ufunc, idx);
@@ -9172,7 +9172,6 @@ compile_def_function(
{ {
int count = ufunc->uf_def_args.ga_len; int count = ufunc->uf_def_args.ga_len;
int first_def_arg = ufunc->uf_args.ga_len - count; int first_def_arg = ufunc->uf_args.ga_len - count;
int uf_args_len = ufunc->uf_args.ga_len;
int i; int i;
char_u *arg; char_u *arg;
int off = STACK_FRAME_SIZE + (ufunc->uf_va_name != NULL ? 1 : 0); int off = STACK_FRAME_SIZE + (ufunc->uf_va_name != NULL ? 1 : 0);
@@ -9195,12 +9194,11 @@ compile_def_function(
goto erret; goto erret;
// Make sure later arguments are not found. // Make sure later arguments are not found.
ufunc->uf_args.ga_len = i; ufunc->uf_args_visible = arg_idx;
arg = ((char_u **)(ufunc->uf_def_args.ga_data))[i]; arg = ((char_u **)(ufunc->uf_def_args.ga_data))[i];
r = compile_expr0(&arg, &cctx); r = compile_expr0(&arg, &cctx);
ufunc->uf_args.ga_len = uf_args_len;
if (r == FAIL) if (r == FAIL)
goto erret; goto erret;
@@ -9230,6 +9228,7 @@ compile_def_function(
if (did_set_arg_type) if (did_set_arg_type)
set_function_type(ufunc); set_function_type(ufunc);
} }
ufunc->uf_args_visible = ufunc->uf_args.ga_len;
/* /*
* Loop over all the lines of the function and generate instructions. * Loop over all the lines of the function and generate instructions.