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;