Mercurial > emacs
comparison src/alloc.c @ 43161:8a549ab185a2
Fix thinko in last change.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Thu, 07 Feb 2002 11:10:47 +0000 |
| parents | 630c8b6deafd |
| children | 4082674ce69b |
comparison
equal
deleted
inserted
replaced
| 43160:630c8b6deafd | 43161:8a549ab185a2 |
|---|---|
| 3771 that's not the case, something has to be done here to iterate | 3771 that's not the case, something has to be done here to iterate |
| 3772 over the stack segments. */ | 3772 over the stack segments. */ |
| 3773 #ifndef GC_LISP_OBJECT_ALIGNMENT | 3773 #ifndef GC_LISP_OBJECT_ALIGNMENT |
| 3774 #define GC_LISP_OBJECT_ALIGNMENT sizeof (Lisp_Object) | 3774 #define GC_LISP_OBJECT_ALIGNMENT sizeof (Lisp_Object) |
| 3775 #endif | 3775 #endif |
| 3776 for (i = 0; i < sizeof (Lisp_Object) / GC_LISP_OBJECT_ALIGNMENT; i++) | 3776 for (i = 0; i < sizeof (Lisp_Object); i += GC_LISP_OBJECT_ALIGNMENT) |
| 3777 mark_memory ((char *) stack_base + i, end); | 3777 mark_memory ((char *) stack_base + i, end); |
| 3778 | 3778 |
| 3779 #if GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS | 3779 #if GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS |
| 3780 check_gcpros (); | 3780 check_gcpros (); |
| 3781 #endif | 3781 #endif |
