summaryrefslogtreecommitdiff
path: root/guile
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-06-07 10:11:12 +0200
committerLudovic Courtès <ludo@gnu.org>2019-06-07 10:19:22 +0200
commit079415482d8e2e923b9fa5470f310ba3042e318b (patch)
tree33da1493a6ac1b29db6005b63e95e8f53c01c103 /guile
parent8ed7f01901441be191ee4bd6507e4f744efccaca (diff)
downloadgnutls-079415482d8e2e923b9fa5470f310ba3042e318b.tar.gz
guile: Always provide 'scm_gc_malloc_pointerless'.
* guile/src/core.c (scm_gc_malloc_pointerless) [!HAVE_SCM_GC_MALLOC_POINTERLESS]: New macro. (make_session_record_port): Remove #ifdef HAVE_SCM_GC_MALLOC_POINTERLESS. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'guile')
-rw-r--r--guile/src/core.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/guile/src/core.c b/guile/src/core.c
index 546d63a1e3..3187792e92 100644
--- a/guile/src/core.c
+++ b/guile/src/core.c
@@ -1,5 +1,5 @@
/* GnuTLS --- Guile bindings for GnuTLS.
- Copyright (C) 2007-2014, 2016 Free Software Foundation, Inc.
+ Copyright (C) 2007-2014, 2016, 2019 Free Software Foundation, Inc.
GnuTLS is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
@@ -36,6 +36,10 @@
#include "utils.h"
+#ifndef HAVE_SCM_GC_MALLOC_POINTERLESS
+# define scm_gc_malloc_pointerless scm_gc_malloc
+#endif
+
/* SMOB and enums type definitions. */
#include "enum-map.i.c"
@@ -958,12 +962,8 @@ make_session_record_port (SCM session)
const unsigned long mode_bits = SCM_OPN | SCM_RDNG | SCM_WRTNG;
c_port_buf = (unsigned char *)
-#ifdef HAVE_SCM_GC_MALLOC_POINTERLESS
- scm_gc_malloc_pointerless
-#else
- scm_gc_malloc
-#endif
- (SCM_GNUTLS_SESSION_RECORD_PORT_BUFFER_SIZE, session_record_port_gc_hint);
+ scm_gc_malloc_pointerless (SCM_GNUTLS_SESSION_RECORD_PORT_BUFFER_SIZE,
+ session_record_port_gc_hint);
/* Create a new port. */
port = scm_new_port_table_entry (session_record_port_type);