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

*fixed a memory leak with the print statement.

Browse Source
This commit is contained in:
Wang Renxin 2016-07-06 14:11:42 +08:00 committed by GitHub
parent 8ab140c50e
commit 8a53a948be
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

@ -15726,6 +15726,8 @@ static int _std_print(mb_interpreter_t* s, void** l) {
case _DT_FUNC: /* Fall through */ case _DT_FUNC: /* Fall through */
case _DT_ROUTINE: case _DT_ROUTINE:
result = _calc_expression(s, &ast, &val_ptr); result = _calc_expression(s, &ast, &val_ptr);
_REF(val_ptr);
_UNREF(val_ptr);
_print: _print:
if(val_ptr->type == _DT_NIL) { if(val_ptr->type == _DT_NIL) {
_get_printer(s)(MB_NIL); _get_printer(s)(MB_NIL);