core_ext.rb

class UnboundMethod
  def self.new(name = :'', &block)
    Module.new.module_eval do
      define_method(name, block)
      instance_method(name)
    end
  end

  def call(receiver, *args, &block)
    bind(receiver).call(*args, &block)
  end
end
 
class Method
  def self.new(receiver, name = :'', &block)
    UnboundMethod.new(name, &block).bind(receiver)
  end
 
  def curry(arity = arity())
    Method.new(receiver, &to_proc.curry(arity))
  end
end

class Proc
  def bind(receiver)
    Method.new(receiver, &self).to_proc
  end
end