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

*avoided warnings when compiling for 64bit system.

Browse Source
This commit is contained in:
paladin-t 2016-01-28 14:24:54 +08:00
parent f5be6e7ab5
commit f777249d8a
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

@ -11270,11 +11270,11 @@ int mb_set_inputer(struct mb_interpreter_t* s, mb_input_func_t p) {
int mb_gc(struct mb_interpreter_t* s, int_t* collected) { int mb_gc(struct mb_interpreter_t* s, int_t* collected) {
/* Trigger GC */ /* Trigger GC */
int_t diff = _mb_allocated; int_t diff = (int_t)_mb_allocated;
_gc_collect_garbage(s, 1); _gc_collect_garbage(s, 1);
diff = _mb_allocated - diff; diff = (int_t)(_mb_allocated - diff);
if(collected) if(collected)
*collected = diff; *collected = diff;