19
19
#ifndef ALLOCATOR_TEST_H__
20
20
#define ALLOCATOR_TEST_H__
22
typedef unsigned long Ulong;
22
typedef ErlDrvUInt Ulong;
25
25
Ulong erts_alc_test(Ulong, Ulong, Ulong, Ulong);
82
82
#define NO_OF_BKTS ((Ulong) ALC_TEST0(0x102))
83
83
#define FIND_BKT(A, I) ((int) ALC_TEST2(0x103, (A), (I)))
85
/* From erl_bestfit_alloc.c */
86
#define IS_AOBF(A) ((Ulong) ALC_TEST1(0x200, (A)))
87
#define RBT_ROOT(A) ((RBT_t *) ALC_TEST1(0x201, (A)))
88
#define RBT_PARENT(T) ((RBT_t *) ALC_TEST1(0x202, (T)))
89
#define RBT_LEFT(T) ((RBT_t *) ALC_TEST1(0x203, (T)))
90
#define RBT_RIGHT(T) ((RBT_t *) ALC_TEST1(0x204, (T)))
91
#define RBT_NEXT(T) ((RBTL_t *) ALC_TEST1(0x205, (T)))
92
#define RBT_IS_BLACK(T) ((Ulong) ALC_TEST1(0x206, (T)))
93
#define RBT_IS_TREE(T) ((Ulong) ALC_TEST1(0x207, (T)))
85
/* From erl_bestfit_alloc.c and erl_ao_firstfit_alloc.c */
86
#define IS_AOBF(A) ((Ulong) ALC_TEST1(RBT_OP(0), (A)))
87
#define RBT_ROOT(A) ((RBT_t *) ALC_TEST1(RBT_OP(1), (A)))
88
#define RBT_PARENT(T) ((RBT_t *) ALC_TEST1(RBT_OP(2), (T)))
89
#define RBT_LEFT(T) ((RBT_t *) ALC_TEST1(RBT_OP(3), (T)))
90
#define RBT_RIGHT(T) ((RBT_t *) ALC_TEST1(RBT_OP(4), (T)))
91
#define RBT_NEXT(T) ((RBTL_t *) ALC_TEST1(RBT_OP(5), (T)))
92
#define RBT_IS_BLACK(T) ((Ulong) ALC_TEST1(RBT_OP(6), (T)))
93
#define RBT_IS_TREE(T) ((Ulong) ALC_TEST1(RBT_OP(7), (T)))
94
#define IS_AOFF(A) ((Ulong) ALC_TEST1(RBT_OP(8), (A)))
95
#define RBT_MAX_SZ(T) ((Ulong) ALC_TEST1(RBT_OP(9), (T)))
95
97
/* From erl_mseg.c */
96
98
#define HAVE_MSEG() ((int) ALC_TEST0(0x400))