def Test_line_continuation_in_lambda()
Line_continuation_in_lambda()->assert_equal(['D', 'C', 'B', 'A'])
+
+ var lines =<< trim END
+ vim9script
+ var res = [{n: 1, m: 2, s: 'xxx'}]
+ ->mapnew((_, v: dict<any>): string => printf('%d:%d:%s',
+ v.n,
+ v.m,
+ substitute(v.s, '.*', 'yyy', '')
+ ))
+ assert_equal(['1:2:yyy'], res)
+ END
+ CheckScriptSuccess(lines)
enddef
def Test_list_lambda()
char_u *start, *end;
int *old_eval_lavars = eval_lavars_used;
int eval_lavars = FALSE;
- char_u *tofree = NULL;
+ char_u *tofree1 = NULL;
+ char_u *tofree2 = NULL;
int equal_arrow = **arg == '(';
int white_error = FALSE;
}
*arg = s;
+ // Skipping over linebreaks may make "ret_type" invalid, make a copy.
+ if (ret_type != NULL)
+ {
+ ret_type = vim_strsave(ret_type);
+ tofree2 = ret_type;
+ }
+
// Set up a flag for checking local variables and arguments.
if (evaluate)
eval_lavars_used = &eval_lavars;
if (evalarg != NULL)
{
// avoid that the expression gets freed when another line break follows
- tofree = evalarg->eval_tofree;
+ tofree1 = evalarg->eval_tofree;
evalarg->eval_tofree = NULL;
}
eval_lavars_used = old_eval_lavars;
if (evalarg != NULL && evalarg->eval_tofree == NULL)
- evalarg->eval_tofree = tofree;
+ evalarg->eval_tofree = tofree1;
else
- vim_free(tofree);
+ vim_free(tofree1);
+ vim_free(tofree2);
if (types_optional)
ga_clear_strings(&argtypes);
return OK;
vim_free(fp);
vim_free(pt);
if (evalarg != NULL && evalarg->eval_tofree == NULL)
- evalarg->eval_tofree = tofree;
+ evalarg->eval_tofree = tofree1;
else
- vim_free(tofree);
+ vim_free(tofree1);
+ vim_free(tofree2);
eval_lavars_used = old_eval_lavars;
return FAIL;
}