Contents

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

 require 'facets/kernel/metaid.rb'



  require 'test/unit'

  class TCKernel < Test::Unit::TestCase

    def test_metaclass
      o = Object.new
      assert_equal( (class << o; self; end), o.metaclass )
    end

   def test_meta_class
      o = Object.new
      assert_equal( (class << o; self; end), o.meta_class )
    end

    def test_singleton
      o = Object.new
      assert_equal( (class << o; self; end), o.singleton )
    end

    #def test_singleton_eval
    #  assert_nothing_raised do
    #    o.singleton_class_eval{ @@a = "test" }
    #  end
    #end

    #def test_singleton_method
    #  assert_nothing_raised do
    #    o.define_singleton_method(:testing){ |x| x + 1 }
    #  end
    #  assert_equal(2, o.testing(1) )
    #end

    def test_singleton_Class
      o = Object.new
      assert_equal( (class << o; self; end), o.singleton_class )
    end

    def test_qua_class
      o = Object.new
      assert_equal( (class << o; self; end), o.qua_class )
    end

  end

Version data entries

10 entries across 10 versions & 1 rubygems

Version	Path
facets-2.0.1	test/unit/kernel/test_metaid.rb
facets-2.0.0	test/unit/kernel/test_metaid.rb
facets-2.0.2	test/unit/kernel/test_metaid.rb
facets-2.0.4	test/unit/kernel/test_metaid.rb
facets-2.1.0	test/unit/kernel/test_metaid.rb
facets-2.1.1	test/unit/kernel/test_metaid.rb
facets-2.1.2	test/unit/kernel/test_metaid.rb
facets-2.0.5	test/unit/kernel/test_metaid.rb
facets-2.0.3	test/unit/kernel/test_metaid.rb
facets-2.1.3	test/unit/kernel/test_metaid.rb