monkey-lib 0.5.2 → 0.5.3

data/lib/monkey.rb

@@ -1,5 +1,4 @@
 module Monkey
-
   def self.backend=(backend)
     Backend.setup! backend
     backend
@@ -54,5 +53,4 @@ module Monkey
     filename = File.basename(path, '.rb')
     require "monkey/#{filename}"
   end
-
 end

data/lib/monkey/backend/active_support.rb

@@ -2,15 +2,23 @@ Monkey::Backend.new :ActiveSupport, :active_support do
   def setup
     load_lib :version
     expects_module "::ActiveSupport::CoreExtensions::String::Inflections" if version < "3"
-    load_libs "core_ext/object" => [:singleton_class, :misc], :core_ext => %w[array/extract_options string/inflections module/introspection]
+    load_libs :core_ext => %w[array/extract_options string/inflections module/introspection]
     if version < "3"
-      ::Array.send :include, ::ActiveSupport::CoreExtensions::Array::ExtractOptions
+      begin
+        load_libs "core_ext/object/singleton_class"
+      rescue LoadError
+        load_libs "core_ext/object/metaclass"
+        ::Object.send(:alias_method, :singleton_class, :metaclass)
+      end
+      load_libs "core_ext/object/misc"
+      ::Array.send  :include, ::ActiveSupport::CoreExtensions::Array::ExtractOptions
       ::Module.send :include, ::ActiveSupport::CoreExtensions::Module
+      ::String.send :include, ::ActiveSupport::CoreExtensions::String::Inflections
+    else
+      load_libs "core_ext/kernel/singleton_class"
     end
-    ::String.class_eval do
-      alias to_const_string camelcase
-      alias to_const_path underscore
-    end
+    ::String.send(:alias_method, :to_const_string, :camelcase)
+    ::String.send(:alias_method, :to_const_path, :underscore)
   end
 
   def version(default = "0")

data/lib/monkey/ext/array.rb

@@ -1,3 +1,5 @@
+require 'set'
+
 module Monkey
   module Ext
     module Array
@@ -9,6 +11,9 @@ module Monkey
         replace select(&block)
       end
 
+      def +@
+        Set.new self
+      end
     end
   end
 end

data/lib/monkey/ext/string.rb

@@ -7,7 +7,6 @@ module Monkey
       expects :constantize, :to_const_string, :to_const_path, :underscore, :camelcase
 
       feature :version do
-
         def to_version
           dup.to_version!
         end
@@ -16,11 +15,9 @@ module Monkey
           extend Monkey::Version
           self
         end
-
       end
 
       feature :pathname do
-
         def atime
           Pathname(self).atime
         end
@@ -176,9 +173,7 @@ module Monkey
         def symlink?
           Pathname(self).symlink?
         end
-
       end
-
     end
   end
 end

data/lib/monkey/ext/symbol.rb

@@ -0,0 +1,11 @@
+module Monkey
+  module Ext
+    module Symbol
+      def ~@
+        Monkey::Matcher.new do |obj|
+          obj.respond_to?(self)
+        end
+      end
+    end
+  end
+end

data/lib/monkey/matcher.rb

@@ -0,0 +1,11 @@
+module Monkey
+  class Matcher
+    def initialize(&block)
+      @block = block
+    end
+
+    def ===(other)
+      @block.call(other)
+    end
+  end
+end

data/spec/monkey/ext/array_spec.rb

@@ -1,7 +1,6 @@
 require __FILE__.sub(%r{monkey/.*$}, "spec_helper")
 
 describe Monkey::Ext::Array do
-
   describe "backend expectations" do
     # expects :extract_options!
     it "imports extract_options! from backend" do
@@ -18,7 +17,6 @@ describe Monkey::Ext::Array do
   end
 
   describe "select!" do
-
     it "results in the same arrays as Array#select" do
       ([1, 2, 3, 4, 5, 6].select! { |e| e > 3 }).should == ([1, 2, 3, 4, 5, 6].select { |e| e > 3 })
       ([1, 2, 3, 4, 5, 6].select! { |e| e < 0 }).should == ([1, 2, 3, 4, 5, 6].select { |e| e < 0 })
@@ -29,7 +27,11 @@ describe Monkey::Ext::Array do
       x.select! { |e| e > 3 }
       x.should == [4, 5, 6]
     end
-
   end
 
+  describe '+@' do
+    it 'returns a set' do
+      (+[1,2]).should be_a(Set)
+    end
+  end
 end

data/spec/monkey/ext/symbol_spec.rb

@@ -0,0 +1,20 @@
+require __FILE__.sub(%r{monkey/.*$}, "spec_helper")
+
+describe Monkey::Ext::Symbol do
+  describe '~@' do
+    it 'should match objects responding to a method' do
+      matcher = ~:foo
+      o = Object.new
+      (matcher === o).should be_false
+      o.stub! :foo
+      (matcher === o).should be_true
+    end
+
+    it 'should work for case statements' do
+      case 'foo'
+      when ~:to_s then nil
+      else fail 'did not match'
+      end
+    end
+  end
+end

data/spec/monkey/matcher_spec.rb

@@ -0,0 +1,17 @@
+require __FILE__.sub(%r{monkey/.*$}, "spec_helper")
+
+describe Monkey::Matcher do
+  it 'should consider block for #===' do
+    matcher = Monkey::Matcher.new { |x| x > 6 }
+    (matcher === 5).should be_false
+    (matcher === 8).should be_true
+  end
+
+  it 'should work with switch' do
+    matcher = Monkey::Matcher.new { |x| /foo/ === x }
+    case 'foobar'
+    when matcher then nil
+    else fail 'did not match'
+    end
+  end
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: monkey-lib
 version: !ruby/object:Gem::Version 
-  hash: 15
+  hash: 13
   prerelease: false
   segments: 
   - 0
   - 5
-  - 2
-  version: 0.5.2
+  - 3
+  version: 0.5.3
 platform: ruby
 authors: 
 - Konstantin Haase
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-07-18 00:00:00 +02:00
+date: 2010-09-07 00:00:00 +02:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -59,8 +59,10 @@ extra_rdoc_files:
 - lib/monkey/ext/object.rb
 - lib/monkey/ext/pathname.rb
 - lib/monkey/ext/string.rb
+- lib/monkey/ext/symbol.rb
 - lib/monkey/ext.rb
 - lib/monkey/hash_fix.rb
+- lib/monkey/matcher.rb
 - lib/monkey/version.rb
 - lib/monkey-lib.rb
 - lib/monkey.rb
@@ -86,8 +88,10 @@ files:
 - lib/monkey/ext/object.rb
 - lib/monkey/ext/pathname.rb
 - lib/monkey/ext/string.rb
+- lib/monkey/ext/symbol.rb
 - lib/monkey/ext.rb
 - lib/monkey/hash_fix.rb
+- lib/monkey/matcher.rb
 - lib/monkey/version.rb
 - lib/monkey-lib.rb
 - lib/monkey.rb
@@ -99,7 +103,9 @@ files:
 - spec/monkey/ext/object_spec.rb
 - spec/monkey/ext/pathname_spec.rb
 - spec/monkey/ext/string_spec.rb
+- spec/monkey/ext/symbol_spec.rb
 - spec/monkey/ext_spec.rb
+- spec/monkey/matcher_spec.rb
 - spec/monkey_spec.rb
 - spec/spec_helper.rb
 has_rdoc: true