diff options
| author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2008-08-26 22:49:05 -0300 |
|---|---|---|
| committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2008-08-26 23:46:39 -0300 |
| commit | 487b9dec2ea6b88ddbc6fbd17f445ddb197aebc5 (patch) | |
| tree | fdfdbba7a39794d57462dc274e310f123c101e7f | |
| parent | 80237dcc7783b4d94ecf1d987deb9306d61735a0 (diff) | |
| download | guile-487b9dec2ea6b88ddbc6fbd17f445ddb197aebc5.tar.gz | |
Only sanity check numbers if SCM_DEBUG_CELL_ACCESSES is unset.
SCM_DEBUG_CELL_ACCESSES uses the mark bits for its own purposes.
| -rw-r--r-- | libguile/gc.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/libguile/gc.c b/libguile/gc.c index a293400fa..8e8769c43 100644 --- a/libguile/gc.c +++ b/libguile/gc.c @@ -599,6 +599,7 @@ scm_i_gc (const char *what) /* Sanity check our numbers. */ +#if (SCM_DEBUG_CELL_ACCESSES == 0) /* If this was not true, someone touched mark bits outside of the mark phase. */ assert (scm_cells_allocated == scm_i_marked_count ()); @@ -607,7 +608,8 @@ scm_i_gc (const char *what) + scm_i_master_freelist2.heap_total_cells)); assert (scm_i_gc_sweep_stats.collected + scm_cells_allocated == scm_i_gc_sweep_stats.swept); - +#endif /* SCM_DEBUG_CELL_ACCESSES */ + /* Mark */ scm_c_hook_run (&scm_before_mark_c_hook, 0); |