summaryrefslogtreecommitdiff
path: root/libguile/putenv.c
diff options
context:
space:
mode:
authorHan-Wen Nienhuys <hanwen@lilypond.org>2002-08-16 22:01:10 +0000
committerHan-Wen Nienhuys <hanwen@lilypond.org>2002-08-16 22:01:10 +0000
commit67329a9eefdcfae7ccee5ba2afc783e30dacdae2 (patch)
tree62f268f12a88c3f969ad26f6ab0a9929eff71706 /libguile/putenv.c
parentf07c886abbde77c62528981137406da88cf2f055 (diff)
downloadguile-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/putenv.c')
-rw-r--r--libguile/putenv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/putenv.c b/libguile/putenv.c
index ccfaaa2d8..88f82144f 100644
--- a/libguile/putenv.c
+++ b/libguile/putenv.c
@@ -115,7 +115,7 @@ putenv (const char *string)
if (*ep == NULL)
{
static char **last_environ = NULL;
- char **new_environ = (char **) malloc ((size + 2) * sizeof (char *));
+ char **new_environ = (char **) scm_malloc ((size + 2) * sizeof (char *));
if (new_environ == NULL)
return -1;
memcpy ((char *) new_environ, (char *) environ, size * sizeof (char *));