# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1013080247 0
# Node ID 8a549ab185a29c8c9edd02eea712f282839f3247
# Parent  630c8b6deafd5974a94c0c428425b0ac99ad7721
Fix thinko in last change.

diff -r 630c8b6deafd -r 8a549ab185a2 src/alloc.c
--- a/src/alloc.c	Thu Feb 07 11:05:08 2002 +0000
+++ b/src/alloc.c	Thu Feb 07 11:10:47 2002 +0000
@@ -3773,7 +3773,7 @@
 #ifndef GC_LISP_OBJECT_ALIGNMENT
 #define GC_LISP_OBJECT_ALIGNMENT sizeof (Lisp_Object)
 #endif
-  for (i = 0; i < sizeof (Lisp_Object) / GC_LISP_OBJECT_ALIGNMENT; i++)
+  for (i = 0; i < sizeof (Lisp_Object); i += GC_LISP_OBJECT_ALIGNMENT)
     mark_memory ((char *) stack_base + i, end);
 
 #if GC_MARK_STACK == GC_MARK_STACK_CHECK_GCPROS