1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-27 07:41:28 -08:00
emacs/mps/test/conerr/54.c
Gareth Rees dfa7354873 Avoid warnings when compiling argerr/{146,147,148}.c with gcc.
Test cases conerr/{53,54}.c rely on junk in uninitialized local variables, so ensure that there is some.
Test case function/72.c relies on an object moving, but it might be pinned by an ambiguous reference from the stack, so don't register the stack as a root.

Copied from Perforce
 Change: 189964
 ServerID: perforce.ravenbrook.com
2016-03-13 14:16:39 +00:00

52 lines
798 B
C

/*
TEST_HEADER
id = $Id$
summary = is_stale without resetting
language = c
link = myfmt.o testlib.o
OUTPUT_SPEC
assert = true
assertfile P= ld.c
assertcond = ld->_epoch <= arena->epoch
END_HEADER
*/
#include <string.h>
#include "testlib.h"
#include "mpscamc.h"
#include "myfmt.h"
static void test(void)
{
mps_arena_t arena;
mps_ld_s ld;
/* overwrite ld with junk */
memset(&ld, 0xff, sizeof ld);
cdie(mps_arena_create(&arena, mps_arena_class_vm(), mmqaArenaSIZE), "create arena");
/*
mps_ld_reset(&ld, arena);
comment("Reset ld.");
*/
/*
mps_ld_add(&ld, arena, &arena);
comment("Added to ld.");
*/
report("isstale", "%d", mps_ld_isstale(&ld, arena, &arena));
mps_arena_destroy(arena);
comment("Destroyed arena.");
}
int main(void)
{
easy_tramp(test);
return 0;
}