mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-02 02:10:46 -08:00
Code Issues Projects Releases Wiki Activity

Apss test relies on non-zoned client arena to test tight memory condition, but client arena is zoned by default now. fixed the test to set up a non-zoned client arena.

Browse source 
Copied from Perforce
 Change: 184779
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Brooksby 2014-03-13 15:00:37 +00:00
parent aa7c900988
commit b2d35664df
1 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
mps/code/apss.c
View file

@ -209,9 +209,13 @@ int main(int argc, char *argv[])
testInArena(arena, bothOptions);
mps_arena_destroy(arena);
die(mps_arena_create(&arena, mps_arena_class_cl(),
testArenaSIZE, malloc(testArenaSIZE)),
"mps_arena_create");
MPS_ARGS_BEGIN(args) {
MPS_ARGS_ADD(args, MPS_KEY_ARENA_SIZE, testArenaSIZE);
MPS_ARGS_ADD(args, MPS_KEY_ARENA_ZONED, FALSE);
MPS_ARGS_ADD(args, MPS_KEY_ARENA_CL_BASE, malloc(testArenaSIZE));
die(mps_arena_create_k(&arena, mps_arena_class_cl(), args),
"mps_arena_create");
} MPS_ARGS_END(args);
testInArena(arena, bothOptions);
mps_arena_destroy(arena);