mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 19:50:24 +02:00
Code Activity

Don't sanity check GC numbers on 64 bit platforms, while we

Browse source 
investigate a real fix.
This commit is contained in:
Han-Wen Nienhuys 2008-09-03 01:37:58 -03:00
parent 4e641322d3
commit 289cd1a720
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/gc.c
View file

@ -597,9 +597,9 @@ scm_i_gc (const char *what)
scm_i_sweep_all_segments ("GC", &scm_i_gc_sweep_stats); scm_i_sweep_all_segments ("GC", &scm_i_gc_sweep_stats);
scm_check_deprecated_memory_return (); scm_check_deprecated_memory_return ();
#if (SCM_DEBUG_CELL_ACCESSES == 0 && SCM_SIZEOF_UNSIGNED_LONG ==4)
/* Sanity check our numbers. */ /* Sanity check our numbers. */
/* TODO(hanwen): figure out why the stats are off on x64_64. */
#if (SCM_DEBUG_CELL_ACCESSES == 0)
/* If this was not true, someone touched mark bits outside of the /* If this was not true, someone touched mark bits outside of the
mark phase. */ mark phase. */
assert (scm_cells_allocated == scm_i_marked_count ()); assert (scm_cells_allocated == scm_i_marked_count ());