diff options
Diffstat (limited to 'tests/gctest.c')
-rw-r--r-- | tests/gctest.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/gctest.c b/tests/gctest.c index 3e033704..0715ba40 100644 --- a/tests/gctest.c +++ b/tests/gctest.c @@ -431,6 +431,7 @@ sexpr small_cons_uncollectable (sexpr x, sexpr y) : GC_GCJ_MALLOC(lb, d); CHECK_OUT_OF_MEMORY(r); + AO_fetch_and_add1(&collectable_count); result = (sexpr)((GC_word *)r + 1); result -> sexpr_car = x; GC_PTR_STORE_AND_DIRTY(&result->sexpr_cdr, y); |