diff options
author | Andy Wingo <wingo@pobox.com> | 2011-08-18 11:54:20 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-08-18 12:53:28 +0200 |
commit | fb031aba42d3b0d22538c50ef92a666496a8e326 (patch) | |
tree | 2cfd00b5c5d5580037116fcdac1d9a702429fb3d /libguile/bytevectors.c | |
parent | 5261e74281b1150e3b2594c92e571d8887a4900d (diff) | |
download | guile-fb031aba42d3b0d22538c50ef92a666496a8e326.tar.gz |
fix a couple of leaks
* libguile/bytevectors.h:
* libguile/bytevectors.c (scm_c_take_gc_bytevector): Rename this
internal function, from scm_c_take_bytevector. This indicates that
unlike the other scm_take_* functions, this one takes GC-managed
memory.
* libguile/objcodes.c (scm_objcode_to_bytecode):
* libguile/vm.c (really_make_boot_program): Use
scm_gc_malloc_pointerless, not scm_malloc. Thanks to Stefan
Israelsson Tampe!
* libguile/r6rs-ports.c:
* libguile/strings.c: Adapt to renames.
Diffstat (limited to 'libguile/bytevectors.c')
-rw-r--r-- | libguile/bytevectors.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/bytevectors.c b/libguile/bytevectors.c index 14159d28d..4aeae63b0 100644 --- a/libguile/bytevectors.c +++ b/libguile/bytevectors.c @@ -285,7 +285,7 @@ scm_i_make_typed_bytevector (size_t len, scm_t_array_element_type element_type) /* Return a bytevector of size LEN made up of CONTENTS. The area pointed to by CONTENTS must have been allocated using `scm_gc_malloc ()'. */ SCM -scm_c_take_bytevector (signed char *contents, size_t len) +scm_c_take_gc_bytevector (signed char *contents, size_t len) { return make_bytevector_from_buffer (len, contents, SCM_ARRAY_ELEMENT_TYPE_VU8); } |