test/gc: Add three extra gc's.
* src/test/gc.c (test_gc): Add three extra gc's.
This commit is contained in:
parent
0d6971b560
commit
543419134f
|
@ -79,6 +79,24 @@ test_gc (char const *name)
|
|||
print_arena (gc_free () - 1);
|
||||
gc_stats_ ("1");
|
||||
eputs ("\n");
|
||||
|
||||
gc_ ();
|
||||
VALUE (cell_zero) = 'd';
|
||||
print_arena (gc_free () - 1);
|
||||
gc_stats_ ("2");
|
||||
eputs ("\n");
|
||||
|
||||
gc_ ();
|
||||
VALUE (cell_zero) = 'e';
|
||||
print_arena (gc_free () - 1);
|
||||
gc_stats_ ("3");
|
||||
eputs ("\n");
|
||||
|
||||
gc_ ();
|
||||
VALUE (cell_zero) = 'f';
|
||||
print_arena (gc_free () - 1);
|
||||
gc_stats_ ("3");
|
||||
eputs ("\n");
|
||||
}
|
||||
|
||||
void
|
||||
|
|
Loading…
Reference in a new issue