Merge branch 'pr-65-unclonable-content'

Author: evolve75

lib/tree.rb

@@ -229,7 +229,13 @@ def initialize(name, content = nil)
     #
     # @return [Tree::TreeNode] A copy of this node.
     def detached_copy
-      self.class.new(@name, @content ? @content.clone : nil)
+      cloned_content =
+        begin
+          @content && @content.clone
+        rescue TypeError
+          @content
+        end
+      self.class.new(@name, cloned_content)
     end
 
     # Returns a copy of entire (sub-)tree from this node.

spec/tree_spec.rb

@@ -115,4 +115,62 @@ class SpecializedTreeNode < Tree::TreeNode; end
       expect(Marshal.load(serialized_node2)).to be_a(Tree::TreeNode)
     end
   end
+
+  shared_examples_for "any cloned node" do
+    it "is equal to the original" do
+      expect(@clone).to eq @tree
+    end
+    it "is not identical to the original" do
+      expect(clone).not_to be @tree
+    end
+  end
+
+  context "#detached_copy", "without content" do
+    before(:each) do
+      @tree = Tree::TreeNode.new("A", nil)
+      @clone = @tree.detached_copy
+    end
+
+    it_behaves_like "any cloned node"
+  end
+
+  context "#detached_copy", "with clonable content" do
+    before(:each) do
+      @tree = Tree::TreeNode.new("A", "clonable content")
+      @clone = @tree.detached_copy
+    end
+
+    it "makes a clone of the content" do
+      expect(@clone.content).to eq @tree.content
+      expect(@clone.content).not_to be @tree.content
+    end
+
+    it_behaves_like "any cloned node"
+  end
+
+  context "#detached_copy", "with unclonable content" do
+    before(:each) do
+      @tree = Tree::TreeNode.new("A", :unclonable_content)
+      @clone = @tree.detached_copy
+    end
+
+    it "keeps the content" do
+      expect(@clone.content).to be @tree.content
+    end
+
+    it_behaves_like "any cloned node"
+  end
+
+  context "#detached_copy", "with false as content" do
+    before(:each) do
+      @tree = Tree::TreeNode.new("A", false)
+      @clone = @tree.detached_copy
+    end
+
+    it "keeps the content" do
+      expect(@clone.content).to be @tree.content
+    end
+
+    it_behaves_like "any cloned node"
+  end
 end