* alloc.c (CONS_BLOCK_SIZE): Account for padding at the end of
cons_block.
This commit is contained in:
parent
95f520b52b
commit
a282161184
2 changed files with 9 additions and 2 deletions
|
@ -1,3 +1,8 @@
|
|||
2012-06-02 Andreas Schwab <schwab@linux-m68k.org>
|
||||
|
||||
* alloc.c (CONS_BLOCK_SIZE): Account for padding at the end of
|
||||
cons_block.
|
||||
|
||||
2012-06-01 Paul Eggert <eggert@cs.ucla.edu>
|
||||
|
||||
* xfns.c (x_set_tool_bar_lines) [USE_GTK]: Adjust to bitfield change.
|
||||
|
|
|
@ -2701,8 +2701,10 @@ make_float (double float_value)
|
|||
GC are put on a free list to be reallocated before allocating
|
||||
any new cons cells from the latest cons_block. */
|
||||
|
||||
#define CONS_BLOCK_SIZE \
|
||||
(((BLOCK_BYTES - sizeof (struct cons_block *)) * CHAR_BIT) \
|
||||
#define CONS_BLOCK_SIZE \
|
||||
(((BLOCK_BYTES - sizeof (struct cons_block *) \
|
||||
/* The compiler might add padding at the end. */ \
|
||||
- (sizeof (struct Lisp_Cons) - sizeof (int))) * CHAR_BIT) \
|
||||
/ (sizeof (struct Lisp_Cons) * CHAR_BIT + 1))
|
||||
|
||||
#define CONS_BLOCK(fptr) \
|
||||
|
|
Loading…
Add table
Reference in a new issue