ikra 0.0.1

data/lib/sourcify/spec/method/to_source_from_def_end_block_w_singleton_method_spec.rb

@@ -0,0 +1,19 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from def ... end block)' do
+  describe 'w singleton method' do
+
+    should 'strip object' do
+      thing = Object.new
+      def m
+        @x1 = 1
+      end
+      method(:m).should.be having_source(%(
+        def m
+          @x1 = 1
+        end
+      ))
+    end
+
+  end
+end

data/lib/sourcify/spec/method/to_source_from_def_end_block_within_irb_spec.rb

@@ -0,0 +1,30 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from def..end block)' do
+  describe 'within IRB' do
+
+    class << self
+
+      def irb_eval(string)
+        irb_exec(string)[-1]
+      end
+
+      def equal_to(expected)
+        lambda {|found| normalize_code(found) == normalize_code(expected) }
+      end
+
+    end
+
+    should 'handle' do
+      irb_eval(%(
+        def m1; x; end
+        method(:m1).to_source
+      )).should.be equal_to(%(
+        def m1
+          x
+        end
+      ))
+    end
+
+  end
+end

data/lib/sourcify/spec/method/to_source_from_def_end_block_within_pry_spec.rb

@@ -0,0 +1,45 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from def..end block)' do
+  describe 'within PRY' do
+
+    class << self
+
+      def pry_eval(string)
+        pry_exec(string)[-1]
+      end
+
+      def equal_to(expected)
+        lambda {|found| normalize_code(found) == normalize_code(expected) }
+      end
+
+    end
+
+    should 'handle' do
+      pry_eval(%(
+        def m1; x; end
+        method(:m1).to_source
+      )).should.be equal_to(%(
+        def m1
+          x
+        end
+      ))
+    end
+
+    should 'handle upward scroll' do
+      pry_eval(%Q(
+        def m1; x1; end
+        def m2; x2; end
+        method(:m1)
+        method(:m1).to_source
+        method(:m2).to_source
+        
+      )).should.be equal_to(%(
+        def m1
+          x1
+        end
+      ))
+    end
+  
+  end
+end

data/lib/sourcify/spec/method/to_source_from_def_end_w_multi_blocks_and_many_matches_spec.rb

@@ -0,0 +1,30 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from def...end block)' do
+  describe 'w multi blocks and many matches' do
+
+    if has_parsetree?
+      # TODO: Should we support this ??
+    else
+
+      error = Sourcify::MultipleMatchingMethodsPerLineError
+
+      should "raise #{error} w no nesting on same line" do
+        def m1; @x1; end; def m1; @x2; end
+        lambda { method(:m1).to_source }.should.raise(error)
+      end
+
+      should "raise #{error} w single level nesting on same line" do
+        def m2; class << self; def m2; @x1; end; end; end
+        lambda { method(:m2).to_source }.should.raise(error)
+      end
+
+      should "raise #{error} w multi level nesting on same line" do
+        def m3; class << self; def m3; class << self; def m3; @x1; end; end; end; end; end
+        lambda { method(:m3).to_source }.should.raise(error)
+      end
+
+    end
+
+  end
+end

data/lib/sourcify/spec/method/to_source_from_def_end_w_multi_blocks_and_single_match_spec.rb

@@ -0,0 +1,36 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from def...end)' do
+  describe 'w single blocks and many matches' do
+
+    should 'skip non-matching w no nesting on same line' do
+      def m1(a); @x1; end; def m1(b); @x2; end
+      method(:m1).should.be having_source(%(
+        def m1(b)
+          @x2
+        end
+      ))
+    end
+
+    should 'skip non-matching w single level nesting on same line' do
+      def m2(a); class << self; def m2(b); @x1; end; end; end
+      m2(1) # calling m2 has the side effect of redefining m2
+      method(:m2).should.be having_source(%(
+        def m2(b)
+          @x1
+        end
+      ))
+    end
+
+    should 'skip non-matching w multi level nesting on same line' do
+      def m3(a); class << self; def m3(b); class << self; def m3(c); @x1; end; end; end; end; end
+      m3(1); m3(2) # calling m3 twice has the side effect of redefining m3 twice
+      method(:m3).should.be having_source(%(
+        def m3(c)
+          @x1
+        end
+      ))
+    end
+
+  end
+end

data/lib/sourcify/spec/method/to_source_from_define_method_w_braced_block_spec.rb

@@ -0,0 +1,113 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Method#to_source (from define_method)" do
+  describe "w braced block" do
+
+    before { @thing = Object.new }
+
+    describe 'w block declared elsewhere' do
+
+      should 'wo arg' do
+        blk = lambda { x = 1 }
+        @thing.class.send(:define_method, :m1, &blk)
+        @thing.method(:m1).should.be having_source(%(
+          def m1
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one required arg' do
+        blk = lambda {|a| x = 1 }
+        @thing.class.send(:define_method, :m2, &blk)
+        @thing.method(:m2).should.be having_source(%(
+          def m2(a)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one optional arg' do
+        blk = lambda {|a=1| x = 1 }
+        @thing.class.send(:define_method, :m3, &blk)
+        @thing.method(:m3).should.be having_source(%(
+          def m3(a = 1)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple required args' do
+        blk = lambda {|a, b, c| x = 1 }
+        @thing.class.send(:define_method, :m5, &blk)
+        @thing.method(:m5).should.be having_source(%(
+          def m5(a, b, c)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple args w one optional' do
+        blk = lambda {|a, b, c=1| x = 1 }
+        @thing.class.send(:define_method, :m6, &blk)
+        @thing.method(:m6).should.be having_source(%(
+          def m6(a, b, c = 1)
+            x = 1
+          end
+        ))
+      end
+
+    end
+
+
+    describe 'w block attached' do
+
+      should 'wo arg' do
+        @thing.class.send(:define_method, :m1) { x = 1 }
+        @thing.method(:m1).should.be having_source(%(
+          def m1
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one required arg' do
+        @thing.class.send(:define_method, :m2) {|a| x = 1 }
+        @thing.method(:m2).should.be having_source(%(
+          def m2(a)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one optional arg' do
+        @thing.class.send(:define_method, :m3) {|a=1| x = 1 }
+        @thing.method(:m3).should.be having_source(%(
+          def m3(a = 1)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple required args' do
+        @thing.class.send(:define_method, :m5) {|a, b, c| x = 1 }
+        @thing.method(:m5).should.be having_source(%(
+          def m5(a, b, c)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple args w one optional' do
+        @thing.class.send(:define_method, :m6) {|a, b, c=1| x = 1 }
+        @thing.method(:m6).should.be having_source(%(
+          def m6(a, b, c = 1)
+            x = 1
+          end
+        ))
+      end
+
+    end
+
+  end
+end

data/lib/sourcify/spec/method/to_source_from_define_method_w_do_end_block_spec.rb

@@ -0,0 +1,145 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Method#to_source (from define_method)" do
+  describe "w do..end block" do
+
+    before { @thing = Object.new }
+
+    describe 'w block declared elsewhere' do
+
+      should 'wo arg' do
+        blk = lambda do
+          x = 1
+        end
+        @thing.class.send(:define_method, :m1, &blk)
+        @thing.method(:m1).should.be having_source(%(
+          def m1
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one required arg' do
+        blk = lambda do |a|
+          x = 1
+        end
+        @thing.class.send(:define_method, :m2, &blk)
+        @thing.method(:m2).should.be having_source(%(
+          def m2(a)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one optional arg' do
+        blk = lambda do |a=1|
+          x = 1
+        end
+        @thing.class.send(:define_method, :m3, &blk)
+        @thing.method(:m3).should.be having_source(%(
+          def m3(a = 1)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple required args' do
+        blk = lambda do |a, b, c|
+          x = 1
+        end
+        @thing.class.send(:define_method, :m5, &blk)
+        @thing.method(:m5).should.be having_source(%(
+          def m5(a, b, c)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple args w one optional' do
+        blk = lambda do |a, b, c=1|
+          x = 1
+        end
+        @thing.class.send(:define_method, :m6, &blk)
+        @thing.method(:m6).should.be having_source(%(
+          def m6(a, b, c = 1)
+            x = 1
+          end
+        ))
+      end
+
+  #    should 'w multiple args w one required group' do
+  #      blk = lambda do |a, b, (c,d)|
+  #        x = 1
+  #      end
+  #      @thing.class.send(:define_method, :m7, &blk)
+  #      @thing.method(:m7).should.be having_source(%(
+  #        def m7(a, b, (c,d))
+  #          x = 1
+  #        end
+  #      ))
+  #    end
+
+    end
+
+
+    describe 'w block attached' do
+
+      should 'wo arg' do
+        @thing.class.send(:define_method, :m1) do
+          x = 1
+        end
+        @thing.method(:m1).should.be having_source(%(
+          def m1
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one required arg' do
+        @thing.class.send(:define_method, :m2) do |a|
+          x = 1
+        end
+        @thing.method(:m2).should.be having_source(%(
+          def m2(a)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w one optional arg' do
+        @thing.class.send(:define_method, :m3) do |a=1|
+          x = 1
+        end
+        @thing.method(:m3).should.be having_source(%(
+          def m3(a = 1)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple required args' do
+        @thing.class.send(:define_method, :m5) do |a, b, c|
+          x = 1
+        end
+        @thing.method(:m5).should.be having_source(%(
+          def m5(a, b, c)
+            x = 1
+          end
+        ))
+      end
+
+      should 'w multiple args w one optional' do
+        @thing.class.send(:define_method, :m6) do |a, b, c=1|
+          x = 1
+        end
+        @thing.method(:m6).should.be having_source(%(
+          def m6(a, b, c = 1)
+            x = 1
+          end
+        ))
+      end
+
+    end
+
+  end
+end

data/lib/sourcify/spec/method/to_source_from_define_method_w_multi_blocks_and_many_matches_spec.rb

@@ -0,0 +1,56 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from #define_method)' do
+  describe 'w multi blocks and many matches' do
+
+    if has_parsetree?
+      # TODO: Should we support this ??
+    else
+
+      before { @thing = Object.new }
+      error = Sourcify::MultipleMatchingProcsPerLineError
+
+      describe 'w do...end block' do
+        should "raise #{error} w no nesting on same line" do
+          b1 = lambda do |a| @x end; b2 = lambda do @x end; b3 = lambda do @x end
+          @thing.class.send(:define_method, :m1, &b2)
+          lambda { @thing.method(:m1).to_source }.should.raise(error)
+        end
+
+        should "raise #{error} w single level nesting on same line" do
+          b1 = lambda do |a| @x end; b2 = lambda do lambda do @x end end
+          @thing.class.send(:define_method, :m2, &b2)
+          lambda { @thing.method(:m2).to_source }.should.raise(error)
+        end
+
+        should "raise #{error} w multi level nesting on same line" do
+          b2 = (lambda do |a| lambda do  lambda do  @x end end end).call(1)
+          @thing.class.send(:define_method, :m3, &b2)
+          lambda { @thing.method(:m3).to_source }.should.raise(error)
+        end
+      end
+
+      describe 'w braced block' do
+        should "raise #{error} w no nesting on same line" do
+          b1 = lambda {|a| @x }; b2 = lambda { @x }; b3 = lambda { @x }
+          @thing.class.send(:define_method, :m1, &b2)
+          lambda { @thing.method(:m1).to_source }.should.raise(error)
+        end
+
+        should "raise #{error} w single level nesting on same line" do
+          b1 = lambda {|a| @x }; b2 = lambda { lambda { @x } }
+          @thing.class.send(:define_method, :m2, &b2)
+          lambda { @thing.method(:m2).to_source }.should.raise(error)
+        end
+
+        should "raise #{error} w multi level nesting on same line" do
+          b2 = (lambda {|a| lambda { lambda { @x } } }).call(1)
+          @thing.class.send(:define_method, :m3, &b2)
+          lambda { @thing.method(:m3).to_source }.should.raise(error)
+        end
+      end
+
+    end
+
+  end
+end