[pypy-svn] r68742 - pypy/branch/gc-dump-heap/pypy/translator/c/test

[fijal at codespeak.net]

Author: fijal
Date: Mon Oct 26 10:09:28 2009
New Revision: 68742

Modified:
   pypy/branch/gc-dump-heap/pypy/translator/c/test/test_newgc.py
Log:
Write a test that works on C backend (also only for semispace gc so far)


Modified: pypy/branch/gc-dump-heap/pypy/translator/c/test/test_newgc.py
==============================================================================
--- pypy/branch/gc-dump-heap/pypy/translator/c/test/test_newgc.py	(original)
+++ pypy/branch/gc-dump-heap/pypy/translator/c/test/test_newgc.py	Mon Oct 26 10:09:28 2009
@@ -899,7 +899,39 @@
     def test_gc_set_max_heap_size(self):
         res = self.run('gc_set_max_heap_size')
         assert res == 2
+
+    def define_gc_dump_heap(cls):
+        S = lltype.GcStruct('S', ('x', lltype.Signed))
+        l = []
         
+        def f():
+            fd = os.open("/tmp/x.log", os.O_WRONLY | os.O_CREAT, 0777)
+            for i in range(10):
+                l.append(lltype.malloc(S))
+            rgc.dump_heap(fd)
+            os.close(fd)
+            tb = rgc._dump_heap()
+            a = 0
+            nr = 0
+            b = 0
+            c = 0
+            for i in range(len(tb)):
+                if tb[i].count == 10:
+                    a += 1
+                    nr = i
+            for i in range(len(tb)):
+                if tb[i].count == 1:
+                    b += 1
+                    c += tb[i].links[nr]
+            # we don't count b here since there can be more singletons,
+            # important one is c, a is for check
+            return c * 10 + a
+        return f
+
+    def test_gc_dump_heap(self):
+        res = self.run("gc_dump_heap")
+        assert res == 101
+
     def definestr_string_builder(cls):
         def fn(_):
             s = StringBuilder()