mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-01 09:51:22 -08:00
Code Issues Projects Releases Wiki Activity

(pure_alloc): Correct alignment for Lisp_Floats.

Browse source
This commit is contained in:
Andreas Schwab 2003-01-10 20:08:54 +00:00
parent d4aeef3b96
commit 3a8d08994a
2 changed files with 12 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2003-01-10 Andreas Schwab <schwab@suse.de>
* alloc.c (pure_alloc): Correct alignment for Lisp_Floats.
Reported by Berthold Gunreben <b.gunreben@web.de>.
2003-01-10 Dave Love <fx@gnu.org>
* composite.c (syms_of_composite): Make composition_hash_table

9
src/alloc.c
View file

@ -1,5 +1,5 @@
/* Storage allocation and gc for GNU Emacs Lisp interpreter.
Copyright (C) 1985, 86, 88, 93, 94, 95, 97, 98, 1999, 2000, 2001, 2002
Copyright (C) 1985, 86, 88, 93, 94, 95, 97, 98, 1999, 2000, 2001, 2002, 2003
Free Software Foundation, Inc.
This file is part of GNU Emacs.
@ -3844,7 +3844,12 @@ pure_alloc (size, type)
#else
alignment = sizeof (struct Lisp_Float);
#endif
pure_bytes_used = ALIGN (pure_bytes_used, alignment);
/* Make sure beg + pure_bytes_used is correctly aligned for a
Lisp_Float, which might need stricter alignment than
EMACS_INT. */
pure_bytes_used
= (ALIGN ((EMACS_UINT) (beg + pure_bytes_used), alignment)
- (EMACS_UINT) beg);
}
nbytes = ALIGN (size, sizeof (EMACS_INT));