Implemented `gc-stats' using `libgc' information.
authorLudovic Courtes <ludovic.courtes@laas.fr>
Sun, 2 Jul 2006 20:26:29 +0000 (20:26 +0000)
committerLudovic Courtès <ludo@gnu.org>
Wed, 10 Sep 2008 18:28:41 +0000 (20:28 +0200)
commit915b3f9f9af5b9dce63e8d9df2ae4edba709d4b5
treeb3abc63885ed4f3892d74396f993cbb72d75f4a3
parent42e6668b5e91a101c9d163aae0039451444546be
Implemented `gc-stats' using `libgc' information.

* libguile/gc.c (protected_obj_count): Made `static'.
  (scm_heap_size): Mapped to `heap-size' rather than `cell-heap-size'.
  (scm_heap_free_size): New.
  (scm_heap_total_allocated): New.
  (scm_gc_stats): Rewritten.  Return the (little) information available
  from `libgc'.
  (scm_gc_disable): New.
  (scm_gc_enable): New.
  (scm_storage_prehistory): Don't call `GC_add_roots ()' with
  SCM_SYS_PROTECTS.  Use `GC_is_visible ()' to check whether
  SCM_SYS_PROTECTS is visible.

* libguile/gc.h (scm_gc_enable): New declaration.
  (scm_gc_disable): New declaration.
  (scm_gc_for_alloc): Removed.
  (scm_gc_for_newcell): Removed.

git-archimport-id: lcourtes@laas.fr--2005-libre/guile-core--boehm-gc--1.9--patch-46
libguile/gc.c
libguile/gc.h