aboutsummaryrefslogtreecommitdiff
path: root/boehm-gc/tests
diff options
context:
space:
mode:
authorBryce McKinlay <bryce@gcc.gnu.org>2004-08-12 22:14:23 +0100
committerBryce McKinlay <bryce@gcc.gnu.org>2004-08-12 22:14:23 +0100
commit5c4dc10837d7f66311a5da622e054ea168483a5c (patch)
tree22c381bc68a21b73cb62dd6a0157a354fcb699a7 /boehm-gc/tests
parent47bedfb079ef53e4d072174d704f99dc96e6404d (diff)
downloadgcc-5c4dc10837d7f66311a5da622e054ea168483a5c.zip
gcc-5c4dc10837d7f66311a5da622e054ea168483a5c.tar.gz
gcc-5c4dc10837d7f66311a5da622e054ea168483a5c.tar.bz2
Initial revision
From-SVN: r85897
Diffstat (limited to 'boehm-gc/tests')
-rw-r--r--boehm-gc/tests/middle.c25
1 files changed, 25 insertions, 0 deletions
diff --git a/boehm-gc/tests/middle.c b/boehm-gc/tests/middle.c
new file mode 100644
index 0000000..5d9360a
--- /dev/null
+++ b/boehm-gc/tests/middle.c
@@ -0,0 +1,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;
+}
+