mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-20 12:40:56 -08:00
Code Issues Projects Releases Wiki Activity

Added more control over write barrier. in particular separated scans after a hit.

Browse source 
Copied from Perforce
 Change: 186988
 ServerID: perforce.ravenbrook.com
This commit is contained in:
David Lovemore 2014-08-27 11:21:18 +01:00
parent 46d723c9dc
commit b4460043e6
4 changed files with 21 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

2
mps/code/seg.c
View file

@ -160,6 +160,7 @@ static Res SegInit(Seg seg, Pool pool, Addr base, Size size,
seg->grey = TraceSetEMPTY;
seg->pm = AccessSetEMPTY;
seg->sm = AccessSetEMPTY;
seg->scans = SEG_SCANS_INIT;
seg->depth = 0;
seg->firstTract = NULL;
@ -1082,7 +1083,6 @@ static Res gcSegInit(Seg seg, Pool pool, Addr base, Size size,
gcseg->summary = RefSetEMPTY;
gcseg->buffer = NULL;
gcseg->unnecessaryScans = 0;
RingInit(&gcseg->greyRing);
gcseg->sig = GCSegSig;