ikra 0.0.1

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

@@ -0,0 +1,46 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (from def..end block)' do
+  describe 'variables' do
+
+    should 'handle non var' do
+      def m1; x; end
+      method(:m1).should.be having_sexp(
+        s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'not handle local var' do
+      x = 'lx';
+      def m2; x; end
+      method(:m2).should.be having_sexp(
+        s(:defn, :m2, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'handle instance var' do
+      @x = 'ix'
+      def m3; @x; end
+      method(:m3).should.be having_sexp(
+        s(:defn, :m3, s(:args), s(:scope, s(:block, s(:ivar, :@x))))
+      )
+    end
+
+    should 'handle class var' do
+      @@x = 'cx'
+      def m4; @@x; end
+      method(:m4).should.be having_sexp(
+        s(:defn, :m4, s(:args), s(:scope, s(:block, s(:cvar, :@@x))))
+      )
+    end
+
+    should 'handle global var' do
+      $x = 'gx'
+      def m5; $x; end
+      method(:m5).should.be having_sexp(
+        s(:defn, :m5, s(:args), s(:scope, s(:block, s(:gvar, :$x))))
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,38 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (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| found == expected }
+      end
+
+    end
+
+    should 'handle non var' do
+      irb_eval(%(
+        def m1; x; end
+        method(:m1).to_sexp
+      )).should.be equal_to(
+        s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'not handle local var' do
+      irb_eval(%(
+        x = :lx
+        def m2; x; end
+        method(:m2).to_sexp
+      )).should.be equal_to(
+        s(:defn, :m2, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,38 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (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| found == expected }
+      end
+
+    end
+
+    should 'handle non var' do
+      pry_eval(%(
+        def m1; x; end
+        method(:m1).to_sexp
+      )).should.be equal_to(
+        s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'not handle local var' do
+      pry_eval(%(
+        x = :lx
+        def m2; x; end
+        method(:m2).to_sexp
+      )).should.be equal_to(
+        s(:defn, :m2, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,56 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (from define_method)' do
+  describe 'w specified {:attached_to => ...}' do
+
+    # NOTE: We just want enough specs to show that handling of :attached_to
+    # works for Method#to_sexp as well.
+
+    before { @thing = Object.new }
+    options = {:attached_to => /^.*?(\W|)watever(\W)/}
+
+    should 'handle no nesting on same line' do
+      b1 = lambda {|a| @x1+1 }; b2 = watever { @x1+2 }; b3 = lambda { @x1+3 }
+      @thing.class.send(:define_method, :m1, &b2)
+      @thing.method(:m1).should.be having_sexp(
+        s(:defn,
+          :m1,
+          s(:args),
+          s(:scope, s(:block, s(:call, s(:ivar, :@x1), :+, s(:arglist, s(:lit, 2)))))),
+        options
+      )
+    end
+
+    should 'handle single level nesting on same line' do
+      b1 = lambda {|a| @x2+1 }; b2 = watever { lambda { @x2+2 } }
+      @thing.class.send(:define_method, :m2, &b2)
+      @thing.method(:m2).should.be having_sexp(
+        s(:defn,
+          :m2,
+          s(:args),
+          s(:scope,
+            s(:block,
+              s(:iter,
+                s(:call, nil, :lambda, s(:arglist)),
+                nil,
+                s(:call, s(:ivar, :@x2), :+, s(:arglist, s(:lit, 2))))))),
+        options
+      )
+    end
+
+    should 'handle multi level nesting on same line' do
+      b2 = (lambda {|a| watever { lambda { @x3 } } }).call(1)
+      @thing.class.send(:define_method, :m3, &b2)
+      @thing.method(:m3).should.be having_sexp(
+        s(:defn,
+          :m3,
+          s(:args),
+          s(:scope,
+            s(:block,
+              s(:iter, s(:call, nil, :lambda, s(:arglist)), nil, s(:ivar, :@x3))))),
+        options
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,52 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (from define_method)' do
+  describe 'variables' do
+
+    before { @thing = Object.new }
+
+    should 'handle non var' do
+      blk = lambda { x }
+      @thing.class.send(:define_method, :m1, &blk)
+      @thing.method(:m1).should.be having_sexp(
+        s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'not handle local var' do
+      # NOTE: This can be a potential bug, cos we purposely ignore the local
+      # var captured in the proc's binding ... anyway, we see how things go
+      # (eg. maybe nobody would ever care abt it)
+      x, blk = 'lx', lambda { x }
+      @thing.class.send(:define_method, :m2, &blk)
+      @thing.method(:m2).should.be having_sexp(
+        s(:defn, :m2, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'handle instance var' do
+      @x, blk = 'ix', lambda { @x }
+      @thing.class.send(:define_method, :m3, &blk)
+      method(:m3).should.be having_sexp(
+        s(:defn, :m3, s(:args), s(:scope, s(:block, s(:ivar, :@x))))
+      )
+    end
+
+    should 'handle class var' do
+      @@x, blk = 'cx', lambda { @@x }
+      @thing.class.send(:define_method, :m4, &blk)
+      method(:m4).should.be having_sexp(
+        s(:defn, :m4, s(:args), s(:scope, s(:block, s(:cvar, :@@x))))
+      )
+    end
+
+    should 'handle global var' do
+      $x, blk = 'gx', lambda { $x }
+      @thing.class.send(:define_method, :m5, &blk)
+      method(:m5).should.be having_sexp(
+        s(:defn, :m5, s(:args), s(:scope, s(:block, s(:gvar, :$x))))
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,42 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (from define_method)' do
+  describe 'within IRB' do
+
+    class << self
+
+      def irb_eval(string)
+        irb_exec(string)[-1]
+      end
+
+      def equal_to(expected)
+        lambda {|found| found == expected }
+      end
+
+    end
+
+    should 'handle non var' do
+      irb_eval(%\
+        thing = Object.new
+        blk = lambda { x }
+        thing.class.send(:define_method, :m1, &blk)
+        thing.method(:m1).to_sexp
+      \).should.be equal_to(
+        s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'not handle local var' do
+      irb_eval(%\
+        thing = Object.new
+        x = :lx
+        blk = lambda { x }
+        thing.class.send(:define_method, :m2, &blk)
+        thing.method(:m2).to_sexp
+      \).should.be equal_to(
+        s(:defn, :m2, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,42 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp (from define_method)' do
+  describe 'within PRY' do
+
+    class << self
+
+      def pry_eval(string)
+        pry_exec(string)[-1]
+      end
+
+      def equal_to(expected)
+        lambda {|found| found == expected }
+      end
+
+    end
+
+    should 'handle non var' do
+      pry_eval(%\
+        thing = Object.new
+        blk = lambda { x }
+        thing.class.send(:define_method, :m1, &blk)
+        thing.method(:m1).to_sexp
+      \).should.be equal_to(
+        s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+    should 'not handle local var' do
+      pry_eval(%\
+        thing = Object.new
+        x = :lx
+        blk = lambda { x }
+        thing.class.send(:define_method, :m2, &blk)
+        thing.method(:m2).to_sexp
+      \).should.be equal_to(
+        s(:defn, :m2, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+      )
+    end
+
+  end
+end

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

@@ -0,0 +1,74 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_sexp' do
+  describe 'w specified {:strip_enclosure => ...}' do
+
+    describe '>> w true' do
+
+      options = {:strip_enclosure => true}
+
+      should 'strip enclosing proc wo arg' do
+        def m1; a+b; end
+        method(:m1).should.be having_sexp(
+          s(:scope,
+            s(:block,
+              s(:call,
+                s(:call, nil, :a, s(:arglist)),
+                :+,
+                s(:arglist, s(:call, nil, :b, s(:arglist)))))),
+          options
+        )
+      end
+
+      should 'strip enclosing proc w arg' do
+        def m2(a); a+b; end
+        method(:m2).should.be having_sexp(
+          s(:scope,
+            s(:block,
+              s(:call,
+                s(:lvar, :a),
+                :+,
+                s(:arglist, s(:call, nil, :b, s(:arglist)))))),
+          options
+        )
+      end
+
+    end
+
+    describe '>> w false' do
+
+      options = {:strip_enclosure => false}
+
+      should 'not strip enclosing proc wo arg' do
+        def m3; a+b; end
+        method(:m3).should.be having_sexp(
+          s(:defn,
+            :m3,
+            s(:args),
+            s(:scope,
+              s(:block,
+                s(:call,
+                  s(:call, nil, :a, s(:arglist)),
+                  :+,
+                  s(:arglist, s(:call, nil, :b, s(:arglist))))))),
+          options
+        )
+      end
+
+      should 'not strip enclosing proc w arg' do
+        def m4(a); a+b; end
+        method(:m4).should.be having_sexp(
+          s(:defn,
+            :m4,
+            s(:args, :a),
+            s(:scope,
+               s(:block,
+                   s(:call, s(:lvar, :a), :+, s(:arglist, s(:call, nil, :b, s(:arglist))))))),
+          options
+        )
+      end
+
+    end
+
+  end
+end

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

@@ -0,0 +1,23 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Method#to_source (from def ... end block)" do
+  describe "w 19 extras" do
+    if RUBY_VERSION.include?('1.9.')
+
+      should 'handle simple (w label keys)' do
+        def m1; {a: 1, b: 2}; end
+        method(:m1).should.be having_source(%(
+          def m1; {:a => 1, :b => 2}; end
+        ))
+      end
+
+      should 'handle nested (w label keys)' do
+        def m2; {a: 1, b: {c: 3}}; end
+        method(:m2).should.be having_source(%(
+          def m2; {:a => 1, :b => {:c => 3}}; end
+        ))
+      end
+
+    end
+  end
+end

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

@@ -0,0 +1,35 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_source (from def ... end block)' do
+  describe 'w nested begin' do
+
+    should 'handle simple' do
+      def m1
+        begin @x1 = 1 end
+      end
+      method(:m1).should.be having_source(%(
+        def m1
+          begin @x1 = 1 end
+        end
+      ))
+    end
+
+    should 'handle nested' do
+      def m2
+        begin
+          @x1 = 1
+          begin @x2 = 2 end
+        end
+      end
+      method(:m2).should.be having_source(%(
+        def m2
+          begin
+            @x1 = 1
+            begin @x2 = 2 end
+          end
+        end
+      ))
+    end
+
+  end
+end