ikra 0.0.1

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

@@ -0,0 +1,49 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Misc (from def..end block)" do
+
+  should 'handle accessing #to_sexp after #to_source' do
+    def m1; x; end
+    (m = method(:m1)).to_source
+    m.should.be having_sexp(
+      s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+    )
+  end
+
+  should 'handle accessing #to_source after #to_sexp' do
+    def m2; x; end
+    (m = method(:m2)).to_sexp
+    m.should.be having_source(%(
+      def m2; x; end
+    ))
+  end
+
+  should "handle body with '/' char" do
+    def m3; x/2; end
+    method(:m3).should.be having_source(%(
+      def m3; x/2; end
+    ))
+  end
+
+  should "handle lexer bug in missing trailing chars after '=>' operator" do
+    # This example addresses bug @ http://redmine.ruby-lang.org/issues/show/3765
+    {
+      __LINE__ => (def m4; x; end; method(:m4))
+    }.values.last.should.be having_source(%(
+      def m4; x; end
+    ))
+  end
+
+  should 'raise Sourcify::CannotFindSourceLocationError when Method#source_location is nil' do
+    lambda { 1.method(:to_s).to_source }.should.
+      raise(Sourcify::CannotFindSourceLocationError)
+  end
+
+  unless has_parsetree?
+    should "raise Sourcify::CannotParseEvalCodeError when method is created from eval" do
+      lambda { eval("def m5; x; end; method(:m5)").to_source }.should.
+        raise(Sourcify::CannotParseEvalCodeError)
+    end
+  end
+
+end

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

@@ -0,0 +1,63 @@
+# -*- coding: utf-8 -*-
+require File.join(File.expand_path(File.dirname(__FILE__)), 'spec_helper')
+
+describe "Misc (from define_method)" do
+
+  before { @thing = Object.new }
+
+  should 'handle accessing #to_sexp after #to_source' do
+    blk = lambda { x }
+    @thing.class.send(:define_method, :m1, &blk)
+    (m = @thing.method(:m1)).to_source
+    m.should.be having_sexp(
+      s(:defn, :m1, s(:args), s(:scope, s(:block, s(:call, nil, :x, s(:arglist)))))
+    )
+  end
+
+  should 'handle accessing #to_source after #to_sexp' do
+    blk = lambda { x }
+    @thing.class.send(:define_method, :m2, &blk)
+    (m = @thing.method(:m2)).to_sexp
+    m.should.be having_source(%(
+      def m2; x; end
+    ))
+  end
+
+  should "handle body with '/' char" do
+    blk = lambda { x / 2 }
+    @thing.class.send(:define_method, :m3, &blk)
+    @thing.method(:m3).should.be having_source(%(
+      def m3; x / 2; end
+    ))
+  end
+
+  should "handle lexer bug in missing trailing chars after '=>' operator" do
+    # This example addresses bug @ http://redmine.ruby-lang.org/issues/show/3765
+    hash = {
+      :x => lambda { x }
+    }
+    @thing.class.send(:define_method, :m4, &(hash[:x]))
+    @thing.method(:m4).should.be having_source(%(
+      def m4; x; end
+    ))
+  end
+
+  should "handle lexer bug in missing trailing chars after '=>' operator" do
+    # This example addresses bug @ http://redmine.ruby-lang.org/issues/show/3765
+    hash = {
+      :blk => lambda do x end
+    }
+    @thing.class.send(:define_method, :m5, &(hash[:blk]))
+    @thing.method(:m5).should.be having_source(%(
+      def m5; x; end
+    ))
+  end
+
+  unless has_parsetree?
+    should "raise Sourcify::CannotParseEvalCodeError when method is created from eval" do
+      lambda { eval("klass = Class.new { define_method(:m6){ x }; }; klass.new.method(:m6)").to_source }.
+        should.raise(Sourcify::CannotParseEvalCodeError)
+    end
+  end
+
+end

data/lib/sourcify/spec/method/raw_scanner/block_comment_spec.rb

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

data/lib/sourcify/spec/method/raw_scanner/double_colons_spec.rb

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

data/lib/sourcify/spec/method/raw_scanner/double_quote_str_w_interpolation_spec.rb

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

data/lib/sourcify/spec/method/raw_scanner/double_quote_str_wo_interpolation_spec.rb

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

data/lib/sourcify/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/lib/sourcify/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/lib/sourcify/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/lib/sourcify/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/lib/sourcify/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/lib/sourcify/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/lib/sourcify/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/lib/sourcify/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/lib/sourcify/spec/method/spec_helper.rb

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

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