From 4ee9816a7888f8f125752d75f8528c39c94d732b Mon Sep 17 00:00:00 2001
From: Araq <rumpf_a@web.de>
Date: Thu, 7 Feb 2013 16:09:46 +0100
Subject: code cleanup for mark&sweep GC

---
 tests/gc/gcleak.nim | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'tests/gc/gcleak.nim')

diff --git a/tests/gc/gcleak.nim b/tests/gc/gcleak.nim
index c40c6b3b5..4e47db609 100755
--- a/tests/gc/gcleak.nim
+++ b/tests/gc/gcleak.nim
@@ -12,7 +12,9 @@ type
 proc MakeObj(): TTestObj =
   result.x = "Hello"
 
-for i in 1 .. 100_000_000:
+for i in 1 .. 1_000_000:
+  when defined(gcMarkAndSweep):
+    GC_fullcollect()
   var obj = MakeObj()
   if getOccupiedMem() > 300_000: quit("still a leak!")
 #  echo GC_getstatistics()
-- 
cgit 1.4.1-2-gfad0