From 087e0fc1a499647d83cc57bc73b232cb547cb2ec Mon Sep 17 00:00:00 2001
From: Laurent Sansonetti <lrz@hipbyte.com>
Date: Tue, 16 Jul 2013 14:53:09 +0200
Subject: [PATCH] add cycle tests

---
 test/test/spec/cycle_spec.rb | 70 ++++++++++++++++++++++++++++++++++++
 1 file changed, 70 insertions(+)
 create mode 100644 test/test/spec/cycle_spec.rb

diff --git a/test/test/spec/cycle_spec.rb b/test/test/spec/cycle_spec.rb
new file mode 100644
index 00000000..a57787e7
--- /dev/null
+++ b/test/test/spec/cycle_spec.rb
@@ -0,0 +1,70 @@
+describe "cycles" do
+  class TestObjectCycle
+    def test_block_retain
+      test_block_assign { 42 }
+    end
+    def test_block_assign(&b)
+      @b = b
+    end
+    def test_array_retain
+      @a = []
+      @a << self
+    end
+    def test_hash_retain
+      @h = {}
+      @h[42] = self
+    end
+    def dealloc
+      $test_dealloc = true
+      super
+    end
+  end
+  it "created by Proc->self are solved" do
+    $test_dealloc = false
+    autorelease_pool { TestObjectCycle.new.test_block_retain }
+    $test_dealloc.should == true
+  end
+
+  it "created by Array are solved" do
+    $test_dealloc = false
+    autorelease_pool { TestObjectCycle.new.test_array_retain }
+    $test_dealloc.should == true
+  end
+
+  it "created by Hash are solved" do
+    $test_dealloc = false
+    autorelease_pool { TestObjectCycle.new.test_hash_retain }
+    $test_dealloc.should == true
+  end
+
+  it "created by Hash->ifnone are solved" do
+    $test_dealloc = false
+    autorelease_pool do
+      h = Hash.new { |h, k| h[k] = [] }
+      h['1'] << TestObjectCycle.new
+    end
+    $test_dealloc.should == true
+  end
+
+  class TestObjectCircle
+    attr_accessor :ref
+    def dealloc
+      $test_dealloc[object_id] = true
+      super
+    end
+  end
+  it "created by 2 objects are solved" do
+    $test_dealloc = {}
+    obj1id = obj2id = nil
+    autorelease_pool do
+      obj1 = TestObjectCircle.new
+      obj2 = TestObjectCircle.new
+      obj1id = obj1.object_id
+      obj2id = obj2.object_id
+      obj1.ref = obj2
+      obj2.ref = obj1
+    end
+    $test_dealloc[obj1id].should == true
+    $test_dealloc[obj2id].should == true
+  end
+end