3773 |
#ifndef GC_LISP_OBJECT_ALIGNMENT |
#ifndef GC_LISP_OBJECT_ALIGNMENT |
3774 |
#define GC_LISP_OBJECT_ALIGNMENT sizeof (Lisp_Object) |
#define GC_LISP_OBJECT_ALIGNMENT sizeof (Lisp_Object) |
3775 |
#endif |
#endif |
3776 |
for (i = 0; i < sizeof (Lisp_Object) / GC_LISP_OBJECT_ALIGNMENT; i++) |
for (i = 0; i < sizeof (Lisp_Object); i += GC_LISP_OBJECT_ALIGNMENT) |
3777 |
mark_memory ((char *) stack_base + i, end); |
mark_memory ((char *) stack_base + i, end); |
3778 |
|
|
3779 |
#if GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS |
#if GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS |