class ObjectSpecDup
  def initialize()
    @obj = :original
  end

  attr_accessor :obj
end

class ObjectSpecDupInitCopy
  def initialize()
    @obj = :original
  end

  attr_accessor :obj, :original

  def initialize_copy(original)
    @obj = :init_copy
    @original = original
  end

  private :initialize_copy
end

describe :kernel_dup_clone, shared: true do
  it "returns a new object duplicated from the original" do
    o = ObjectSpecDup.new
    o2 = ObjectSpecDup.new

    o.obj = 10

    o3 = o.send(@method)

    o3.obj.should == 10
    o2.obj.should == :original
  end

  it "produces a shallow copy, contained objects are not recursively dupped" do
    o = ObjectSpecDup.new
    array = [1, 2]
    o.obj = array

    o2 = o.send(@method)
    o2.obj.should.equal?(o.obj)
  end

  it "calls #initialize_copy on the NEW object if available, passing in original object" do
    o = ObjectSpecDupInitCopy.new
    o2 = o.send(@method)

    o.obj.should == :original
    o2.obj.should == :init_copy
    o2.original.should.equal?(o)
  end

  it "does not preserve the object_id" do
    o1 = ObjectSpecDupInitCopy.new
    old_object_id = o1.object_id
    o2 = o1.send(@method)
    o2.object_id.should_not == old_object_id
  end

  it "returns nil for NilClass" do
    nil.send(@method).should == nil
  end

  it "returns true for TrueClass" do
    true.send(@method).should == true
  end

  it "returns false for FalseClass" do
    false.send(@method).should == false
  end

  it "returns the same Integer for Integer" do
    1.send(@method).should == 1
  end

  it "returns the same Symbol for Symbol" do
    :my_symbol.send(@method).should == :my_symbol
  end

  it "returns self for Complex" do
    c = Complex(1.3, 3.1)
    c.send(@method).should.equal? c
  end

  it "returns self for Rational" do
    r = Rational(1, 3)
    r.send(@method).should.equal? r
  end
end
