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

Mps: minor formatting.

Browse source 
Copied from Perforce
 Change: 162963
 ServerID: perforce.ravenbrook.com
This commit is contained in:
David Jones 2007-07-20 13:50:35 +01:00
parent b747fa3684
commit b40ce0f0a7
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
mps/code/locus.c
View file

@ -379,11 +379,12 @@ Res PoolGenInit(PoolGen gen, Chain chain, Serial nr, Pool pool)
gen->newSize = (Size)0;
gen->sig = PoolGenSig;
if (nr != chain->genCount)
if(nr != chain->genCount) {
RingAppend(&chain->gens[nr].locusRing, &gen->genRing);
else
} else {
/* Dynamic generation is linked to the arena, not the chain. */
RingAppend(&chain->arena->topGen.locusRing, &gen->genRing);
}
AVERT(PoolGen, gen);
return ResOK;
}