From: Jason Rumney <jasonr@gnu.org>
Date: Sun, 6 Jul 2003 14:55:00 +0000 (+0000)
Subject: (struct ablock): Only include padding when there is some.
X-Git-Tag: ttn-vms-21-2-B4~9483
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ebb8d410538fd1704ecc15c18fa27f610042eed2;p=emacs.git

(struct ablock): Only include padding when there is some.
---

diff --git a/src/alloc.c b/src/alloc.c
index 4ec3a1c3863..2232b7b82d2 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -645,7 +645,7 @@ lisp_free (block)
 /* BLOCK_ALIGN has to be a power of 2.  */
 #define BLOCK_ALIGN (1 << 10)
 #define BLOCK_BYTES \
-  (BLOCK_ALIGN - sizeof (struct aligned_block *) - ABLOCKS_PADDING)
+  (BLOCK_ALIGN - sizeof (struct alinged_block *) - ABLOCKS_PADDING)
 
 /* Internal data structures and constants.  */
 
@@ -676,7 +676,9 @@ struct ablock
   struct ablocks *abase;
   /* The padding of all but the last ablock is unused.  The padding of
      the last ablock in an ablocks is not allocated.  */
+#if ABLOCKS_PADDING
   char padding[ABLOCKS_PADDING];
+#endif
 };
 
 /* A bunch of consecutive aligned blocks.  */