diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2009-09-28 22:39:03 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2009-09-28 22:47:08 +0200 |
| commit | 2290dcb96e78e14b2a9cfa3158abc9d52f72d888 (patch) | |
| tree | ec09cdda235a62878b1c84b1ee7cc4968f1f83c6 /guile/src | |
| parent | 17edc60deccccfd93a1290e27f8643b68a6c2dda (diff) | |
| download | gnutls-2290dcb96e78e14b2a9cfa3158abc9d52f72d888.tar.gz | |
guile: Use Guile's malloc routines.
* guile/src/core.c (scm_init_gnutls): Use Guile's malloc routines.
Diffstat (limited to 'guile/src')
| -rw-r--r-- | guile/src/core.c | 9 |
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 - */ |