mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-24 07:41:54 -07:00
Code Issues Projects Releases Wiki Activity

Temporary fix for 64 bit windows: make allocations 8 byte aligned.

Browse source 
Copied from Perforce
 Change: 178238
 ServerID: perforce.ravenbrook.com
This commit is contained in:
David Lovemore 2012-05-21 17:40:07 +01:00
parent 5982f80df1
commit a1e4e1e29c
1 changed files with 9 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

16
mps/code/locv.c
View file

@ -27,7 +27,7 @@ static void stepper(mps_addr_t addr, mps_fmt_t fmt, mps_pool_t pool,
static mps_fmt_A_s locv_fmt =
{
(mps_align_t)4,
(mps_align_t)8, /* was 4 @@@@ FIXME: W3I6MV Temporary fix */
scan,
skip,
copy,
@ -61,9 +61,10 @@ int main(void)
die(mps_ap_create(&ap, pool, MPS_RANK_EXACT), "APCreate");
die(mps_reserve(&p, ap, (size_t)4), "mps_reserve 4");
*(mps_word_t *)p = 4;
cdie(mps_commit(ap, p, (size_t)4), "commit 4");
/* was 4 @@@@ FIXME: W3I6MV Temporary fix */
die(mps_reserve(&p, ap, (size_t)8), "mps_reserve 4");
*(mps_word_t *)p = 8;
cdie(mps_commit(ap, p, (size_t)8), "commit 4");
die(mps_reserve(&roots[1], ap, (size_t)8), "mps_reserve 8");
p = roots[1];
@ -74,9 +75,10 @@ int main(void)
*(mps_word_t *)p = 4096;
cdie(mps_commit(ap, p, (size_t)4096), "commit 4096");
die(mps_reserve(&p, ap, (size_t)4), "mps_reserve last");
*(mps_word_t *)p = 4;
cdie(mps_commit(ap, p, (size_t)4), "commit last");
/* was 4 @@@@ FIXME: W3I6MV Temporary fix */
die(mps_reserve(&p, ap, (size_t)8), "mps_reserve last");
*(mps_word_t *)p = 8;
cdie(mps_commit(ap, p, (size_t)8), "commit last");
{
size_t count = 0;