1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 11:00:45 -08:00
emacs/mps/test/argerr/35.c
Gareth Rees 4e8de8d42e Replace deprecatd mv with mvff in test cases.
Delete eventrep and replay modules -- these have been broken for a long time. 

Copied from Perforce
 Change: 194843
2018-08-01 13:10:09 +01:00

39 lines
717 B
C

/*
TEST_HEADER
id = $Id$
summary = unaligned addr_t to free (MVFF)
language = c
link = testlib.o
OUTPUT_SPEC
assert = true
assertfile P= pool.c
assertcond = AddrIsAligned(old, pool->alignment)
END_HEADER
*/
#include "testlib.h"
#include "mpscmvff.h"
#include "arg.h"
static void test(void)
{
mps_arena_t arena;
mps_pool_t pool;
mps_addr_t a;
cdie(mps_arena_create(&arena, mps_arena_class_vm(), mmqaArenaSIZE), "create arena");
cdie(mps_pool_create_k(&pool, arena, mps_class_mvff(), mps_args_none), "pool");
die(mps_alloc(&a, pool, 8), "alloc");
mps_free(pool, (mps_addr_t) ((char *)a+1), 8);
mps_pool_destroy(pool);
mps_arena_destroy(arena);
}
int main(void)
{
easy_tramp(test);
return 0;
}