1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-26 23:31:55 -08:00
emacs/mps/test/conerr/57.c
Gareth Rees c89ce2ba0b Get the mmqa conerr tests working:
* Make sure all the test build and run.
* Add output specifications to the passing tests.
* New testset/conerr runs them all.

Copied from Perforce
 Change: 187248
 ServerID: perforce.ravenbrook.com
2014-10-13 21:34:12 +01:00

41 lines
724 B
C

/*
TEST_HEADER
id = $Id$
summary = add to ld in wrong arena
language = c
link = myfmt.o testlib.o
END_HEADER
*/
#include "testlib.h"
#include "mpscamc.h"
#include "myfmt.h"
static void test(void)
{
mps_arena_t arena0;
mps_arena_t arena1;
mps_ld_s ld;
cdie(mps_arena_create(&arena0, mps_arena_class_vm(), mmqaArenaSIZE), "create arena");
cdie(mps_arena_create(&arena1, mps_arena_class_vm(), mmqaArenaSIZE), "create arena 1");
mps_ld_reset(&ld, arena0);
comment("Reset ld.");
mps_ld_add(&ld, arena1, &arena0);
comment("Added to ld.");
mps_arena_destroy(arena0);
comment("Destroyed arena.");
mps_arena_destroy(arena1);
comment("Destroyed arena.");
}
int main(void)
{
easy_tramp(test);
return 0;
}