multimethod 0.0.1

data/test/parameter_test.rb

@@ -0,0 +1,31 @@
+require 'test_base'
+
+module Multimethod
+
+  class ParameterTest < TestBase
+
+    class A < Object; end
+    class B < A; end
+    class C < Object; end
+    class D < B; end
+
+    def setup
+      super
+    end
+    
+    def test_score
+      pA = Parameter.new(:a, A)
+      assert_equal 0,   pA.score(A)
+      assert_equal 1,   pA.score(B)
+      assert_equal nil, pA.score(C)
+      assert_equal 2,   pA.score(D)
+
+      pB = Parameter.new(:b, B)
+      assert_equal nil, pB.score(A)
+      assert_equal 0,   pB.score(B)
+      assert_equal nil, pB.score(C)
+      assert_equal 1,   pB.score(D)
+    end
+  end # class
+  
+end # module

data/test/test_base.rb

@@ -0,0 +1,25 @@
+require 'test/unit'
+require 'multimethod'
+
+module Multimethod
+
+  class TestBase < Test::Unit::TestCase
+    def setup
+      super
+    end
+    
+    # Avoid "No test were specified" error.
+    def test_foo
+      assert true
+    end
+    
+    # Helpers.
+    def assert_equal_float(x, y, eps = 1.0e-8)
+      d = (x * eps).abs
+      assert (x - d) <= y
+      assert y <= (x + d)
+    end
+    
+  end # class
+
+end # module

data/test/usage_test.rb

@@ -0,0 +1,146 @@
+require 'test_base'
+
+
+class A < Object
+  multimethod %q{
+def foo(x)
+  x = "A#foo(x) : (#{x.class.name})"
+  x
+end
+}
+
+  multimethod %q{
+def foo(A x)
+  x = "A#foo(A x) : (#{x.class.name})"
+  x
+end
+}
+
+  multimethod %q{
+def foo(B x)
+  x = "A#foo(B x) : (#{x.class.name})"
+  x
+end
+}
+
+end
+
+class B < A
+  multimethod %q{
+def foo(B x)
+  x = "B#foo(B x) : (#{x.class.name})"
+  x
+end
+}
+
+  multimethod %q{
+def foo(Comparable x)
+  x = "B#foo(Comparable x) : (#{x.class.name})"
+  x
+end
+}
+
+
+end
+
+class C < Object
+  include Comparable
+end
+
+class D < B
+  # Variadic
+  multimethod %q{
+def bar(x)
+  x = "D#bar(x) : (#{x.class.name})"
+  x
+end
+}
+
+  multimethod %q{
+def bar(*rest)
+  x = "D#bar(*rest) : (#{rest.inspect})"
+  x
+end
+}
+
+  multimethod %q{
+def bar(x, y)
+  x = "D#bar(x, y) : (#{x.class.name}, #{y.class.name})"
+  x
+end
+}
+
+  multimethod %q{
+def bar(x, y, A a)
+  x = "D#bar(x, y, A a) : (#{x.class.name}, #{y.class.name}, #{a.class.name})"
+  x
+end
+}
+
+  multimethod %q{
+def bar(x, y, *rest)
+  x = "D#bar(x, y, *rest) : (#{x.class.name}, #{y.class.name}, #{rest.inspect})"
+  x
+end
+}
+
+end # class D
+
+class E < A
+end
+
+
+module Multimethod
+
+  class UsageTest < TestBase
+
+    def setup
+      super
+    end
+    
+    def test_call
+      a = A.new
+      b = B.new
+      c = C.new
+      d = D.new
+      e = E.new
+
+      assert_equal 'A#foo(x) : (Fixnum)' , a.foo(1)
+      assert_equal 'A#foo(A x) : (A)'    , a.foo(a)
+      assert_equal 'A#foo(B x) : (B)'    , a.foo(b)
+      assert_equal 'A#foo(x) : (C)'      , a.foo(c)
+      assert_equal 'A#foo(B x) : (D)'    , a.foo(d)
+      assert_equal 'A#foo(A x) : (E)'    , a.foo(e)
+
+      assert_equal 'A#foo(x) : (Symbol)' , b.foo(:x)
+      assert_equal 'B#foo(Comparable x) : (Fixnum)' , b.foo(1)
+      assert_equal 'A#foo(A x) : (A)'    , b.foo(a)
+      assert_equal 'B#foo(B x) : (B)'    , b.foo(b)
+      assert_equal 'B#foo(Comparable x) : (C)'      , b.foo(c)
+      assert_equal 'B#foo(B x) : (D)'    , b.foo(d)
+      assert_equal 'A#foo(A x) : (E)'    , b.foo(e)
+    end
+
+    def test_variadic
+      a = A.new
+      d = D.new
+
+      assert_equal 'D#bar(*rest) : ([])',
+        d.bar()
+
+      assert_equal 'D#bar(x) : (Fixnum)',
+        d.bar(1)
+
+      assert_equal 'D#bar(x, y) : (Fixnum, String)' ,   
+        d.bar(1, 'a')
+
+      assert_equal 'D#bar(x, y, A a) : (Fixnum, String, A)' , 
+        d.bar(1, 'a', a)
+
+      assert_equal 'D#bar(x, y, *rest) : (Fixnum, String, [3])' , 
+        d.bar(1, 'a', 3)
+    end
+
+  end # class
+  
+end # module

metadata

@@ -0,0 +1,108 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.0
+specification_version: 1
+name: multimethod
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2006-11-21 00:00:00 -05:00
+summary: "Supports Multimethod dispatching.  For more details, see:  http://multimethod.rubyforge.org/files/lib/multimethod_rb.html  http://multimethod.rubyforge.org/files/README.txt http://multimethod.rubyforge.org/"
+require_paths: 
+- lib
+- test
+email: ruby-multimethod@umleta.com
+homepage: http://rubyforge.org/projects/multimethod
+rubyforge_project: multimethod
+description: "Supports Multimethod dispatching.  For more details, see:  http://multimethod.rubyforge.org/files/lib/multimethod_rb.html  http://multimethod.rubyforge.org/files/README.txt http://multimethod.rubyforge.org/"
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Kurt Stephens
+files: 
+- ./.svn/README.txt
+- ./.svn/empty-file
+- ./.svn/entries
+- ./.svn/format
+- ./.svn/text-base/ChangeLog.svn-base
+- ./.svn/text-base/Manifest.txt.svn-base
+- ./.svn/text-base/README.txt.svn-base
+- ./.svn/text-base/Rakefile.svn-base
+- ./.svn/text-base/Releases.txt.svn-base
+- ./ChangeLog
+- ./Manifest.txt
+- ./README.txt
+- ./Rakefile
+- ./Releases.txt
+- ./examples/.svn/README.txt
+- ./examples/.svn/empty-file
+- ./examples/.svn/entries
+- ./examples/.svn/format
+- ./examples/.svn/props/ex1.rb.svn-work
+- ./examples/ex1.rb
+- ./lib/.svn/README.txt
+- ./lib/.svn/empty-file
+- ./lib/.svn/entries
+- ./lib/.svn/format
+- ./lib/.svn/text-base/multimethod.rb.svn-base
+- ./lib/multimethod.rb
+- ./lib/multimethod/.svn/README.txt
+- ./lib/multimethod/.svn/empty-file
+- ./lib/multimethod/.svn/entries
+- ./lib/multimethod/.svn/format
+- ./lib/multimethod/.svn/text-base/core_extensions.rb.svn-base
+- ./lib/multimethod/.svn/text-base/method.rb.svn-base
+- ./lib/multimethod/.svn/text-base/multimethod.rb.svn-base
+- ./lib/multimethod/.svn/text-base/parameter.rb.svn-base
+- ./lib/multimethod/.svn/text-base/table.rb.svn-base
+- ./lib/multimethod/core_extensions.rb
+- ./lib/multimethod/method.rb
+- ./lib/multimethod/multimethod.rb
+- ./lib/multimethod/parameter.rb
+- ./lib/multimethod/table.rb
+- ./test/.svn/README.txt
+- ./test/.svn/empty-file
+- ./test/.svn/entries
+- ./test/.svn/format
+- ./test/.svn/text-base/method_test.rb.svn-base
+- ./test/.svn/text-base/multimethod_test.rb.svn-base
+- ./test/.svn/text-base/parameter_test.rb.svn-base
+- ./test/.svn/text-base/test_base.rb.svn-base
+- ./test/.svn/text-base/usage_test.rb.svn-base
+- ./test/method_test.rb
+- ./test/multimethod_test.rb
+- ./test/parameter_test.rb
+- ./test/test_base.rb
+- ./test/usage_test.rb
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.2
+    version: