diff options
author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2005-01-27 22:44:43 +0000 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2005-01-27 22:44:43 +0000 |
commit | 73a4c24e417fad800b99decea5b27b57cdb1e76d (patch) | |
tree | cc810b68a7cc3cb1bcb19abc7e0623b36d5a65d3 /libguile/gc-card.c | |
parent | 8b378a5f4893f3ee9e2738074370fd85bf3eef8e (diff) | |
download | guile-73a4c24e417fad800b99decea5b27b57cdb1e76d.tar.gz |
* gc.c (s_scm_gc_live_object_stats): return alist, not hashtable.
(tag_table_to_type_alist): ignore unknown types.
* gc.c (s_scm_gc_live_object_stats): new GUILE callable: return
statistics on the number of live objects of each type.
* gc-card.c (scm_i_tag_name): new function.
(scm_i_card_statistics): new function.
Diffstat (limited to 'libguile/gc-card.c')
-rw-r--r-- | libguile/gc-card.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/gc-card.c b/libguile/gc-card.c index 1acd95e17..f14b54e64 100644 --- a/libguile/gc-card.c +++ b/libguile/gc-card.c @@ -414,7 +414,7 @@ scm_i_tag_name (scm_t_bits tag) break; } - return "unknown type"; + return NULL; } |