Lines 3716-3722
Link Here
|
3716 |
static void |
3716 |
static void |
3717 |
mark_stack () |
3717 |
mark_stack () |
3718 |
{ |
3718 |
{ |
3719 |
jmp_buf j; |
3719 |
union aligned_jmpbuf { |
|
|
3720 |
Lisp_Object o; |
3721 |
jmp_buf j; |
3722 |
} j; |
3720 |
volatile int stack_grows_down_p = (char *) &j > (char *) stack_base; |
3723 |
volatile int stack_grows_down_p = (char *) &j > (char *) stack_base; |
3721 |
void *end; |
3724 |
void *end; |
3722 |
|
3725 |
|
Lines 3744-3750
Link Here
|
3744 |
} |
3747 |
} |
3745 |
#endif /* GC_SETJMP_WORKS */ |
3748 |
#endif /* GC_SETJMP_WORKS */ |
3746 |
|
3749 |
|
3747 |
setjmp (j); |
3750 |
setjmp (j.j); |
3748 |
end = stack_grows_down_p ? (char *) &j + sizeof j : (char *) &j; |
3751 |
end = stack_grows_down_p ? (char *) &j + sizeof j : (char *) &j; |
3749 |
#endif /* not GC_SAVE_REGISTERS_ON_STACK */ |
3752 |
#endif /* not GC_SAVE_REGISTERS_ON_STACK */ |
3750 |
|
3753 |
|