object2module 0.3.0-i386-mingw32 → 0.4.0-i386-mingw32

data/Rakefile

@@ -1,10 +1,12 @@
- # Rakefile added by John Mair (banisterfiend)
+# Rakefile added by John Mair (banisterfiend)
 
 require 'rake/gempackagetask'
+require 'rake/rdoctask'
 require 'rake/clean'
-require 'lib/object2module/version.rb'
+require './lib/object2module/version.rb'
 
 dlext = Config::CONFIG['DLEXT']
+direc = File.dirname(__FILE__)
 
 CLEAN.include("ext/**/*.#{dlext}", "ext/**/.log", "ext/**/.o", "ext/**/*~", "ext/**/*#*", "ext/**/.obj", "ext/**/.def", "ext/**/.pdb")
 CLOBBER.include("**/*.#{dlext}", "**/*~", "**/*#*", "**/*.log", "**/*.o", "doc/**")
@@ -24,30 +26,48 @@ def apply_spec_defaults(s)
 end
 
 
-# common tasks
-task :compile => :clean
-
-spec = Gem::Specification.new do |s|
-  apply_spec_defaults(s)        
-  s.platform = 'i386-mingw32'
-  s.files = ["Rakefile", "README", "LICENSE",
-  "lib/object2module.rb", "lib/1.8/object2module.#{dlext}",
-  "lib/1.9/object2module.#{dlext}", "lib/object2module/version.rb", "test/test_object2module.rb"] 
+task :test do
+  sh "bacon -k #{direc}/test/test.rb"
 end
 
+[:mingw32, :mswin32].each do |v|
+  task v do
+    spec = Gem::Specification.new do |s|
+      apply_spec_defaults(s)        
+      s.platform = "i386-#{v}"
+      s.files = FileList["Rakefile", "README", "LICENSE",
+                         "lib/object2module.rb", "lib/1.8/object2module.#{dlext}",
+                         "lib/1.9/object2module.#{dlext}", "lib/object2module/version.rb", "test/*.rb"].to_a
+    end
+
+    Rake::GemPackageTask.new(spec) do |pkg|
+      pkg.need_zip = false
+      pkg.need_tar = false
+    end
 
+    Rake::Task[:gem].invoke
+  end
+end
 
+task :ruby do
+  spec = Gem::Specification.new do |s|
+    apply_spec_defaults(s)        
+    s.platform = Gem::Platform::RUBY
+    s.files = FileList["Rakefile", "README", "LICENSE",
+                       "lib/object2module.rb","lib/object2module/version.rb",
+                       "test/*.rb", "ext/**/extconf.rb", "ext/**/*.h", "ext/**/*.c"].to_a
+    s.extensions = ["ext/object2module/extconf.rb"]
+  end
 
+  Rake::GemPackageTask.new(spec) do |pkg|
+    pkg.need_zip = false
+    pkg.need_tar = false
+  end
 
-# spec = Gem::Specification.new do |s|
-#   apply_spec_defaults(s)
-#   s.platform = Gem::Platform::RUBY
-#   s.extensions = FileList["ext/**/extconf.rb"]
-#   s.files = ["Rakefile", "README", "LICENSE", "lib/object2module.rb", "lib/object2module/version.rb", "test/test_object2module.rb"] +
-#     FileList["ext/**/extconf.rb", "ext/**/*.h", "ext/**/*.c"].to_a
-# end
+  Rake::Task[:gem].invoke
+end
 
-Rake::GemPackageTask.new(spec) do |pkg|
-  pkg.need_zip = false
-  pkg.need_tar = false
+Rake::RDocTask.new do |rd|
+  rd.main = "README.rdoc"
+  rd.rdoc_files.include("README.rdoc", "lib/object2module.rb")
 end

data/lib/object2module/version.rb

@@ -1,3 +1,3 @@
 module Object2module
-  VERSION = "0.3.0"
+  VERSION = "0.4.0"
 end

data/lib/object2module.rb

@@ -15,79 +15,75 @@ rescue LoadError => e
     require "#{direc}/object2module.#{dlext}"
 end
 
+module Kernel
 
-# call-seq:
-#    obj.gen_extend(other, ...)    => obj
+  # define a `singleton_class` method for the 1.8 kids
+  # @return [Class] The singleton class of the receiver
+  def singleton_class
+    class << self; self; end
+  end if !respond_to?(:singleton_class)
+end
 
-# Adds to _obj_ the instance methods from each object given as a
-# parameter.
-   
-#    class C
-#      def hello
-#        "Hello from C.\n"
-#      end
-#    end
-   
-#    class Klass
-#      def hello
-#        "Hello from Klass.\n"
-#      end
-#    end
-   
-#    k = Klass.new
-#    k.hello         #=> "Hello from Klass.\n"
-#    k.gen_extend(C)   #=> #<Klass:0x401b3bc8>
-#    k.hello         #=> "Hello from C.\n"
 class Object
-  def gen_extend(*objs)
-    raise ArgumentError, "wrong number of arguments (0 for 1)" if objs.empty?
+  def __gen_extend_or_include__(extend_or_include, *objs)  #:nodoc:
+    raise ArgumentError, "wrong number of arguments (at least 1)" if objs.empty?
 
-    objs.each { |o|
-      begin
-        mod = o.__to_module__
-        extend(mod)
-      ensure
-        mod.__reset_tbls__ if mod != o &&o != Object && o != Class && o != Module
-      end
+    objs.each { |mod|
+        send(extend_or_include, mod)
     }
 
     self
   end
-end
 
+  # Adds to the singleton class of receiver the instance methods from each object given as a
+  # parameter.
+  # 
+  # @param [Array] objs The array of objects to `gen_extend`
+  # @return [Object] The receiver
+  # @example  
+  #    class C
+  #      def hello
+  #        "Hello from C.\n"
+  #      end
+  #    end
+  #   
+  #    class Klass
+  #      def hello
+  #        "Hello from Klass.\n"
+  #      end
+  #    end
+  #   
+  #    k = Klass.new
+  #    k.hello         #=> "Hello from Klass.\n"
+  #    k.gen_extend(C)   #=> #<Klass:0x401b3bc8>
+  #    k.hello         #=> "Hello from C.\n"
+  def gen_extend(*objs)
+    singleton_class.__gen_extend_or_include__(:gen_include_one, *objs)
+  end
+end
 
-# call-seq:
-#    gen_include(other, ...)    => self
-
-# Adds to the implied receiver the instance methods from each object given as a
-# parameter.
-   
-#    class C
-#      def hello
-#        "Hello from C.\n"
-#      end
-#    end
-   
-#    class Klass
-#      gen_include(C)
-#    end
-   
-#    k = Klass.new
-#    k.hello         #=> "Hello from C.\n"
 class Module
+  
+  # Adds to the implied receiver the instance methods from each object given as a
+  # parameter.
+  # 
+  # @param [Array] objs The array of objects to `gen_include`
+  # @return [Object] The receiver
+  # @example  
+  #    class C
+  #      def hello
+  #        "Hello from C.\n"
+  #      end
+  #    end
+  #   
+  #    class Klass
+  #      gen_include(C)
+  #    end
+  #   
+  #    k = Klass.new
+  #    k.hello         #=> "Hello from C.\n"
   def gen_include(*objs)
-    raise ArgumentError, "wrong number of arguments (0 for 1)" if objs.empty?
-    
-    objs.each { |o|
-      begin
-        mod = o.__to_module__
-        include(mod)
-      ensure
-        mod.__reset_tbls__ if mod != o && o != Object && o != Class && o != Module
-      end
-    }
-
-    self
+    __gen_extend_or_include__(:gen_include_one, *objs)
   end
 end
 

data/test/test.rb

@@ -0,0 +1,165 @@
+direc = File.dirname(__FILE__)
+require 'rubygems'
+require 'bacon'
+require "#{direc}/../lib/object2module"
+
+
+class Module
+  public :include, :remove_const
+end
+
+describe Object2module do
+  before do
+    class A
+      def a
+        :a
+      end
+    end
+
+    class B
+      def b
+        :b
+      end
+    end
+
+    module M
+      def m
+        :m
+      end
+    end
+
+    O = Object.new
+    class << O
+      def o
+        :o
+      end
+    end
+
+    C = Class.new
+  end
+
+  after do
+    Object.remove_const(:A)
+    Object.remove_const(:B)
+    Object.remove_const(:C)
+    Object.remove_const(:M)
+    Object.remove_const(:O)
+  end
+
+  describe 'gen_include' do
+    it 'includes a module' do
+      C.gen_include M
+      C.new.m.should == :m
+    end
+
+    it 'includes a class' do
+      C.gen_include A
+      C.new.a.should == :a
+    end
+
+    it 'includes an object' do
+      C.gen_include O
+      C.new.o.should == :o
+    end
+
+    it 'includes a class that includes a class' do
+      A.gen_include B
+      C.gen_include A
+      C.new.b.should == :b
+      C.new.a.should == :a
+    end
+
+    it 'includes an object that includes a class that includes a class' do
+      A.gen_include B
+      O.gen_extend A
+      C.gen_include O
+      C.new.o.should == :o
+      C.new.a.should == :a
+      C.new.b.should == :b
+    end
+
+    it 'includes an object that includes an object' do
+      n = Object.new
+      class << n
+        def n
+          :n
+        end
+      end
+
+      l = Object.new
+      class << l
+        def l
+          :l
+        end
+        self
+      end.gen_include n
+
+      C.gen_include l
+      C.new.l.should == :l
+      C.new.n.should == :n
+    end
+  end
+
+  describe 'gen_extend' do
+    it 'extends a module' do
+      O.gen_extend M
+      O.m.should == :m
+    end
+
+    it 'extends a class' do
+      O.gen_extend A
+      O.a.should == :a
+    end
+
+    it 'extends an object' do
+      n = Object.new
+      class << n
+        def n
+          :n
+        end
+      end
+      O.gen_extend n
+      O.n.should == :n
+    end
+
+    it 'extends a class that includes a class' do
+      A.gen_include B
+      O.gen_extend A
+      O.b.should == :b
+      O.a.should == :a
+    end
+
+    it 'extends an object that includes a class that includes a class' do
+      A.gen_include B
+      C.gen_include A
+      O.gen_extend C
+      O.o.should == :o
+      O.a.should == :a
+      O.b.should == :b
+    end
+
+    it 'extends an object that extends an object' do
+      n = Object.new
+      class << n
+        def n
+          :n
+        end
+      end
+
+      l = Object.new
+      class << l
+        def l
+          :l
+        end
+        self
+      end
+
+      l.gen_extend n
+
+      O.gen_extend l
+      O.l.should == :l
+      O.n.should == :n
+    end    
+  end
+end
+      

data/test/test_stress.rb

@@ -0,0 +1,6 @@
+require '../lib/object2module'
+
+80_000.times {
+  Object.new.gen_extend Object.new, Module.new, Class.new
+  Class.new.gen_include Object.new, Module.new, Class.new
+}

metadata

@@ -1,13 +1,12 @@
 --- !ruby/object:Gem::Specification 
 name: object2module
 version: !ruby/object:Gem::Version 
-  hash: 19
   prerelease: false
   segments: 
   - 0
-  - 3
+  - 4
   - 0
-  version: 0.3.0
+  version: 0.4.0
 platform: i386-mingw32
 authors: 
 - John Mair (banisterfiend)
@@ -15,7 +14,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-07-29 00:00:00 +12:00
+date: 2010-10-31 00:00:00 +13:00
 default_executable: 
 dependencies: []
 
@@ -35,7 +34,8 @@ files:
 - lib/1.8/object2module.so
 - lib/1.9/object2module.so
 - lib/object2module/version.rb
-- test/test_object2module.rb
+- test/test.rb
+- test/test_stress.rb
 has_rdoc: true
 homepage: http://banisterfiend.wordpress.com
 licenses: []
@@ -50,7 +50,6 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
-      hash: 3
       segments: 
       - 0
       version: "0"
@@ -59,7 +58,6 @@ required_rubygems_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
-      hash: 3
       segments: 
       - 0
       version: "0"

data/test/test_object2module.rb

@@ -1,147 +0,0 @@
-direc = File.dirname(__FILE__)
-
-require 'test/unit'
-require "#{direc}/../lib/object2module"
-
-module M
-    def m
-        "m"
-    end
-end
-
-class A
-    include M
-
-    def a
-        "a"
-    end
-end
-
-class B < A
-    def b
-        "b"
-    end
-end
-
-class C < B
-    def c
-        "c"
-    end
-end
-
-# stand-alone class
-class K
-    def k
-        "k"
-    end
-end
-
-# another stand-alone class
-class J
-    def j
-        "j"
-    end
-end
-
-class Object2ModuleTest < Test::Unit::TestCase
-    def test_class_to_module
-        assert_instance_of(Module, C.__to_module__)    
-    end
-
-    def test_class_heirarchy
-        c = C.__to_module__
-        
-        h = c.ancestors
-        assert_equal(B, h[1])
-        assert_equal(A, h[2])
-        assert_equal(M, h[3])
-    end
-
-    def test_class_extend
-        o = Object.new
-        assert_equal(o, o.gen_extend(C))
-    end
-
-    def test_class_extended_methods
-        h = C.__to_module__
-        o = Object.new
-        o.extend(h)
-        assert_equal("a", o.a)
-        assert_equal("b", o.b)
-        assert_equal("c", o.c)
-        assert_equal("m", o.m)
-    end                                                       
-
-    def test_object_to_module
-        o = C.new
-        assert_instance_of(Module, o.__to_module__)    
-    end
-
-    def test_object_heirarchy                                  
-        o = C.new
-        h = o.__to_module__.ancestors                           
-        assert_equal(C, h[1])                                   
-        assert_equal(B, h[2])                                   
-        assert_equal(A, h[3])                                   
-        assert_equal(M, h[4])                                  
-    end                                                       
-    
-    def test_object_extend                                           
-        h = C.__to_module__                                     
-        o = Object.new                                          
-        assert_equal(o, o.extend(h))                            
-    end                                                       
-    
-    def test_object_extended_methods                                 
-        o = C.new
-        h = o.__to_module__                                     
-        l = Object.new                                          
-        l.extend(h)                                             
-        assert_equal("a", l.a)                                        
-        assert_equal("b", l.b)                                        
-        assert_equal("c", l.c)                                        
-        assert_equal("m", l.m)                                        
-    end    
-    
-    def test_gen_extend
-        o = Object.new
-        o.gen_extend(C)
-        assert_equal("a", o.a)                                        
-        assert_equal("b", o.b)                                        
-        assert_equal("c", o.c)                                        
-        assert_equal("m", o.m)  
-    end
-
-    def test_gen_include
-        k = Class.new
-        k.gen_include(C)
-        o = k.new
-        assert_equal("a", o.a)                                        
-        assert_equal("b", o.b)                                        
-        assert_equal("c", o.c)                                        
-        assert_equal("m", o.m)  
-    end
-
-    def test_gen_extend_multi
-        o = Object.new
-        o.gen_extend(C, K, J)
-        assert_equal("a", o.a)                                        
-        assert_equal("b", o.b)                                        
-        assert_equal("c", o.c)                                        
-        assert_equal("m", o.m)
-        assert_equal("k", o.k)
-        assert_equal("j", o.j)
-    end
-
-    def test_gen_include_multi
-        k = Class.new
-        k.gen_include(C, K, J)
-        o = k.new
-        assert_equal("a", o.a)                                        
-        assert_equal("b", o.b)                                        
-        assert_equal("c", o.c)                                        
-        assert_equal("m", o.m)
-        assert_equal("k", o.k)
-        assert_equal("j", o.j)
-    end
-end