summaryrefslogtreecommitdiff
path: root/libguile/mallocs.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/mallocs.c')
-rw-r--r--libguile/mallocs.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/mallocs.c b/libguile/mallocs.c
index accdcce36..6360ec2b9 100644
--- a/libguile/mallocs.c
+++ b/libguile/mallocs.c
@@ -84,7 +84,7 @@ malloc_print (SCM exp, SCM port, scm_print_state *pstate SCM_UNUSED)
SCM
scm_malloc_obj (size_t n)
{
- scm_t_bits mem = n ? (scm_t_bits) malloc (n) : 0;
+ scm_t_bits mem = n ? (scm_t_bits) scm_gc_malloc (n, "malloc smob") : 0;
if (n && !mem)
return SCM_BOOL_F;
SCM_RETURN_NEWSMOB (scm_tc16_malloc, mem);