summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-12-02 19:07:21 +0100
committerAndy Wingo <wingo@pobox.com>2011-12-02 19:07:21 +0100
commit76f3ee77b07141b5ba5a199182d0e8118cd026d0 (patch)
tree7b77efbdc68bba4d3d6a931a36ac10d740eb0e55
parentb57bf2724a254cf73e255b3d2bca0a7dcad6674a (diff)
downloadguile-76f3ee77b07141b5ba5a199182d0e8118cd026d0.tar.gz
scm_gc_register_collectable_memory calls scm_gc_register_allocation
* libguile/gc-malloc.c (scm_gc_register_collectable_memory): Call scm_gc_register_allocation.
-rw-r--r--libguile/gc-malloc.c3
1 files changed, 2 insertions, 1 deletions
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);