summaryrefslogtreecommitdiff
path: root/libguile/gc-malloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/gc-malloc.c')
-rw-r--r--libguile/gc-malloc.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/libguile/gc-malloc.c b/libguile/gc-malloc.c
index 02032adcb..8e2190cfb 100644
--- a/libguile/gc-malloc.c
+++ b/libguile/gc-malloc.c
@@ -307,6 +307,8 @@ scm_gc_calloc (size_t size, const char *what)
void *
scm_gc_realloc (void *mem, size_t old_size, size_t new_size, const char *what)
{
+ void *ptr;
+
/* XXX - see scm_gc_malloc. */
@@ -320,7 +322,7 @@ scm_gc_realloc (void *mem, size_t old_size, size_t new_size, const char *what)
decrease_mtrigger (old_size, what);
increase_mtrigger (new_size, what);
- void *ptr = scm_realloc (mem, new_size);
+ ptr = scm_realloc (mem, new_size);
#ifdef GUILE_DEBUG_MALLOC
if (mem)