924 |
void GC_check_heap_proc() |
void GC_check_heap_proc() |
925 |
{ |
{ |
926 |
# ifndef SMALL_CONFIG |
# ifndef SMALL_CONFIG |
927 |
if (sizeof(oh) & (2 * sizeof(word) - 1) != 0) { |
# ifdef ALIGN_DOUBLE |
928 |
ABORT("Alignment problem: object header has inappropriate size\n"); |
GC_STATIC_ASSERT((sizeof(oh) & (2 * sizeof(word) - 1)) == 0); |
929 |
} |
# else |
930 |
|
GC_STATIC_ASSERT((sizeof(oh) & (sizeof(word) - 1)) == 0); |
931 |
|
# endif |
932 |
# endif |
# endif |
933 |
GC_apply_to_all_blocks(GC_check_heap_block, (word)0); |
GC_apply_to_all_blocks(GC_check_heap_block, (word)0); |
934 |
} |
} |