aboutsummaryrefslogtreecommitdiff
path: root/boehm-gc/tests/middle.c
blob: 55686f759ccc334194fafd9484a96eb16a885274 (plain)
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
/*
 * Test at the boundary between small and large objects.
 * Inspired by a test case from Zoltan Varga.
 */
#include "gc.h"
#include <stdio.h>

int main (void)
{
  int i;

  GC_set_all_interior_pointers(0);
  GC_INIT();

  for (i = 0; i < 20000; ++i) {
    (void)GC_malloc_atomic(4096);
    (void)GC_malloc(4096);
  }
  for (i = 0; i < 20000; ++i) {
    (void)GC_malloc_atomic(2048);
    (void)GC_malloc(2048);
  }
  printf("Final heap size is %lu\n", (unsigned long)GC_get_heap_size());
  return 0;
}