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

*fixed a bug in '_core_do'

Browse Source
This commit is contained in:
Wang Renxin 2015-04-24 17:19:30 +08:00
parent b00677973e
commit 856830fb0f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/my_basic.c
View File

@ -5065,7 +5065,7 @@ int _core_do(mb_interpreter_t* s, void** l) {
ast = ast->next; ast = ast->next;
obj = (_object_t*)(ast->data); obj = (_object_t*)(ast->data);
if(!_IS_EOS(obj->type)) { if(!_IS_EOS(obj)) {
_handle_error_on_obj(s, SE_RN_SYNTAX, DON(ast), MB_FUNC_ERR, _exit, result); _handle_error_on_obj(s, SE_RN_SYNTAX, DON(ast), MB_FUNC_ERR, _exit, result);
} }
ast = ast->next; ast = ast->next;