diff --git a/ChangeLog b/ChangeLog index 275de7e8b0..55637b05ac 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +Tue Nov 19 18:52:10 2013 Koichi Sasada + + * gc.c (heap_is_swept_object): use heap_page::before_sweep flag. + Tue Nov 19 18:49:32 2013 Koichi Sasada * gc.c (rb_objspace_reachable_objects_from_root): do major marking. diff --git a/gc.c b/gc.c index 7b4fa0e15a..afea8aa259 100644 --- a/gc.c +++ b/gc.c @@ -2168,12 +2168,8 @@ is_id_value(rb_objspace_t *objspace, VALUE ptr) static inline int heap_is_swept_object(rb_objspace_t *objspace, rb_heap_t *heap, VALUE ptr) { - struct heap_page *page = heap->sweep_pages; - while (page) { - if ((VALUE)page->start <= ptr && ptr < (VALUE)(page->start + page->limit)) return FALSE; - page = page->next; - } - return TRUE; + struct heap_page *page = GET_HEAP_PAGE(ptr); + return page->before_sweep ? FALSE : TRUE; } static inline int