sourcify 0.5.0 → 0.6.0.rc1

data/spec/method/raw_scanner/heredoc_w_indent_spec.rb

@@ -0,0 +1,8 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > heredoc (w indent)" do
+    extend Sourcify::Method::Parser::RawScanner::Spec::GenericSupport
+    behaves_like "Heredoc (w indent)"
+  end
+end

data/spec/method/raw_scanner/heredoc_wo_indent_spec.rb

@@ -0,0 +1,8 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > heredoc (wo indent)" do
+    extend Sourcify::Method::Parser::RawScanner::Spec::GenericSupport
+    behaves_like "Heredoc (wo indent)"
+  end
+end

data/spec/method/raw_scanner/kw_block_start_alias1_spec.rb

@@ -0,0 +1,20 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > keyword block start alias #1 (incrementing counter by 1)" do
+
+    extend Sourcify::Method::Parser::RawScanner::Spec::KwBlockStartSupport
+    behaves_like "Keyword block start alias #1 (incrementing counter by 1)"
+
+    kw_block_start_alias1.each do |kw|
+      should "increment counter with ... def #{kw} ..." do
+        kw_block_start_counter(<<EOL
+aa def #{kw} bb ...
+cc
+EOL
+               ).should.equal([2,2])
+      end
+
+    end
+  end
+end

data/spec/method/raw_scanner/kw_block_start_alias2_spec.rb

@@ -0,0 +1,20 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > keyword block start alias #2 (incrementing counter by 0..1)" do
+
+    extend Sourcify::Method::Parser::RawScanner::Spec::KwBlockStartSupport
+    behaves_like "Keyword block start alias #2 (incrementing counter by 0..1)"
+
+    kw_block_start_alias2.each do |kw|
+      should "increment counter with ... def #{kw} ..." do
+      kw_block_start_counter(<<EOL
+aa def #{kw} bb ...
+cc
+EOL
+                    ).should.equal([1,2])
+      end
+    end
+
+  end
+end

data/spec/method/raw_scanner/per_line_comment_spec.rb

@@ -0,0 +1,8 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > per line comment (# ...)" do
+    extend Sourcify::Method::Parser::RawScanner::Spec::GenericSupport
+    behaves_like "Per line comment (# ...)"
+  end
+end

data/spec/method/raw_scanner/single_quote_str_spec.rb

@@ -0,0 +1,8 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > single quote strings (\', %q & %w)" do
+    extend Sourcify::Method::Parser::RawScanner::Spec::GenericSupport
+    behaves_like 'Single quote strings (\', %q & %w)'
+  end
+end

data/spec/method/raw_scanner/slash_operator_spec.rb

@@ -0,0 +1,8 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+unless has_parsetree?
+  describe "Method's raw scanner > slash operator" do
+    extend Sourcify::Method::Parser::RawScanner::Spec::GenericSupport
+    behaves_like 'Slash operator'
+  end
+end

data/spec/method/raw_scanner/spec_helper.rb

@@ -0,0 +1,80 @@
+require File.expand_path('../../../spec_helper', __FILE__)
+require File.expand_path('../../../raw_scanner/shared_specs', __FILE__)
+
+module Sourcify::Method::Parser::RawScanner
+
+  SCANNER = self
+
+  class << self
+    attr_reader :tokens, :counter
+  end
+
+  module Spec
+
+    module GenericSupport
+      def self.extended(base)
+        base.instance_eval do
+
+          before do
+            SCANNER.instance_eval do
+              class << self
+                alias_method :orig_stop_if_probably_defined_by_proc,
+                  :stop_if_probably_defined_by_proc
+                def stop_if_probably_defined_by_proc; end
+              end
+            end
+          end
+
+          after do
+            SCANNER.instance_eval do
+              class << self
+                alias_method :stop_if_probably_defined_by_proc,
+                  :orig_stop_if_probably_defined_by_proc
+              end
+            end
+          end
+
+          def process(data)
+            SCANNER.process(data)
+            SCANNER.tokens
+          end
+
+        end
+      end
+    end
+
+    module KwBlockStartSupport
+      def self.extended(base)
+        base.instance_eval do
+
+          before do
+            Extensions::Counter.class_eval do
+              alias_method :orig_started?, :started?
+              def started?; true; end
+            end
+          end
+
+          after do
+            Extensions::Counter.class_eval do
+              alias_method :started?, :orig_started?
+            end
+          end
+
+          def kw_block_start_counter(data)
+            SCANNER.process(data)
+            SCANNER.counter.counts
+          end
+
+          def kw_block_start_alias1
+            %w{class do module begin case module if unless}
+          end
+
+          def kw_block_start_alias2
+            %w{while until for}
+          end
+        end
+      end
+    end
+
+  end
+end

data/spec/method/spec_helper.rb

@@ -0,0 +1 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), '..', 'spec_helper')

data/spec/method/to_raw_source_spec.rb

@@ -0,0 +1,31 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Method#to_raw_source" do
+
+  should 'retain comments' do
+    def m1
+      a = 1
+      # i should stay !!
+    end
+    method(:m1).should.be having_raw_source(%(
+    def m1
+      a = 1
+      # i should stay !!
+    end
+    ))
+  end
+
+  should 'retain last nil statement' do
+    def m2
+      a = 1
+      nil
+    end
+    method(:m2).should.be having_raw_source(%(
+    def m2
+      a = 1
+      nil
+    end
+    ))
+  end
+
+end

data/spec/method/to_raw_source_w_specified_strip_enclosure_spec.rb

@@ -0,0 +1,148 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe 'Method#to_raw_source' do
+  describe 'w specified {:strip_enclosure => ...}' do
+
+    describe '>> w true' do
+
+      options = {:strip_enclosure => true}
+
+      should 'strip enclosing def..end wo arg' do
+        def m
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 required arg' do
+        def m(aa)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 optional arg' do
+        def m(aa = nil)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 splat arg' do
+        def m(*aa)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 bracketed arg' do
+        def m((aa, bb))
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 required & 1 optional' do
+        def m(aa, bb = nil)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 required & 1 splat' do
+        def m(aa, *bb)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end w 1 required & 1 bracketed' do
+        def m(aa, (bb, cc))
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+      should 'strip enclosing def..end even wo parenthesis' do
+        def m aa
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source('# i should stay !!', options)
+      end
+
+    end
+
+    describe '>> w false' do
+
+      options = {:strip_enclosure => false}
+
+      should 'not strip enclosing def..end wo arg' do
+        def m
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source(%(
+        def m
+          # i should stay !!
+        end
+        ), options)
+      end
+
+      should 'not strip enclosing def..end w 1 required arg' do
+        def m(aa)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source(%(
+        def m(aa)
+          # i should stay !!
+        end
+        ), options)
+      end
+
+      should 'not strip enclosing def..end w 1 optional arg' do
+        def m(aa = nil)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source(%(
+        def m(aa = nil)
+          # i should stay !!
+        end
+        ), options)
+      end
+
+      should 'not strip enclosing def..end w 1 splat arg' do
+        def m(*aa)
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source(%(
+        def m(*aa)
+          # i should stay !!
+        end
+        ), options)
+      end
+
+      should 'not strip enclosing def..end w 1 bracketed arg' do
+        def m((aa, bb))
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source(%(
+        def m((aa, bb))
+          # i should stay !!
+        end
+        ), options)
+      end
+
+      should 'not strip enclosing def..end even wo parenthesis' do
+        def m aa
+          # i should stay !!
+        end
+        method(:m).should.be having_raw_source(%(
+        def m aa
+          # i should stay !!
+        end
+        ), options)
+      end
+
+    end
+
+  end
+end

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