rebinder 0.0.2 → 0.0.3

data/lib/rebinder.rb

@@ -2,26 +2,56 @@
 
 class Method
   def rebind(*args,&block)
-    unbind.bind(*args,&block)
+    unbind.✈(*args,&block)
   end
   alias ✈ rebind
+  alias ◊ call
+  alias ⇧ owner
 end
 
+class Proc
+  alias ◊ call
+end 
+
 class UnboundMethod
   def to_proc
-    proc { |obj| self.bind(obj).call }
+    proc { |obj| self.✈(obj).◊ }
   end 
 
+  alias ✈ bind
+  alias ⇧ owner
+
   def apply(obj)
-    bind(obj).call
+    ✈(obj).◊
   end
   alias ☏ apply
+
+  def compose(meth2)
+    meth1 = self
+    meth1.⇧.send(:define_method, :__composition) {
+      meth2.✈(meth1.✈(self).◊).◊
+    }
+    ret = meth1.⇧.☃.__composition
+    meth1.⇧.send :remove_method, :__composition
+    ret
+  end
+  alias • compose
+
+  def partial_application(arg)
+    meth = self
+    meth.⇧.send(:define_method, :__curry) { |*args|
+      meth.✈(self).◊(arg, *args)
+    }
+    ret = meth.⇧.☃.__curry
+    meth.⇧.send :remove_method, :__curry
+    ret
+  end
+  alias ∂ partial_application
+  
 end 
 
 class Module
-
   class BadIdeaProxy < BasicObject
-
     def initialize(obj)
       @obj = obj
     end
@@ -29,32 +59,50 @@ class Module
     def method_missing(s)
       @obj.instance_method(s)
     end
-
   end
 
   def snowman(arg=nil)
     return instance_method(arg) if arg
     BadIdeaProxy.new(self)
   end
-
   alias ☃ snowman
-
 end
 
-# id = Object.☃.object_id
-#  #=> #<UnboundMethod: Object(Kernel)#object_id>
-#  
-# [:omg, :wtf, :lol].map(&id)
-#  #=> [507368, 507528, 507688] 
-#
-# id.☏ :lmao
-#  #=> 507048
-#
-# add = 5.method(:+)
-#
-# [1,2,3].map(&add)
-# #=> [6,7,8]
-#
-# [1,2,3].map(&add.✈ 10)
-# #=> [11,12,13]
+if __FILE__ == $0
+  require 'minitest/autorun'
+  class OmgTest < MiniTest::Unit::TestCase
+
+    def test_☃
+      id = Object.☃.object_id
+      assert_equal "#<UnboundMethod: Object(Kernel)#object_id>", id.inspect
+      assert_equal [3,5,7], [1,2,3].map(&id)
+    end
+
+    def test_☏
+      upcase = String.☃.upcase
+      assert_equal "ZOMFG", upcase.☏("zomfg")
+    end
+
+    def test_•
+      upcase  = String.☃.upcase
+      reverse = String.☃.reverse
+      reverse_upcase = reverse.•(upcase)
+      assert_equal "OMG", reverse_upcase.☏("gmo")
+    end 
+
+    def test_✈
+      add = 5.method(:+)
+      assert_equal [6,7,8],    [1,2,3].map(&add)
+      assert_equal [11,12,13], [1,2,3].map(&add.✈(10))
+    end
+
+    def test_∂
+      add = Fixnum.☃.+
+      add3 = add.∂(3)
+      assert_equal 7, add3.☏(4)
+    end 
+    
+  end 
+end 
+
 

data/lib/rebinder/version.rb

@@ -1,3 +1,3 @@
 module Rebinder
-  VERSION = "0.0.2"
+  VERSION = "0.0.3"
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: rebinder
 version: !ruby/object:Gem::Version
-  version: 0.0.2
+  version: 0.0.3
   prerelease: 
 platform: ruby
 authors: