ctx 1.0.0 → 2.1.3

data/README.md

@@ -1,4 +1,71 @@
 ctx
 ===
 
-Simple utility to limit method redefinition within the bounds of arbitrary logical scopes
+Simple utility to limit method redefinition within the bounds of arbitrary logical scopes
+
+Example
+===
+
+Here, figure it out:
+
+    require 'ctx'
+
+    class ::String
+      ctx :reversaroo do
+        def +(other)
+          "#{other.reverse}#{self.reverse}"
+        end
+      end
+      ctx :camels do
+        def +(other)
+          "#{self.capitalize}#{other.capitalize}"
+        end
+      end
+      ctx :polite do
+        def +(other)
+          "I say, good day to you there '#{other}', may I introduce you to my good friend '#{self}'?"
+        end
+      end
+      ctx do
+        def +(other)
+          "#{self} + #{other} = ?"
+        end
+      end
+    end
+
+    puts "hello" + "world"
+    #=> helloworld
+
+    ctx :camels do
+      puts "hello" + "world"
+      #=> HelloWorld
+
+      ctx :polite do
+        puts "hello" + "world"
+        #=> I say, good day to you there 'world', may I introduce you to my good friend 'hello'?
+      end
+
+      ctx do
+        puts "hello" + "world"
+        #=> hello + world = ?
+      end
+    end
+
+    ctx :reversaroo do
+      puts "hello" + "world"
+      #=> dlrowolleh
+    end
+
+    puts "hello" + "world"
+    #=> helloworld
+
+
+There are bugs.  You'll find them.
+
+---
+
+Caveats and such
+===
+
+For whatever goofy reason, this stuff doesn't play well with rspec all the time, particularly if you override stuff the matchers are hoping to also override, like == or =~ on String, or whatnot.  Don't do that right now unless you like stuff to break in inexplicable ways.  Personally, I do like that kind of stuff, makes life interesting (kind of explains my dating choices, when you get right down to it), but anywhoo, honestly, it's your call.
+

data/lib/ctx.rb

@@ -1,55 +1,85 @@
 module CTX
 
   class ::Array
-    def select_first(&block)
-      selected = nil
-      each do |item|
-        break if (selected = block.call(item))
-      end
-      selected
+    def return_first(&block)
+      returned = nil
+      each { |item| break if (returned = block.call(item)) }
+      returned
     end
   end
 
   class Context < Hash
     attr_reader :name
-    def initialize(name) @name = name.to_sym end
+    def initialize(name) @name = name.sym end
     def eql?(other) @name.eql?(other.name) end
     def hash() @name.hash end
+    def to_s() "#{name} #{super.to_s}" end
+  end
+
+  class ::Object
+    def sym() respond_to?(:to_sym) ? to_sym : to_s.to_sym end
+    def ctxputs(*args)
+      ctxs = @@contexts.map(&:name)[1..-1].join(":")
+      ctxs = "[CTX #{ctxs}] " unless ctxs.empty?
+      puts "#{ctxs}#{args.map(&:to_s).join(', ')}"
+    end
+    def ctxp(*args)
+      ctxs = @@contexts.map(&:name)[1..-1].join(":")
+      ctxs = "[CTX #{ctxs.empty? ? "-" : ctxs}]"
+      puts "#{ctxs}\n#{args.map(&:inspect).join("\n")}"
+    end
+
+    @@contexts ||= [Context.new(nil)]
+    def ctx(context = :anonymous, &contextual)
+      if contextual.nil?
+        @@contexts.reverse.first
+      else
+        @@contexts.push(Context.new(context))
+        instance_eval(&contextual)
+        @@contexts.pop()
+      end
+    end
+
   end
 
-  class ::BasicObject
+  class ::Class
+
+    def object_methods() self.instance_methods - Object.instance_methods end
+    def class_methods() self.singleton_methods - Object.singleton_methods end
+    def defined_methods() class_methods | object_methods end
 
-    def ctx(name = :anonymous, &scoped) self.class.ctx(name, &scoped) end
+    attr_accessor :ctx_methods
 
-    class << self
-      @@contexts = [nil]
-      def ctx(name = :anonymous, &scoped)
-        return @@contexts.last if scoped.nil?
+    def ctx(context = :anonymous, &contextual)
+      @ctx_methods ||= {}
 
-        context = Context.new(name)
-        @@contexts.push(context)
-        scoped.call(self)
-        @@contexts.pop
+      template = Class.new
+      template.class_eval(&contextual)
+
+      matching = self.object_methods & template.object_methods
+      matching.each do |method_name|
+        if ctx_methods[method_name].nil?
+          ctx_methods[method_name] = {}
+          ctx_methods[method_name][nil.sym] = instance_method(method_name)
+        end
       end
 
-      def ctx_define(context = :anonymous, method, &definition)
-        method = method.to_sym
-        @@ctx_methods ||= {}
-        @@ctx_methods[method] ||= {}
-
-        if @@ctx_methods[method][nil].nil?
-          @@ctx_methods[method][nil] = instance_method(method) if method_defined? method
-          define_method(method) do |*args|
-            methods = @@ctx_methods[method]
-            matched = @@contexts.reverse.select_first { |ctx| methods[ctx ? ctx.name : nil] }
-            matched.bind(self).(*args)
-          end
+      self.class_eval(&contextual)
+
+      template.object_methods.each do |method_name|
+        if ctx_methods[method_name].nil?
+          ctx_methods[method_name] = {}
+        end
+
+        ctx_methods[method_name][context] = instance_method(method_name)
+
+        define_method(method_name) do |*args|
+          methods = self.class.ctx_methods[method_name]
+          matched = @@contexts.reverse.return_first { |currentctx|  methods[currentctx.name] }
+          matched.bind(self).(*args)
         end
 
-        scoped_method = "#{context}_#{method}".to_sym
-        define_method(scoped_method, &definition)
-        @@ctx_methods[method][context] = instance_method(scoped_method)
       end
     end
   end
-end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: ctx
 version: !ruby/object:Gem::Version
-  version: 1.0.0
+  version: 2.1.3
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-10-30 00:00:00.000000000 Z
+date: 2012-11-10 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rspec
@@ -27,7 +27,39 @@ dependencies:
     - - ! '>='
       - !ruby/object:Gem::Version
         version: '0'
-description: Scoped define and context for use in writing more expressive DSLs
+- !ruby/object:Gem::Dependency
+  name: rr
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: awesome_print
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: Contextual method define
 email: ctx@chipped.net
 executables: []
 extensions: []
@@ -35,7 +67,7 @@ extra_rdoc_files: []
 files:
 - lib/ctx.rb
 - README.md
-homepage: http://rubygems.org/gems/ctx
+homepage: https://github.com/gnovos/ctx
 licenses: []
 post_install_message: 
 rdoc_options: []