matchete 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: a3717143d8e222ee9da803cd7647f328c36f56a7
+  data.tar.gz: bf3af40853ad0382c1776698fb8997da63a7254b
+SHA512:
+  metadata.gz: 4684675527ccb701546d644fb324d189befd55d0f4dfcb77fa09e58dab98b67c40ccd629494e3cdc495b54a3c188d1acd67a38fb2b02ea19443ecca87596e8f8
+  data.tar.gz: 30b6af0a2dbf30a61cf307cdad0d9e691aa9039b34aa4c6569c90a8876bc937a5975d93d4261286dbbfe4243510f4e1d11883eddec29bf62ea93649e7b3dd583

data/Gemfile

@@ -0,0 +1,8 @@
+source 'https://rubygems.org'
+
+group :development do
+  gem 'rspec'
+  gem 'bundler'
+  gem 'jeweler'
+end
+

data/LICENSE

@@ -0,0 +1,20 @@
+The MIT License (MIT)
+
+Copyright (c) 2014 Alexander Ivanov
+
+Permission is hereby granted, free of charge, to any person obtaining a copy of
+this software and associated documentation files (the "Software"), to deal in
+the Software without restriction, including without limitation the rights to
+use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
+the Software, and to permit persons to whom the Software is furnished to do so,
+subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all
+copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
+FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
+COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
+IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1 @@
+#Matchete

data/Rakefile

@@ -0,0 +1,20 @@
+# encoding: utf-8
+
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'rake'
+
+require 'rspec/core'
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new(:spec) do |spec|
+  spec.pattern = FileList['spec/**/*_spec.rb']
+end
+
+task :default => :spec

data/lib/matchete.rb

@@ -0,0 +1,84 @@
+require 'set'
+
+module Matchete
+  class NotResolvedError < StandardError
+  end
+
+  def self.included(klass)
+    klass.extend ClassMethods
+    klass.instance_variable_set "@functions", {}
+    klass.instance_variable_set "@default_functions", {}
+  end
+
+  Any = -> (x) { true }
+  None = -> (x) { false }
+
+  module ClassMethods
+    def on(*guards, function)
+      @functions[function] ||= []
+      @functions[function] << [guards, instance_method(function)]
+      convert_to_matcher function
+    end
+
+    def default(method_name)
+      @default_functions[method_name] = instance_method(method_name)
+      convert_to_matcher method_name
+    end
+
+    def duck(*method_names)
+      -> object do
+        method_names.all? do |method_name|
+          object.respond_to? method_name
+        end
+      end
+    end
+
+    def convert_to_matcher(function)
+      define_method(function) do |*args|
+        guards = self.class.instance_variable_get('@functions')[function].find do |guards, _|
+          self.class.match_guards guards, args
+        end
+        
+        handler = if guards.nil?
+          default_method = self.class.instance_variable_get('@default_functions')[function]
+          if default_method
+            default_method
+          else
+            raise NotResolvedError.new("not resolved #{function} with #{args}")
+          end
+        else
+          guards[1]
+        end
+
+        handler.bind(self).call *args
+      end
+    end
+
+    def match_guards(guards, args)
+      guards.zip(args).all? do |guard, arg|
+        match_guard guard, arg
+      end
+    end
+
+    def match_guard(guard, arg)
+      case guard
+        when Module
+          arg.is_a? guard
+        when Symbol
+          send guard, arg
+        when Proc
+          guard.call arg
+        when String
+          guard == arg
+        when Regexp
+          arg.is_a? String and guard.match arg
+        when Array
+          arg.is_a?(Array) and
+          guard.zip(arg).all? { |child_guard, child| match_guard child_guard, child }
+        else
+          guard == arg
+      end
+    end
+  end
+end
+

data/matchete.gemspec

@@ -0,0 +1,21 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+
+Gem::Specification.new do |s|
+  s.name        = 'matchete'
+  s.version     = '0.0.1'
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ["Alexander Ivanov"]
+  s.email       = ["alehander42@gmail.com"]
+  s.homepage = 'https://github.com/alehander42/matchete'
+  s.summary     = %q{Method overloading for Ruby based on pattern matching}
+  s.description = %q{A DSL for method overloading for Ruby based on pattern matching}
+
+  s.add_development_dependency 'rspec', '~> 0'
+  
+  s.license       = 'MIT'
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+end

data/spec/matchete_spec.rb

@@ -0,0 +1,72 @@
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'rspec'
+require 'matchete'
+
+describe Matchete do
+  it 'can be used to overload a method in a class' do
+    class A
+      include Matchete
+
+      on Integer,
+      def play(value)
+        :integer
+      end
+
+      on Float, Any,
+      def play(value, object)
+        :float
+      end
+    end
+
+    a = A.new
+    a.play(2).should eq :integer
+    a.play(2.2, 4).should eq :float
+  end
+
+  it 'can use a pattern based on classes and modules' do
+    class A
+      include Matchete
+
+      on Integer,
+      def play(value)
+        :integer
+      end
+
+      on Float,
+      def play(value)
+        :float
+      end
+
+      on Enumerable,
+      def play(value)
+        :enumerable
+      end
+    end
+
+    a = A.new
+    a.play(2).should eq :integer
+    a.play(2.2).should eq :float
+    a.play([2]).should eq :enumerable
+  end
+
+  it 'can use a pattern based on nested arrays with classes/modules' do
+    class A
+      include Matchete
+
+      on [Integer, Float],
+      def play(values)
+        [:integer, :float]
+      end
+
+      on [[Integer], Any],
+      def play(values)
+        :s
+      end
+    end
+
+    a = A.new
+    a.play([2, 2.2]).should eq [:integer, :float]
+    a.play([[2], Matchete]).should eq :s
+  end
+end

metadata

@@ -0,0 +1,66 @@
+--- !ruby/object:Gem::Specification
+name: matchete
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Alexander Ivanov
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-03-20 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0'
+description: A DSL for method overloading for Ruby based on pattern matching
+email:
+- alehander42@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- lib/matchete.rb
+- matchete.gemspec
+- spec/matchete_spec.rb
+- spec/spec_helper.rb
+homepage: https://github.com/alehander42/matchete
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: Method overloading for Ruby based on pattern matching
+test_files: []