summaryrefslogtreecommitdiff
path: root/libguile/gc-malloc.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-12-13 10:20:44 +0100
committerAndy Wingo <wingo@pobox.com>2011-12-13 10:20:44 +0100
commitbfe35b90ff0c7f78335e70bdb26ea3466f6e98d9 (patch)
treef2bca0900186ee07ff354466c0894d8592b02d08 /libguile/gc-malloc.c
parent04ec290f8b3e6bd6297fb10391ea7e885a55a786 (diff)
parentac16263bc191f6b1f05b49d0f291f7fd938da72c (diff)
downloadguile-bfe35b90ff0c7f78335e70bdb26ea3466f6e98d9.tar.gz
Merge remote-tracking branch 'origin/stable-2.0'
Conflicts: configure.ac
Diffstat (limited to 'libguile/gc-malloc.c')
-rw-r--r--libguile/gc-malloc.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/gc-malloc.c b/libguile/gc-malloc.c
index 39e82ef1e..fb844ff63 100644
--- a/libguile/gc-malloc.c
+++ b/libguile/gc-malloc.c
@@ -95,7 +95,11 @@ scm_realloc (void *mem, size_t size)
return ptr;
/* Time is hard: trigger a full, ``stop-the-world'' GC, and try again. */
+#ifdef HAVE_GC_GCOLLECT_AND_UNMAP
GC_gcollect_and_unmap ();
+#else
+ GC_gcollect ();
+#endif
SCM_SYSCALL (ptr = realloc (mem, size));
if (ptr)