1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 14:30:43 -08:00
emacs/mps/test/conerr/42.c
Nick Barnes 7acfca905d Branch imports for masters.
Copied from Perforce
 Change: 23678
 ServerID: perforce.ravenbrook.com
2001-10-31 14:40:56 +00:00

44 lines
701 B
C

/*
TEST_HEADER
id = $HopeName$
summary = create root in destroyed space
language = c
link = myfmt.o testlib.o
END_HEADER
*/
#include "testlib.h"
#include "mpscamc.h"
#include "myfmt.h"
void *stackpointer;
static void test(void)
{
mps_space_t space;
mps_root_t root;
mps_addr_t roottable[10];
cdie(mps_space_create(&space), "create space");
mps_space_destroy(space);
comment("Destroyed space.");
cdie(
mps_root_create_table(&root, space, MPS_RANK_AMBIG, 0,
roottable, sizeof(mps_addr_t[10])), "create root");
mps_root_destroy(root);
comment("Destroyed root.");
}
int main(void)
{
void *m;
stackpointer=&m; /* hack to get stack pointer */
easy_tramp(test);
return 0;
}