From 76f3ee77b07141b5ba5a199182d0e8118cd026d0 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Fri, 2 Dec 2011 19:07:21 +0100 Subject: [PATCH] scm_gc_register_collectable_memory calls scm_gc_register_allocation * libguile/gc-malloc.c (scm_gc_register_collectable_memory): Call scm_gc_register_allocation. --- libguile/gc-malloc.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/libguile/gc-malloc.c b/libguile/gc-malloc.c index a7dab2a7e..72142caaa 100644 --- a/libguile/gc-malloc.c +++ b/libguile/gc-malloc.c @@ -154,7 +154,8 @@ scm_strdup (const char *str) void scm_gc_register_collectable_memory (void *mem, size_t size, const char *what) { - /* Nothing to do. */ + scm_gc_register_allocation (size); + #ifdef GUILE_DEBUG_MALLOC if (mem) scm_malloc_register (mem, what);