summaryrefslogtreecommitdiff
path: root/guile/src
diff options
context:
space:
mode:
Diffstat (limited to 'guile/src')
-rw-r--r--guile/src/core.c9
1 files changed, 6 insertions, 3 deletions
diff --git a/guile/src/core.c b/guile/src/core.c
index f791ef80ff..693d11f176 100644
--- a/guile/src/core.c
+++ b/guile/src/core.c
@@ -2790,6 +2790,12 @@ scm_init_gnutls (void)
{
#include "core.x"
+ /* Use Guile's allocation routines, which will run the GC if need be. */
+ gnutls_malloc = scm_malloc;
+ gnutls_realloc = scm_realloc;
+ gnutls_secure_malloc = scm_malloc;
+ gnutls_free = free;
+
(void) gnutls_global_init ();
scm_gnutls_define_enums ();
@@ -2798,6 +2804,3 @@ scm_init_gnutls (void)
scm_init_gnutls_session_record_port_type ();
}
-
-/* arch-tag: 58420abe-0769-4684-b522-da7f32f4474c
- */