OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [boehm-gc/] [testsuite/] [boehm-gc.c/] [middle.c] - Rev 721

Compare with Previous | Blame | View Log

/*
 * 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;
}
 
 

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.