1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 14:30:43 -08:00
emacs/mps/test/misc/1.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

38 lines
500 B
C

/*
TEST_HEADER
id = $HopeName$
summary = access location in last 4 bytes of address space.
language = c
link = testlib.o
OUTPUT_SPEC
memoryerror = true
END_HEADER
*/
#include "testlib.h"
#include "mpsavm.h"
void *stackpointer;
static void test(void)
{
mps_arena_t arena;
int *p;
cdie(mps_arena_create(&arena, mps_arena_class_vm(), 64*1024uL*1024uL),
"create arena");
p = (int *)-4;
putchar(*p);
}
int main(void)
{
void *m;
stackpointer=&m;
easy_tramp(test);
return 0;
}