sourcify 0.5.0 → 0.6.0.rc1

data/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/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/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/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/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

data/spec/method/to_source_from_def_end_block_w_nested_case_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 case" do
+
+    should 'handle simple' do
+      def m1
+        case @x1 when true then false end
+      end
+      method(:m1).should.be having_source(%(
+        def m1
+          case @x1 when true then false end
+        end
+      ))
+    end
+
+    should 'handle nested' do
+      def m2
+        case @x1
+        when true
+          case @x2 when false then true end
+        end
+      end
+      method(:m2).should.be having_source(%(
+        def m2
+          case @x1
+          when true
+            case @x2 when false then true end
+          end
+        end
+      ))
+    end
+
+  end
+end

data/spec/method/to_source_from_def_end_block_w_nested_class_spec.rb

@@ -0,0 +1,51 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Method#to_source (from def ... end block)" do
+  describe "w nested class" do
+
+    class AA; end
+
+    should 'handle singleton' do
+      def m1
+        class << AA
+          def aa
+            @x1 = 1
+          end
+        end
+      end
+      method(:m1).should.be having_source(%(
+        def m1
+          class << AA
+            def aa
+              @x1 = 1
+            end
+          end
+        end
+      ))
+    end
+
+    should 'handle nested' do
+      def m2
+        class << AA
+          class BB
+            def bb
+              @x1 = 1
+            end
+          end
+        end
+      end
+      method(:m2).should.be having_source(%(
+        def m2
+          class << AA
+            class BB
+              def bb
+                @x1 = 1
+              end
+            end
+          end
+        end
+      ))
+    end
+
+  end
+end

data/spec/method/to_source_from_def_end_block_w_nested_do_end_block_spec.rb

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

data/spec/method/to_source_from_def_end_block_w_nested_for_spec.rb

@@ -0,0 +1,126 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Method#to_source (from def ... end block)" do
+  describe "w nested for block" do
+
+    should 'handle w do' do
+      def m1
+        for x1 in [1,2] do x1 end
+      end
+      method(:m1).should.be having_source(%(
+        def m1
+          for x1 in [1,2] do x1 end
+        end
+      ))
+    end
+
+    should 'handle w \ do' do
+      def m2
+        for x2 in [1,2] \
+          do x2 end
+      end
+      method(:m2).should.be having_source(%(
+        def m2
+          for x2 in [1,2] do x2 end
+        end
+      ))
+    end
+
+    should 'handle wo do (w newline)' do
+      def m3
+        for x3 in [1,2]
+          x3
+        end
+      end
+      method(:m3).should.be having_source(%(
+        def m3
+          for x3 in [1,2]
+            x3
+          end
+        end
+      ))
+    end
+
+    should 'handle wo do (w semicolon)' do
+      def m4
+        for x4 in [1,2]; x4; end
+      end
+      method(:m4).should.be having_source(%(
+        def m4
+          for x4 in [1,2]
+            x4
+          end
+        end
+      ))
+    end
+
+    should 'handle nested wo do within w do' do
+      def m5
+        for x1 in [1,2] do
+          for x2 in [1,2]
+            x2
+          end
+        end
+      end
+      method(:m5).should.be having_source(%(
+        def m5
+          for x1 in [1,2] do
+            for x2 in [1,2]
+              x2
+            end
+          end
+        end
+      ))
+    end
+
+    should 'handle nested wo do within wo do' do
+      def m6
+        for x1 in [2,3]
+          for x2 in [2,3]
+            x2
+          end
+        end
+      end
+      method(:m6).should.be having_source(%(
+        def m6
+          for x1 in [2,3] do
+            for x2 in [2,3]
+              x2
+            end
+          end
+        end
+      ))
+    end
+
+    should 'handle nested w do within wo do' do
+      def m7
+        for x1 in [3,4]
+          for x2 in [3,4] do x2 end
+        end
+      end
+      method(:m7).should.be having_source(%(
+        def m7
+          for x1 in [3,4]
+            for x2 in [3,4] do x2 end
+          end
+        end
+      ))
+    end
+
+    should 'handle nested w do within w do' do
+      def m8
+        for x1 in [4,5] \
+          do for x2 in [4,5] do x2 end
+        end
+      end
+      method(:m8).should.be having_source(%(
+        def m8
+          for x1 in [4,5]
+            for x2 in [4,5] do x2 end
+          end
+        end
+      ))
+    end
+
+  end
+end