pry 0.9.12.2 → 0.14.2

data/spec/method_spec.rb

@@ -1,482 +0,0 @@
-require 'helper'
-require 'set'
-
-describe Pry::Method do
-  it "should use String names for compatibility" do
-    klass = Class.new { def hello; end }
-    Pry::Method.new(klass.instance_method(:hello)).name.should == "hello"
-  end
-
-  describe ".from_str" do
-    it 'should look up instance methods if no methods available and no options provided' do
-      klass = Class.new { def hello; end }
-      meth = Pry::Method.from_str(:hello, Pry.binding_for(klass))
-      meth.should == klass.instance_method(:hello)
-    end
-
-    it 'should look up methods if no instance methods available and no options provided' do
-      klass = Class.new { def self.hello; end }
-      meth = Pry::Method.from_str(:hello, Pry.binding_for(klass))
-      meth.should == klass.method(:hello)
-    end
-
-    it 'should look up instance methods first even if methods available and no options provided' do
-      klass = Class.new { def hello; end; def self.hello; end  }
-      meth = Pry::Method.from_str(:hello, Pry.binding_for(klass))
-      meth.should == klass.instance_method(:hello)
-    end
-
-    it 'should look up instance methods if "instance-methods"  option provided' do
-      klass = Class.new { def hello; end; def self.hello; end  }
-      meth = Pry::Method.from_str(:hello, Pry.binding_for(klass), {"instance-methods" => true})
-      meth.should == klass.instance_method(:hello)
-    end
-
-    it 'should look up methods if :methods  option provided' do
-      klass = Class.new { def hello; end; def self.hello; end  }
-      meth = Pry::Method.from_str(:hello, Pry.binding_for(klass), {:methods => true})
-      meth.should == klass.method(:hello)
-    end
-
-    it 'should look up instance methods using the Class#method syntax' do
-      klass = Class.new { def hello; end; def self.hello; end  }
-      meth = Pry::Method.from_str("klass#hello", Pry.binding_for(binding))
-      meth.should == klass.instance_method(:hello)
-    end
-
-    it 'should look up methods using the object.method syntax' do
-      klass = Class.new { def hello; end; def self.hello; end  }
-      meth = Pry::Method.from_str("klass.hello", Pry.binding_for(binding))
-      meth.should == klass.method(:hello)
-    end
-
-    it 'should NOT look up instance methods using the Class#method syntax if no instance methods defined' do
-      klass = Class.new { def self.hello; end  }
-      meth = Pry::Method.from_str("klass#hello", Pry.binding_for(binding))
-      meth.should == nil
-    end
-
-    it 'should NOT look up methods using the object.method syntax if no methods defined' do
-      klass = Class.new { def hello; end  }
-      meth = Pry::Method.from_str("klass.hello", Pry.binding_for(binding))
-      meth.should == nil
-    end
-
-    it 'should look up methods using klass.new.method syntax' do
-      klass = Class.new { def hello; :hello; end }
-      meth = Pry::Method.from_str("klass.new.hello", Pry.binding_for(binding))
-      meth.name.should == "hello"
-    end
-
-    it 'should look up instance methods using klass.meth#method syntax' do
-      klass = Class.new { def self.meth; Class.new; end }
-      meth = Pry::Method.from_str("klass.meth#initialize", Pry.binding_for(binding))
-      meth.name.should == "initialize"
-    end
-
-    it 'should look up methods using instance::bar syntax' do
-      klass = Class.new{ def self.meth; Class.new; end }
-      meth = Pry::Method.from_str("klass::meth", Pry.binding_for(binding))
-      meth.name.should == "meth"
-    end
-
-    it 'should not raise an exception if receiver does not exist' do
-      lambda { Pry::Method.from_str("random_klass.meth", Pry.binding_for(binding)) }.should.not.raise
-    end
-  end
-
-  describe '.from_binding' do
-    it 'should be able to pick a method out of a binding' do
-      Pry::Method.from_binding(Class.new{ def self.foo; binding; end }.foo).name.should == "foo"
-    end
-
-    it 'should NOT find a method from the toplevel binding' do
-      Pry::Method.from_binding(TOPLEVEL_BINDING).should == nil
-    end
-
-    it "should find methods that have been undef'd" do
-      c = Class.new do
-        def self.bar
-          class << self; undef bar; end
-          binding
-        end
-      end
-
-      m = Pry::Method.from_binding(c.bar)
-      m.name.should == "bar"
-    end
-
-    # Our source_location trick doesn't work, due to https://github.com/rubinius/rubinius/issues/953
-    unless Pry::Helpers::BaseHelpers.rbx?
-       it 'should find the super method correctly' do
-        a = Class.new{ def gag33; binding; end; def self.line; __LINE__; end }
-        b = Class.new(a){ def gag33; super; end }
-
-        g = b.new.gag33
-        m = Pry::Method.from_binding(g)
-
-        m.owner.should == a
-        m.source_line.should == a.line
-        m.name.should == "gag33"
-      end
-    end
-
-    it 'should find the right method if a super method exists' do
-      a = Class.new{ def gag; binding; end; }
-      b = Class.new(a){ def gag; super; binding; end; def self.line; __LINE__; end }
-
-      m = Pry::Method.from_binding(b.new.gag)
-
-      m.owner.should == b
-      m.source_line.should == b.line
-      m.name.should == "gag"
-    end
-
-    if defined?(BasicObject) && !Pry::Helpers::BaseHelpers.rbx? # rubinius issue 1921
-      it "should find the right method from a BasicObject" do
-        a = Class.new(BasicObject) { def gag; ::Kernel.binding; end; def self.line; __LINE__; end }
-
-        m = Pry::Method.from_binding(a.new.gag)
-        m.owner.should == a
-        m.source_file.should == __FILE__
-        m.source_line.should == a.line
-      end
-    end
-
-    it 'should find the right method even if it was renamed and replaced' do
-      o = Object.new
-      class << o
-        def borscht
-          "nips"
-          binding
-        end
-        alias paella borscht
-        def borscht() paella end
-      end
-
-      m = Pry::Method.from_binding(o.borscht)
-      m.source.should == Pry::Method(o.method(:paella)).source
-    end
-  end
-
-  describe 'super' do
-    it 'should be able to find the super method on a bound method' do
-      a = Class.new{ def rar; 4; end }
-      b = Class.new(a){ def rar; super; end }
-
-      obj = b.new
-
-      zuper = Pry::Method(obj.method(:rar)).super
-      zuper.owner.should == a
-      zuper.receiver.should == obj
-    end
-
-    it 'should be able to find the super method of an unbound method' do
-      a = Class.new{ def rar; 4; end }
-      b = Class.new(a){ def rar; super; end }
-
-      zuper = Pry::Method(b.instance_method(:rar)).super
-      zuper.owner.should == a
-    end
-
-    it 'should return nil if no super method exists' do
-      a = Class.new{ def rar; super; end }
-
-      Pry::Method(a.instance_method(:rar)).super.should == nil
-    end
-
-    it 'should be able to find super methods defined on modules' do
-      m = Module.new{ def rar; 4; end }
-      a = Class.new{ def rar; super; end; include m }
-
-      zuper = Pry::Method(a.new.method(:rar)).super
-      zuper.owner.should == m
-    end
-
-    it 'should be able to find super methods defined on super-classes when there are modules in the way' do
-      a = Class.new{ def rar; 4; end }
-      m = Module.new{ def mooo; 4; end }
-      b = Class.new(a){ def rar; super; end; include m }
-
-      zuper = Pry::Method(b.new.method(:rar)).super
-      zuper.owner.should == a
-    end
-
-    it 'should be able to jump up multiple levels of bound method, even through modules' do
-      a = Class.new{ def rar; 4; end }
-      m = Module.new{ def rar; 4; end }
-      b = Class.new(a){ def rar; super; end; include m }
-
-      zuper = Pry::Method(b.new.method(:rar)).super
-      zuper.owner.should == m
-      zuper.super.owner.should == a
-    end
-  end
-
-  describe 'all_from_class' do
-    def should_find_method(name)
-      Pry::Method.all_from_class(@class).map(&:name).should.include(name)
-    end
-
-    it 'should be able to find public instance methods defined in a class' do
-      @class = Class.new{ def meth; 1; end }
-      should_find_method('meth')
-    end
-
-    it 'should be able to find private and protected instance methods defined in a class' do
-      @class = Class.new { protected; def prot; 1; end; private; def priv; 1; end }
-      should_find_method('priv')
-      should_find_method('prot')
-    end
-
-    it 'should find methods all the way up to Kernel' do
-      @class = Class.new
-      should_find_method('exit!')
-    end
-
-    it 'should be able to find instance methods defined in a super-class' do
-      @class = Class.new(Class.new{ def meth; 1; end }) {}
-      should_find_method('meth')
-    end
-
-    it 'should be able to find instance methods defined in modules included into this class' do
-      @class = Class.new{ include Module.new{ def meth; 1; end; } }
-      should_find_method('meth')
-    end
-
-    it 'should be able to find instance methods defined in modules included into super-classes' do
-      @class = Class.new(Class.new{ include Module.new{ def meth; 1; end; } })
-      should_find_method('meth')
-    end
-
-    it 'should attribute overridden methods to the sub-class' do
-      @class = Class.new(Class.new{ include Module.new{ def meth; 1; end; } }) { def meth; 2; end }
-      Pry::Method.all_from_class(@class).detect{ |x| x.name == 'meth' }.owner.should == @class
-    end
-
-    it 'should be able to find methods defined on a singleton class' do
-      @class = (class << Object.new; def meth; 1; end; self; end)
-      should_find_method('meth')
-    end
-
-    it 'should be able to find methods on super-classes when given a singleton class' do
-      @class = (class << Class.new{ def meth; 1; end}.new; self; end)
-      should_find_method('meth')
-    end
-  end
-
-  describe 'all_from_obj' do
-    describe 'on normal objects' do
-      def should_find_method(name)
-        Pry::Method.all_from_obj(@obj).map(&:name).should.include(name)
-      end
-
-      it "should find methods defined in the object's class" do
-        @obj = Class.new{ def meth; 1; end }.new
-        should_find_method('meth')
-      end
-
-      it "should find methods defined in modules included into the object's class" do
-        @obj = Class.new{ include Module.new{ def meth; 1; end } }.new
-        should_find_method('meth')
-      end
-
-      it "should find methods defined in the object's singleton class" do
-        @obj = Object.new
-        class << @obj; def meth; 1; end; end
-        should_find_method('meth')
-      end
-
-      it "should find methods in modules included into the object's singleton class" do
-        @obj = Object.new
-        @obj.extend Module.new{ def meth; 1; end }
-        should_find_method('meth')
-      end
-
-      it "should find methods all the way up to Kernel" do
-        @obj = Object.new
-        should_find_method('exit!')
-      end
-
-      it "should not find methods defined on the classes singleton class" do
-        @obj = Class.new{ class << self; def meth; 1; end; end }.new
-        Pry::Method.all_from_obj(@obj).map(&:name).should.not.include('meth')
-      end
-
-      it "should work in the face of an overridden send" do
-        @obj = Class.new{ def meth; 1; end; def send; raise EOFError; end }.new
-        should_find_method('meth')
-      end
-    end
-
-    describe 'on classes' do
-      def should_find_method(name)
-        Pry::Method.all_from_obj(@class).map(&:name).should.include(name)
-      end
-
-      it "should find methods defined in the class' singleton class" do
-        @class = Class.new{ class << self; def meth; 1; end; end }
-        should_find_method('meth')
-      end
-
-      it "should find methods defined on modules extended into the class" do
-        @class = Class.new{ extend Module.new{ def meth; 1; end; } }
-        should_find_method('meth')
-      end
-
-      it "should find methods defined on the singleton class of super-classes" do
-        @class = Class.new(Class.new{ class << self; def meth; 1; end; end })
-        should_find_method('meth')
-      end
-
-      it "should not find methods defined within the class" do
-        @class = Class.new{ def meth; 1; end }
-        Pry::Method.all_from_obj(@obj).map(&:name).should.not.include('meth')
-      end
-
-      it "should find methods defined on Class" do
-        @class = Class.new
-        should_find_method('allocate')
-      end
-
-      it "should find methods defined on Kernel" do
-        @class = Class.new
-        should_find_method('exit!')
-      end
-
-      it "should attribute overridden methods to the sub-class' singleton class" do
-        @class = Class.new(Class.new{ class << self; def meth; 1; end; end }) { class << self; def meth; 1; end; end }
-        Pry::Method.all_from_obj(@class).detect{ |x| x.name == 'meth' }.owner.should == (class << @class; self; end)
-      end
-
-      it "should attrbute overridden methods to the class not the module" do
-        @class = Class.new { class << self; def meth; 1; end; end; extend Module.new{ def meth; 1; end; } }
-        Pry::Method.all_from_obj(@class).detect{ |x| x.name == 'meth' }.owner.should == (class << @class; self; end)
-      end
-
-      it "should attribute overridden methods to the relevant singleton class in preference to Class" do
-        @class = Class.new { class << self; def allocate; 1; end; end }
-        Pry::Method.all_from_obj(@class).detect{ |x| x.name == 'allocate' }.owner.should == (class << @class; self; end)
-      end
-    end
-
-    describe 'method resolution order' do
-      module LS
-        class Top; end
-
-        class Next < Top; end
-
-        module M; end
-        module N; include M; end
-        module O; include M; end
-        module P; end
-
-        class Low < Next; include N; include P; end
-        class Lower < Low; extend N; end
-        class Bottom < Lower; extend O; end
-      end
-
-      def singleton_class(obj); class << obj; self; end; end
-
-      it "should look at a class and then its superclass" do
-        Pry::Method.instance_resolution_order(LS::Next).should == [LS::Next] + Pry::Method.instance_resolution_order(LS::Top)
-      end
-
-      it "should include the included modules between a class and its superclass" do
-        Pry::Method.instance_resolution_order(LS::Low).should == [LS::Low, LS::P, LS::N, LS::M] + Pry::Method.instance_resolution_order(LS::Next)
-      end
-
-      it "should not include modules extended into the class" do
-        Pry::Method.instance_resolution_order(LS::Bottom).should == [LS::Bottom] + Pry::Method.instance_resolution_order(LS::Lower)
-      end
-
-      it "should include included modules for Modules" do
-        Pry::Method.instance_resolution_order(LS::O).should == [LS::O, LS::M]
-      end
-
-      it "should include the singleton class of objects" do
-        obj = LS::Low.new
-        Pry::Method.resolution_order(obj).should == [singleton_class(obj)] + Pry::Method.instance_resolution_order(LS::Low)
-      end
-
-      it "should not include singleton classes of numbers" do
-        Pry::Method.resolution_order(4).should == Pry::Method.instance_resolution_order(Fixnum)
-      end
-
-      it "should include singleton classes for classes" do
-        Pry::Method.resolution_order(LS::Low).should == [singleton_class(LS::Low)] + Pry::Method.resolution_order(LS::Next)
-      end
-
-      it "should include modules included into singleton classes" do
-        Pry::Method.resolution_order(LS::Lower).should == [singleton_class(LS::Lower), LS::N, LS::M] + Pry::Method.resolution_order(LS::Low)
-      end
-
-      it "should include modules at most once" do
-        Pry::Method.resolution_order(LS::Bottom).count(LS::M).should == 1
-      end
-
-      it "should include modules at the point which they would be reached" do
-        Pry::Method.resolution_order(LS::Bottom).should == [singleton_class(LS::Bottom), LS::O] + (Pry::Method.resolution_order(LS::Lower))
-      end
-
-      it "should include the Pry::Method.instance_resolution_order of Class after the singleton classes" do
-        Pry::Method.resolution_order(LS::Top).should ==
-          [singleton_class(LS::Top), singleton_class(Object), (defined? BasicObject) && singleton_class(BasicObject)].compact +
-          Pry::Method.instance_resolution_order(Class)
-      end
-    end
-  end
-
-  describe 'method_name_from_first_line' do
-    it 'should work in all simple cases' do
-      meth = Pry::Method.new(nil)
-      meth.send(:method_name_from_first_line, "def x").should == "x"
-      meth.send(:method_name_from_first_line, "def self.x").should == "x"
-      meth.send(:method_name_from_first_line, "def ClassName.x").should == "x"
-      meth.send(:method_name_from_first_line, "def obj_name.x").should == "x"
-    end
-  end
-
-  describe 'method aliases' do
-    before do
-      @class = Class.new {
-        def eat
-        end
-
-        alias fress eat
-        alias_method :omnomnom, :fress
-
-        def eruct
-        end
-      }
-    end
-
-    it 'should be able to find method aliases' do
-      meth = Pry::Method(@class.new.method(:eat))
-      aliases = Set.new(meth.aliases)
-
-      aliases.should == Set.new(["fress", "omnomnom"])
-    end
-
-    it 'should return an empty Array if cannot find aliases' do
-      meth = Pry::Method(@class.new.method(:eruct))
-      meth.aliases.should.be.empty
-    end
-
-    it 'should not include the own name in the list of aliases' do
-      meth = Pry::Method(@class.new.method(:eat))
-      meth.aliases.should.not.include "eat"
-    end
-
-    unless Pry::Helpers::BaseHelpers.mri_18?
-      # Ruby 1.8 doesn't support this feature.
-      it 'should be able to find aliases for methods implemented in C' do
-        meth = Pry::Method(Hash.new.method(:key?))
-        aliases = Set.new(meth.aliases)
-
-        aliases.should == Set.new(["include?", "member?", "has_key?"])
-      end
-    end
-
-  end
-end

data/spec/prompt_spec.rb

@@ -1,60 +0,0 @@
-require 'helper'
-
-describe "Prompts" do
-  describe "one-parameter prompt proc" do
-    it 'should get full config object' do
-      config = nil
-      redirect_pry_io(InputTester.new("exit-all")) do
-        Pry.start(self, :prompt => proc { |v| config = v })
-      end
-      config.is_a?(OpenStruct).should == true
-    end
-
-    it 'should get full config object, when using a proc array' do
-      config1 = nil
-      redirect_pry_io(InputTester.new("exit-all")) do
-        Pry.start(self, :prompt => [proc { |v| config1 = v }, proc { |v| config2 = v }])
-      end
-      config1.is_a?(OpenStruct).should == true
-    end
-
-    it 'should receive correct data in the config object' do
-      config = nil
-      redirect_pry_io(InputTester.new("def hello", "exit-all")) do
-        Pry.start(self, :prompt => proc { |v| config = v })
-      end
-      config.eval_string.should =~ /def hello/
-      config.nesting_level.should == 0
-      config.expr_number.should == 1
-      config.cont.should == true
-      config._pry_.is_a?(Pry).should == true
-      config.object.should == self
-    end
-  end
-
-  describe "BACKWARDS COMPATIBILITY: 3 parameter prompt proc" do
-    it 'should get 3 parameters' do
-      o = n = p = nil
-      redirect_pry_io(InputTester.new("exit-all")) do
-        Pry.start(:test, :prompt => proc { |obj, nesting, _pry_|
-                    o, n, p = obj, nesting, _pry_ })
-      end
-      o.should == :test
-      n.should == 0
-      p.is_a?(Pry).should == true
-    end
-
-    it 'should get 3 parameters, when using proc array' do
-      o1 = n1 = p1 = nil
-      redirect_pry_io(InputTester.new("exit-all")) do
-        Pry.start(:test, :prompt => [proc { |obj, nesting, _pry_|
-                                       o1, n1, p1 = obj, nesting, _pry_ },
-                                     proc { |obj, nesting, _pry_|
-                                       o2, n2, p2 = obj, nesting, _pry_ }])
-      end
-      o1.should == :test
-      n1.should == 0
-      p1.is_a?(Pry).should == true
-    end
-  end
-end