summaryrefslogtreecommitdiff
path: root/boehm-gc/tests/middle.c
blob: 5d9360af521dfe1839667dc8c6dc748dec39b090 (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 ()
{
        int i;

        GC_all_interior_pointers = 0;

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