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

patch 8.2.3064: Vim9: in script cannot set item in uninitialized list

Browse Source 
Problem:    Vim9: in script cannot set item in uninitialized list.
Solution:   When a list is NULL allocate an empty one. (closes #8461)
This commit is contained in:
Bram Moolenaar
2021-06-27 15:04:05 +02:00
parent 65aee0b714
commit e65081d1b5
3 changed files with 49 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
src/eval.c
View File

@@ -932,15 +932,22 @@ get_lval(
semsg(_(e_dot_can_only_be_used_on_dictionary_str), name); semsg(_(e_dot_can_only_be_used_on_dictionary_str), name);
return NULL; return NULL;
} }
if (!(lp->ll_tv->v_type == VAR_LIST && lp->ll_tv->vval.v_list != NULL) if (lp->ll_tv->v_type != VAR_LIST
&& !(lp->ll_tv->v_type == VAR_DICT) && lp->ll_tv->v_type != VAR_DICT
&& !(lp->ll_tv->v_type == VAR_BLOB && lp->ll_tv->v_type != VAR_BLOB)
&& lp->ll_tv->vval.v_blob != NULL))
{ {
if (!quiet) if (!quiet)
emsg(_("E689: Can only index a List, Dictionary or Blob")); emsg(_("E689: Can only index a List, Dictionary or Blob"));
return NULL; return NULL;
} }
// a NULL list/blob works like an empty list/blob, allocate one now.
if (lp->ll_tv->v_type == VAR_LIST && lp->ll_tv->vval.v_list == NULL)
rettv_list_alloc(lp->ll_tv);
else if (lp->ll_tv->v_type == VAR_BLOB
&& lp->ll_tv->vval.v_blob == NULL)
rettv_blob_alloc(lp->ll_tv);
if (lp->ll_range) if (lp->ll_range)
{ {
if (!quiet) if (!quiet)
@@ -1200,12 +1207,22 @@ get_lval(
lp->ll_list = lp->ll_tv->vval.v_list; lp->ll_list = lp->ll_tv->vval.v_list;
lp->ll_li = list_find_index(lp->ll_list, &lp->ll_n1); lp->ll_li = list_find_index(lp->ll_list, &lp->ll_n1);
if (lp->ll_li == NULL) if (lp->ll_li == NULL)
{
// Vim9: Allow for adding an item at the end.
if (in_vim9script() && lp->ll_n1 == lp->ll_list->lv_len
&& lp->ll_list->lv_lock == 0)
{
list_append_number(lp->ll_list, 0);
lp->ll_li = list_find_index(lp->ll_list, &lp->ll_n1);
}
if (lp->ll_li == NULL)
{ {
clear_tv(&var2); clear_tv(&var2);
if (!quiet) if (!quiet)
semsg(_(e_listidx), lp->ll_n1); semsg(_(e_listidx), lp->ll_n1);
return NULL; return NULL;
} }
}
if (lp->ll_valtype != NULL) if (lp->ll_valtype != NULL)
// use the type of the member // use the type of the member

9
src/testdir/test_vim9_assign.vim
View File

@@ -1102,6 +1102,7 @@ def Test_assignment_failure()
enddef enddef
def Test_assign_list() def Test_assign_list()
var lines =<< trim END
var l: list<string> = [] var l: list<string> = []
l[0] = 'value' l[0] = 'value'
assert_equal('value', l[0]) assert_equal('value', l[0])
@@ -1118,6 +1119,14 @@ def Test_assign_list()
endfor endfor
assert_equal([0, 1, 2, 3, 4], nrl) assert_equal([0, 1, 2, 3, 4], nrl)
var ul: list<any>
ul[0] = 1
ul[1] = 2
ul[2] = 3
assert_equal([1, 2, 3], ul)
END
CheckDefAndScriptSuccess(lines)
CheckDefFailure(["var l: list<number> = ['', true]"], 'E1012: Type mismatch; expected list<number> but got list<any>', 1) CheckDefFailure(["var l: list<number> = ['', true]"], 'E1012: Type mismatch; expected list<number> but got list<any>', 1)
CheckDefFailure(["var l: list<list<number>> = [['', true]]"], 'E1012: Type mismatch; expected list<list<number>> but got list<list<any>>', 1) CheckDefFailure(["var l: list<list<number>> = [['', true]]"], 'E1012: Type mismatch; expected list<list<number>> but got list<list<any>>', 1)
enddef enddef

2
src/version.c
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 */
/**/
3064,
/**/ /**/
3063, 3063,
/**/ /**/