#  _____         _
  # |_   _|__  ___| |_
  #   | |/ _ \/ __| __|
  #   | |  __/\__ \ |
  #   |_|\___||___/\__|
  #
  # for lib/facets/openobject.rb
  #
  # Extracted Mon Sep 03 16:23:07 -0700 2007
  # w/ Test Extraction Ratchet
  #

 require 'facets/openobject.rb'



  require 'test/unit'

  class TestOpenObject1 < Test::Unit::TestCase

    def test_1_01
      o = OpenObject.new
      assert( o.respond_to?(:key?) )
    end

    def test_1_02
      assert_instance_of( OpenObject, OpenObject[{}] )
    end

    def test_1_03
      f0 = OpenObject.new
      f0[:a] = 1
      #assert_equal( [1], f0.to_a )
      assert_equal( {:a=>1}, f0.to_h )
    end

    def test_1_04
      f0 = OpenObject[:a=>1]
      f0[:b] = 2
      assert_equal( {:a=>1,:b=>2}, f0.to_h )
    end

    def test_1_05
      f0 = OpenObject[:class=>1]
      assert_equal( 1, f0.class )
    end
  end

  class TestOpenObject2 < Test::Unit::TestCase

    def test_2_01
      f0 = OpenObject[:f0=>"f0"]
      h0 = { :h0=>"h0" }
      assert_equal( OpenObject[:f0=>"f0", :h0=>"h0"], f0.send(:merge,h0) )
      assert_equal( {:f0=>"f0", :h0=>"h0"}, h0.merge( f0 ) )
    end

    def test_2_02
      f1 = OpenObject[:f1=>"f1"]
      h1 = { :h1=>"h1" }
      f1.send(:update,h1)
      h1.update( f1 )
      assert_equal( OpenObject[:f1=>"f1", :h1=>"h1"], f1 )
      assert_equal( {:f1=>"f1", :h1=>"h1"}, h1 )
    end

    def test_2_03
      o = OpenObject[:a=>1,:b=>{:x=>9}]
      assert_equal( 9, o[:b][:x] )
      assert_equal( 9, o.b[:x] )
    end

    def test_2_04
      o = OpenObject["a"=>1,"b"=>{:x=>9}]
      assert_equal( 1, o["a"] )
      assert_equal( 1, o[:a] )
      assert_equal( {:x=>9}, o["b"] )
      assert_equal( {:x=>9}, o[:b] )
      assert_equal( 9, o["b"][:x] )
      assert_equal( nil, o[:b]["x"] )
    end

  end

  class TestOpenObject3 < Test::Unit::TestCase
    def test_3_01
      fo = OpenObject.new
      9.times{ |i| fo.send( "n#{i}=", 1 ) }
      9.times{ |i|
        assert_equal( 1, fo.send( "n#{i}" ) )
      }
    end
  end

  class TestOpenObject4 < Test::Unit::TestCase

    def test_4_01
      ho = {}
      fo = OpenObject.new
      5.times{ |i| ho["n#{i}".to_sym]=1 }
      5.times{ |i| fo.send( "n#{i}=", 1 ) }
      assert_equal(ho, fo.to_h)
    end

  end

  class TestOpenObject5 < Test::Unit::TestCase

    def test_5_01
      p = lambda { |x|
        x.word = "Hello"
      }
      o = p.to_openobject
      assert_equal( "Hello", o.word )
    end

    def test_5_02
      p = lambda { |x|
        x.word = "Hello"
      }
      o = OpenObject[:a=>1,:b=>2]
      assert_instance_of( Proc, o.to_proc )
    end

  end