1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-07 06:41:00 -07:00

Adding back in non-bogus checkt with tag

Copied from Perforce
 Change: 20150
 ServerID: perforce.ravenbrook.com
This commit is contained in:
David Jones 1998-09-29 17:31:29 +01:00
parent 0066b478cf
commit 6debdde3e2

View file

@ -1,6 +1,6 @@
/* impl.c.dbgpool: POOL DEBUG MIXIN
*
* $HopeName: MMsrc!dbgpool.c(trunk.4) $
* $HopeName: MMsrc!dbgpool.c(trunk.5) $
* Copyright (C) 1998 Harlequin Group plc. All rights reserved.
*
* .source: design.mps.object-debug
@ -470,7 +470,8 @@ void mps_pool_check_fenceposts(mps_pool_t mps_pool)
Pool pool = (Pool)mps_pool;
Arena arena;
AVERT(Pool, pool);
/* CHECKT not AVERT, see design.mps.interface.c.check.space */
AVER(CHECKT(Pool, pool));
arena = PoolArena(pool);
ArenaEnter(arena);