1 #include <ccan/tal/tal.h>
2 #include <ccan/tal/tal.c>
3 #include <ccan/tap/tap.h>
6 #define ALIGN (sizeof(void *)*2)
8 static void *my_alloc(size_t len)
10 char *ret = malloc(len + ALIGN);
11 memcpy(ret, &len, sizeof(len));
15 static void my_free(void *p)
18 free((char *)p - ALIGN);
21 static void *my_realloc(void *old, size_t new_size)
25 /* Test what happens if we always move */
27 size_t old_size = *(size_t *)((char *)old - ALIGN);
28 ret = my_alloc(new_size);
29 memcpy(ret, old, old_size > new_size ? new_size : old_size);
32 ret = realloc((char *)old - ALIGN, new_size + ALIGN);
33 memcpy(ret, &new_size, sizeof(new_size));
44 tal_set_backend(my_alloc, my_realloc, my_free, NULL);
46 plan_tests(2 + 19 * 3);
49 ok1(tal_len(p1) == 0);
50 ok1(tal_count(p1) == 0);
52 for (i = 0; i < 3; i++) {
57 ok1(tal_count(p1) == 0);
59 p2 = tal_arr(p1, char, 1);
61 ok1(tal_count(p2) == 1);
62 ok1(tal_resize(&p2, 2));
63 ok1(tal_count(p2) == 2);
64 ok1(tal_check(NULL, NULL));
68 p2 = tal_arrz(p1, char, 7);
70 ok1(tal_count(p2) == 7);
71 ok1(tal_check(NULL, NULL));
74 ok1(tal_check(NULL, NULL));
75 ok1(tal_count(p2) == 20);
76 /* Tickles non-moving logic, as we do not update bounds. */
81 ok1(tal_check(NULL, NULL));
82 ok1(tal_count(p2) == 300);
83 ok1(tal_resize(&p2, 0));
84 ok1(tal_count(p2) == 0);
85 ok1(tal_check(NULL, NULL));