OSDN Git Service

PR boehm-gc/11412
[pf3gnuchains/gcc-fork.git] / boehm-gc / testsuite / boehm-gc.c / middle.c
1 /*
2  * Test at the boundary between small and large objects.
3  * Inspired by a test case from Zoltan Varga.
4  */
5 #include <gc.h>
6 #include <stdio.h>
7
8 int main ()
9 {
10         int i;
11
12         GC_all_interior_pointers = 0;
13
14         for (i = 0; i < 20000; ++i) {
15                 GC_malloc_atomic (4096);
16                 GC_malloc (4096);
17         }
18         for (i = 0; i < 20000; ++i) {
19                 GC_malloc_atomic (2048);
20                 GC_malloc (2048);
21         }
22         printf("Final heap size is %ld\n", GC_get_heap_size());
23         return 0;
24 }
25