summaryrefslogtreecommitdiff
path: root/libguile/debug-malloc.c
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2008-12-18 22:38:06 +0100
committerLudovic Courtès <ludo@gnu.org>2008-12-18 22:49:17 +0100
commit36c66a07e54d27df2fdad5e3b64e8731067a9cfe (patch)
treee6a03931c7f0c27610a7c8a150b4df8a64c3093e /libguile/debug-malloc.c
parent8891556e50be2609f7dd7daaecfac150415b6331 (diff)
downloadguile-36c66a07e54d27df2fdad5e3b64e8731067a9cfe.tar.gz
Don't use deprecated functions in `debug-malloc.c'.
* libguile/debug-malloc.c (scm_malloc_stats): Use `scm_from_locale_string ()'. Patch by Linas Vepstas <linasvepstas@gmail.com>.
Diffstat (limited to 'libguile/debug-malloc.c')
-rw-r--r--libguile/debug-malloc.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/debug-malloc.c b/libguile/debug-malloc.c
index 88e7c7cdc..4d04df5db 100644
--- a/libguile/debug-malloc.c
+++ b/libguile/debug-malloc.c
@@ -220,7 +220,7 @@ SCM_DEFINE (scm_malloc_stats, "malloc-stats", 0, 0, 0,
int i;
for (i = 0; i < malloc_type_size + N_SEEK; ++i)
if (malloc_type[i].key)
- res = scm_acons (scm_makfrom0str ((char *) malloc_type[i].key),
+ res = scm_acons (scm_from_locale_string ((char *) malloc_type[i].key),
scm_from_int ((int) malloc_type[i].data),
res);
return res;