summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/gc-malloc.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/libguile/gc-malloc.c b/libguile/gc-malloc.c
index 0e60ebade..669f7894b 100644
--- a/libguile/gc-malloc.c
+++ b/libguile/gc-malloc.c
@@ -205,10 +205,8 @@ scm_gc_malloc (size_t size, const char *what)
void *
scm_gc_calloc (size_t size, const char *what)
{
- void *ptr = scm_gc_malloc (size, what);
- if (size)
- memset (ptr, 0x0, size);
- return ptr;
+ /* `GC_MALLOC ()' always returns a zeroed buffer. */
+ return scm_gc_malloc (size, what);
}