diff options
author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-08-16 22:01:10 +0000 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-08-16 22:01:10 +0000 |
commit | 67329a9eefdcfae7ccee5ba2afc783e30dacdae2 (patch) | |
tree | 62f268f12a88c3f969ad26f6ab0a9929eff71706 /libguile/srcprop.c | |
parent | f07c886abbde77c62528981137406da88cf2f055 (diff) | |
download | guile-67329a9eefdcfae7ccee5ba2afc783e30dacdae2.tar.gz |
* mallocs.c (scm_malloc_obj): use scm_gc_malloc in stead of
malloc.
* gc-segment.c (scm_i_get_new_heap_segment): remove cluster cruft:
only use SCM_MIN_HEAP_SEG_SIZE.
* ports.c (scm_add_to_port_table): add backwards compatibility
function
* ports.h: use scm_i_ prefix for port table and port table size.
Diffstat (limited to 'libguile/srcprop.c')
-rw-r--r-- | libguile/srcprop.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/srcprop.c b/libguile/srcprop.c index a47dfc0ea..b1e48eaa2 100644 --- a/libguile/srcprop.c +++ b/libguile/srcprop.c @@ -138,7 +138,7 @@ scm_make_srcprops (long line, int col, SCM filename, SCM copy, SCM plist) scm_t_srcprops_chunk *mem; size_t n = sizeof (scm_t_srcprops_chunk) + sizeof (scm_t_srcprops) * (SRCPROPS_CHUNKSIZE - 1); - SCM_SYSCALL (mem = (scm_t_srcprops_chunk *) malloc (n)); + SCM_SYSCALL (mem = (scm_t_srcprops_chunk *) scm_malloc (n)); if (mem == NULL) scm_memory_error ("srcprops"); scm_mallocated += n; |