1 #include <ccan/tal/tal.h>
2 #include <ccan/tal/tal.c>
3 #include <ccan/tap/tap.h>
7 char *parent, *c[4], *p;
12 parent = tal(NULL, char);
15 for (i = 0; i < 4; i++)
16 c[i] = tal(parent, char);
18 for (i = 0; i < 4; i++)
19 ok1(tal_parent(c[i]) == parent);
23 for (p = tal_first(parent); p; p = tal_next(parent, p)) {
36 parent = tal(NULL, char);
38 /* Test freeing in every order */
39 for (i = 0; i < 4; i++) {
40 for (j = 0; j < 4; j++)
41 c[j] = tal(parent, char);
44 debug_tal(to_tal_hdr(parent));
45 tal_free(c[(i+1) % 4]);
46 debug_tal(to_tal_hdr(parent));
47 tal_free(c[(i+2) % 4]);
48 debug_tal(to_tal_hdr(parent));
49 tal_free(c[(i+3) % 4]);
50 debug_tal(to_tal_hdr(parent));