diff options
author | Ivan Maidanski <ivmai@mail.ru> | 2023-03-24 08:54:01 +0300 |
---|---|---|
committer | Ivan Maidanski <ivmai@mail.ru> | 2023-04-28 19:46:53 +0300 |
commit | ab9c128262ddfbd267d300168ad86f11fc8c13cd (patch) | |
tree | 7e6c3d0eb675460cd7f6f64964cef3e89c7316dd | |
parent | c181e8f9fdb108f8e3085fb1e584a9c47b702286 (diff) | |
download | bdwgc-ab9c128262ddfbd267d300168ad86f11fc8c13cd.tar.gz |
Increment allocated objects count after GC_GCJ_MALLOC() in gctest
(a cherry-pick of commit 4d83569d5 from 'master')
* tests/test.c [GC_GCJ_SUPPORT] (gcj_cons): Increment
collectable_count.
-rw-r--r-- | tests/test.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/test.c b/tests/test.c index 100e0606..0db0ac02 100644 --- a/tests/test.c +++ b/tests/test.c @@ -437,6 +437,7 @@ sexpr small_cons_uncollectable (sexpr x, sexpr y) : &gcj_class_struct2); CHECK_OUT_OF_MEMORY(r); + AO_fetch_and_add1(&collectable_count); result = (sexpr)(r + 1); result -> sexpr_car = x; GC_PTR_STORE_AND_DIRTY(&result->sexpr_cdr, y); |