1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-19 04:10:18 -08:00

Attach the pools using a format to a ring in the format, so that when we destroy the format, we can check that no pools are using it.

Copied from Perforce
 Change: 187253
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Gareth Rees 2014-10-13 22:44:20 +01:00
parent 33aeb61e59
commit f65f1db83e
9 changed files with 22 additions and 1 deletions

View file

@ -110,6 +110,7 @@ typedef struct mps_pool_s { /* generic structure */
RingStruct segRing; /* segs are attached to pool */
Align alignment; /* alignment for units */
Format format; /* format only if class->attr&AttrFMT */
RingStruct formatRing; /* link in list of pools using format */
PoolFixMethod fix; /* fix method */
double fillMutatorSize; /* bytes filled, mutator buffers */
double emptyMutatorSize; /* bytes emptied, mutator buffers */
@ -410,6 +411,7 @@ typedef struct mps_fmt_s {
Serial serial; /* from arena->formatSerial */
Arena arena; /* owning arena */
RingStruct arenaRing; /* formats are attached to the arena */
RingStruct poolRing; /* ring of pools using the format */
Align alignment; /* alignment of formatted objects */
mps_fmt_scan_t scan;
mps_fmt_skip_t skip;