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

*fixed a wrong variable manipulation bug with the PRINT statement.

Browse Source
This commit is contained in:
paladin-t 2016-02-25 16:00:55 +08:00
parent 9cad7c6992
commit ff999bf97f
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
HISTORY
View File

@ -2,6 +2,7 @@ Feb. 25 2016
Improved importing directory detection Improved importing directory detection
Fixed a bug with the END and RETURN statement with FOR loop Fixed a bug with the END and RETURN statement with FOR loop
Fixed an array index calculation bug Fixed an array index calculation bug
Fixed a wrong variable manipulation bug with the PRINT statement
Feb. 24 2016 Feb. 24 2016
Added a TO_ARRAY statement Added a TO_ARRAY statement

5
core/my_basic.c
View File

@ -14766,9 +14766,6 @@ static int _std_print(mb_interpreter_t* s, void** l) {
mb_assert(s && l); mb_assert(s && l);
val_ptr = &val_obj;
_MAKE_NIL(val_ptr);
++s->no_eat_comma_mark; ++s->no_eat_comma_mark;
ast = (_ls_node_t*)*l; ast = (_ls_node_t*)*l;
ast = ast->next; ast = ast->next;
@ -14778,6 +14775,8 @@ static int _std_print(mb_interpreter_t* s, void** l) {
obj = (_object_t*)ast->data; obj = (_object_t*)ast->data;
do { do {
val_ptr = &val_obj;
_MAKE_NIL(val_ptr);
switch(obj->type) { switch(obj->type) {
case _DT_VAR: case _DT_VAR:
if(obj->data.variable->data->type == _DT_ROUTINE) { if(obj->data.variable->data->type == _DT_ROUTINE) {

BIN
output/my_basic.exe
View File

Binary file not shown.