conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

arena_idx is of size_t

This commit is contained in:
Yuichi Nishiwaki 2015-07-26 16:44:13 +09:00
parent 9365eb4c7f
commit eec7d1754b
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
contrib/10.callcc/callcc.c
View File

@ -27,8 +27,7 @@ struct pic_fullcont {
pic_value ptable; pic_value ptable;
struct pic_object **arena; struct pic_object **arena;
size_t arena_size; size_t arena_size, arena_idx;
int arena_idx;
pic_value results; pic_value results;
}; };
@ -84,7 +83,7 @@ cont_mark(pic_state *pic, void *data, void (*mark)(pic_state *, pic_value))
} }
/* arena */ /* arena */
for (i = 0; i < (size_t)cont->arena_idx; ++i) { for (i = 0; i < cont->arena_idx; ++i) {
mark(pic, pic_obj_value(cont->arena[i])); mark(pic, pic_obj_value(cont->arena[i]));
} }