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

*fixed an error raising issue with incomplete if structure.

Browse Source
This commit is contained in:
paladin-t 2016-04-19 11:31:39 +08:00
parent 7d35fe3243
commit 9a4363a547
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
HISTORY
View File

@ -1,3 +1,6 @@
Apr. 19 2016
Fixed an error raising issue with incomplete IF structure
Apr. 18 2016 Apr. 18 2016
Fixed an invalid iterator issue with ranged list Fixed an invalid iterator issue with ranged list

9
core/my_basic.c
View File

@ -9501,8 +9501,9 @@ static int _common_end_looping(mb_interpreter_t* s, _ls_node_t** l) {
mb_assert(s && l); mb_assert(s && l);
if(_skip_struct(s, l, _core_for, _core_next) == MB_FUNC_OK) result = _skip_struct(s, l, _core_for, _core_next);
_skip_to(s, l, 0, _DT_EOS); if(result == MB_FUNC_OK)
result = _skip_to(s, l, 0, _DT_EOS);
return result; return result;
} }
@ -9625,7 +9626,7 @@ _to:
if((_compare_numbers(step_val_ptr, &_OBJ_INT_ZERO) == 1 && _compare_numbers(var_loop->data, to_val_ptr) == 1) || if((_compare_numbers(step_val_ptr, &_OBJ_INT_ZERO) == 1 && _compare_numbers(var_loop->data, to_val_ptr) == 1) ||
(_compare_numbers(step_val_ptr, &_OBJ_INT_ZERO) == -1 && _compare_numbers(var_loop->data, to_val_ptr) == -1)) { (_compare_numbers(step_val_ptr, &_OBJ_INT_ZERO) == -1 && _compare_numbers(var_loop->data, to_val_ptr) == -1)) {
/* End looping */ /* End looping */
_common_end_looping(s, &ast); result = _common_end_looping(s, &ast);
goto _exit; goto _exit;
} else { } else {
@ -9713,7 +9714,7 @@ _to:
} }
if(!lit && !dit) { if(!lit && !dit) {
/* End looping */ /* End looping */
_common_end_looping(s, &ast); result = _common_end_looping(s, &ast);
goto _exit; goto _exit;
} else { } else {