tests/staticrootslib.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33


/* This test file is intended to be compiled into a DLL. */

#include <stdio.h>

#ifndef GC_DEBUG
# define GC_DEBUG
#endif

#include "gc.h"

struct treenode {
    struct treenode *x;
    struct treenode *y;
} * root[10];

struct treenode * libsrl_mktree(int i)
{
  struct treenode * r = GC_MALLOC(sizeof(struct treenode));
  if (0 == i) return 0;
  if (1 == i) r = GC_MALLOC_ATOMIC(sizeof(struct treenode));
  if (r) {
    r -> x = libsrl_mktree(i-1);
    r -> y = libsrl_mktree(i-1);
  }
  return r;
}

void * libsrl_init(void)
{
  GC_INIT();
  return GC_MALLOC(sizeof(struct treenode));
}