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

Mps br/vmem: (broken: assert tract.c line 327) run this at variety=ci (ie. where aver_critical works), to show how broken the chunk cache logic is.

Browse source 
Copied from Perforce
 Change: 170072
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Kistruck 2010-03-20 14:05:32 +00:00
parent 6ccac1bd84
commit 89bcad0dfd
1 changed files with 9 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

16
mps/code/arenavm.c
View file

@ -1614,14 +1614,16 @@ static void VMFree(Addr base, Size size, Pool pool)
/* @@@@ Chunks are never freed. */
/* ... oh yes they are */
sparePagesPurge(vmArena);
#if 0
/* destroy any empty chunks */
RING_FOR(node, &arena->chunkRing, next) {
Chunk chunk = RING_ELT(Chunk, chunkRing, node);
vmChunkDestroy(chunk);
{
Ring node, next;
sparePagesPurge(vmArena);
/* destroy any empty chunks, a la vmChunkDestroy */
RING_FOR(node, &arena->chunkRing, next) {
/*Chunk */chunk = RING_ELT(Chunk, chunkRing, node);
if(BTIsResRange(chunk->allocTable, 0, chunk->pages))
vmChunkDestroy(chunk);
}
}
#endif
return;
}