Project

General

Profile

Bug #2315 ยป get_machine_stack_bounds.patch

sunaku (Suraj Kurapati), 10/31/2009 02:15 PM

View differences:

ChangeLog
* io.c (io_cntl): F_DUPFD is platform dependent.
Mon Oct 25 13:28:00 2009 Suraj N. Kurapati <sunaku@gmail.com>
* gc.c: refactor common code from mark_current_machine_context()
and rb_gc_mark_machine_stack() into get_machine_stack_bounds().
Sun Oct 25 10:19:09 2009 Nobuyoshi Nakada <nobu@ruby-lang.org>
* ext/dl/handle.c (rb_dlhandle_close): fixed an invalid local
gc.c
void rb_vm_mark(void *ptr);
static void
get_machine_stack_bounds(rb_thread_t *th, VALUE **stack_start, VALUE **stack_end, unsigned stack_end_increment)
{
#if STACK_GROW_DIRECTION < 0
*stack_start = th->machine_stack_end;
*stack_end = th->machine_stack_start;
#elif STACK_GROW_DIRECTION > 0
*stack_start = th->machine_stack_start;
*stack_end = th->machine_stack_end + stack_end_increment;
#else
if (th->machine_stack_end < th->machine_stack_start) {
*stack_start = th->machine_stack_end;
*stack_end = th->machine_stack_start;
}
else {
*stack_start = th->machine_stack_start;
*stack_end = th->machine_stack_end + stack_end_increment;
}
#endif
}
static void
mark_current_machine_context(rb_objspace_t *objspace, rb_thread_t *th)
{
rb_jmp_buf save_regs_gc_mark;
......
rb_setjmp(save_regs_gc_mark);
SET_STACK_END;
#if STACK_GROW_DIRECTION < 0
stack_start = th->machine_stack_end;
stack_end = th->machine_stack_start;
#elif STACK_GROW_DIRECTION > 0
stack_start = th->machine_stack_start;
stack_end = th->machine_stack_end + 1;
#else
if (th->machine_stack_end < th->machine_stack_start) {
stack_start = th->machine_stack_end;
stack_end = th->machine_stack_start;
}
else {
stack_start = th->machine_stack_start;
stack_end = th->machine_stack_end + 1;
}
#endif
get_machine_stack_bounds(th, &stack_start, &stack_end, 1);
mark_locations_array(objspace,
(VALUE*)save_regs_gc_mark,
......
void
rb_gc_mark_machine_stack(rb_thread_t *th)
{
VALUE *stack_start, *stack_end;
get_machine_stack_bounds(th, &stack_start, &stack_end, 0);
rb_objspace_t *objspace = &rb_objspace;
#if STACK_GROW_DIRECTION < 0
rb_gc_mark_locations(th->machine_stack_end, th->machine_stack_start);
#elif STACK_GROW_DIRECTION > 0
rb_gc_mark_locations(th->machine_stack_start, th->machine_stack_end);
#else
if (th->machine_stack_start < th->machine_stack_end) {
rb_gc_mark_locations(th->machine_stack_start, th->machine_stack_end);
}
else {
rb_gc_mark_locations(th->machine_stack_end, th->machine_stack_start);
}
#endif
rb_gc_mark_locations(stack_start, stack_end);
#ifdef __ia64
rb_gc_mark_locations(th->machine_register_stack_start, th->machine_register_stack_end);
#endif
    (1-1/1)