quinn-os/my-basic
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*improved mb_set_coll.

Browse Source
This commit is contained in:
Wang Renxin 2015-10-29 17:46:24 +08:00
parent e7c4dd5fa8
commit 3562075734
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/my_basic.c
View File

@ -7641,6 +7641,8 @@ int mb_set_coll(struct mb_interpreter_t* s, void** l, mb_value_t coll, mb_value_
case MB_DT_LIST: case MB_DT_LIST:
mb_int_val(idx, i); mb_int_val(idx, i);
_public_value_to_internal_object(&coll, &ocoll); _public_value_to_internal_object(&coll, &ocoll);
while((int)ocoll.data.list->count <= i)
_push_list(ocoll.data.list, &ret, 0);
if(!_set_list(ocoll.data.list, i, &val, &oval)) { if(!_set_list(ocoll.data.list, i, &val, &oval)) {
_destroy_object(oval, 0); _destroy_object(oval, 0);