1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-09 21:20:45 -08:00

Mps br/diag arena.c: arenadestroy diag = controldescribe.

(p4 integ -f //info.ravenbrook.com/project/mps/branch/2008-03-11/auto_header/code/arena.chttps://github.com/Ravenbrook/mps/issues/3,https://github.com/Ravenbrook/mps/issues/5 arena.c)

Copied from Perforce
 Change: 166950
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Kistruck 2008-12-16 16:09:43 +00:00
commit 9092e0b2bb

View file

@ -275,6 +275,10 @@ void ArenaDestroy(Arena arena)
/* Empty the reservoir - see <code/reserv.c#reservoir.finish> */
ReservoirSetLimit(ArenaReservoir(arena), 0);
DIAG_FIRSTF(( "ArenaDestroy", NULL ));
DIAG( ControlDescribe(arena, DIAG_STREAM); );
DIAG_END("ArenaDestroy");
arena->poolReady = FALSE;
ControlFinish(arena);