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

*avoid crash.

Browse Source
This commit is contained in:
Wang Renxin 2015-10-10 20:23:36 +08:00
parent f47077b08d
commit 9f2680e55b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/my_basic.c
View File

@ -5395,9 +5395,9 @@ int _skip_if_chunk(mb_interpreter_t* s, _ls_node_t** l) {
obj = (_object_t*)(ast->data); obj = (_object_t*)(ast->data);
*l = ast; *l = ast;
ast = ast->next; ast = ast->next;
if(_IS_FUNC((_object_t*)(ast->data), _core_if)) { if(ast && _IS_FUNC((_object_t*)(ast->data), _core_if)) {
++nested; ++nested;
} else if(nested && _IS_FUNC((_object_t*)(ast->data), _core_endif)) { } else if(ast && nested && _IS_FUNC((_object_t*)(ast->data), _core_endif)) {
--nested; --nested;
ast = ast->next; ast = ast->next;
} }