remove unnecessary stack-unwind test

The test was meant to detect a bad traversal step, but it could unnecessarily
truncate the stack traversal when encountering recursive calls.
This commit is contained in:
Matthew Flatt 2013-08-12 16:14:46 -06:00
parent 8f9e6529da
commit 04454678eb

View File

@ -465,11 +465,9 @@ Scheme_Object *scheme_native_stack_trace(void)
# endif
manual_unw = 0;
} else {
void *prev_q = q;
unw_step(&c);
q = (void *)unw_get_ip(&c);
if ((q == prev_q)
|| unw_reset_bad_ptr_flag(&c))
if (unw_reset_bad_ptr_flag(&c))
break;
}
}