Mercurial > vim
changeset 25332:34fe6aca48c2 v8.2.3203
patch 8.2.3203: Vim9: compiled string expression causes type error
Commit: https://github.com/vim/vim/commit/cd268017cf79a546a494883b4b026a3cbbd9a8a0
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Jul 22 19:11:08 2021 +0200
patch 8.2.3203: Vim9: compiled string expression causes type error
Problem: Vim9: compiled string expression causes type error. (Yegappan
Lakshmanan)
Solution: Remove the string type from the stack.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Thu, 22 Jul 2021 19:15:04 +0200 |
parents | c3073f1029cc |
children | 2924f8e23841 |
files | src/evalfunc.c src/version.c src/vim9compile.c |
diffstat | 3 files changed, 10 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/evalfunc.c +++ b/src/evalfunc.c @@ -711,6 +711,8 @@ static argcheck_T arg3_slice[] = {arg_sl static argcheck_T arg4_strpart[] = {arg_string, arg_number, arg_number, arg_bool}; static argcheck_T arg23_win_execute[] = {arg_number, arg_string_or_list_string, arg_string}; static argcheck_T arg4_match_func[] = {arg_string_or_list_any, arg_string, arg_number, arg_number}; +static argcheck_T arg15_search[] = {arg_string, arg_string, arg_number, arg_number, NULL}; + /* * Functions that return the return type of a builtin function. @@ -1738,7 +1740,7 @@ static funcentry_T global_functions[] = ret_number, f_screenrow}, {"screenstring", 2, 2, FEARG_1, arg2_number, ret_string, f_screenstring}, - {"search", 1, 5, FEARG_1, NULL, + {"search", 1, 5, FEARG_1, arg15_search, ret_number, f_search}, {"searchcount", 0, 1, FEARG_1, arg1_dict_any, ret_dict_any, f_searchcount},
--- a/src/version.c +++ b/src/version.c @@ -756,6 +756,8 @@ static char *(features[]) = static int included_patches[] = { /* Add new patch number below this line */ /**/ + 3203, +/**/ 3202, /**/ 3201,
--- a/src/vim9compile.c +++ b/src/vim9compile.c @@ -3244,6 +3244,9 @@ compile_string(isn_T *isn, cctx_T *cctx) int instr_count; isn_T *instr = NULL; + // Remove the string type from the stack. + --cctx->ctx_type_stack.ga_len; + // Temporarily reset the list of instructions so that the jump labels are // correct. cctx->ctx_instr.ga_len = 0; @@ -4263,8 +4266,8 @@ compile_subscript( } } - // Do not skip over white space to find the "(", "execute 'x' ()" is - // not a function call. + // Do not skip over white space to find the "(", "execute 'x' (expr)" + // is not a function call. if (**arg == '(') { garray_T *stack = &cctx->ctx_type_stack;