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

*comment...

Browse Source
This commit is contained in:
Wang Renxin 2017-05-08 21:09:41 +08:00
parent e21aad249b
commit e414dabf4d
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

@ -11449,7 +11449,7 @@ int mb_close_forked(struct mb_interpreter_t** s) {
#endif /* _MULTILINE_STATEMENT */
src = *s;
while(mb_get_forked_from(src, &src) == MB_FUNC_OK) { }
while(mb_get_forked_from(src, &src) == MB_FUNC_OK) { /* Do nothing */ }
if(!src->valid)
(*s)->running_context = (*s)->forked_context;
(*s)->running_context->prev = 0;