rcodetools 0.4.0.0

data/test/data/add_markers-input.rb

@@ -0,0 +1,2 @@
+1+1
+2+3

data/test/data/add_markers-output.rb

@@ -0,0 +1,2 @@
+1+1                                                # =>
+2+3                                                # =>

data/test/data/bindings-input.rb

@@ -0,0 +1,26 @@
+
+require 'test/unit'
+
+class TestFoo < Test::Unit::TestCase
+  def setup
+    @o = []
+  end
+
+  def test_foo
+    a = 1
+    b = a
+    b                                              # =>
+  end
+
+  def test_arr
+    last = 1
+    @o << last
+    @o.last                                        # =>
+  end
+
+  def test_bar
+    a = b = c = 1
+    d = a
+    d                                              # =>
+  end
+end

data/test/data/bindings-output.rb

@@ -0,0 +1,31 @@
+
+require 'test/unit'
+
+class TestFoo < Test::Unit::TestCase
+  def setup
+    @o = []
+  end
+
+  def test_foo
+    a = 1
+    b = a
+    assert_equal a, b
+    assert_equal 1, b
+  end
+
+  def test_arr
+    last = 1
+    @o << last
+    assert_equal last, @o.last
+    assert_equal 1, @o.last
+  end
+
+  def test_bar
+    a = b = c = 1
+    d = a
+    assert_equal a, d
+    assert_equal b, d
+    assert_equal c, d
+    assert_equal 1, d
+  end
+end

data/test/data/completion-input.rb

@@ -0,0 +1 @@
+Array.new(3).uni

data/test/data/completion-output.rb

@@ -0,0 +1,2 @@
+uniq
+uniq!

data/test/data/completion_emacs-input.rb

@@ -0,0 +1 @@
+Array.new(3).uni

data/test/data/completion_emacs-output.rb

@@ -0,0 +1,5 @@
+(progn
+(setq rct-method-completion-table '(("uniq") ("uniq!") ))
+(setq pattern "uni")
+(try-completion pattern rct-method-completion-table nil)
+)

data/test/data/completion_emacs_icicles-input.rb

@@ -0,0 +1 @@
+Array.new(3).uni

data/test/data/completion_emacs_icicles-output.rb

@@ -0,0 +1,5 @@
+(progn
+(setq rct-method-completion-table '(("uniq") ("uniq!") ))
+(setq pattern "uni")
+(setq klass "Array")
+)

data/test/data/doc-input.rb

@@ -0,0 +1 @@
+[].length

data/test/data/doc-output.rb

@@ -0,0 +1 @@
+Array#length

data/test/data/method_analyzer-data.rb

@@ -0,0 +1,33 @@
+
+class A
+  def A.foo
+    1
+  end
+
+  def a
+    1+1
+  end
+end
+class B < A
+  def initialize
+  end
+  attr_accessor :bb
+  
+  def b
+    "a".length
+  end
+end
+tm = Time.now
+[tm.year, tm.month, tm.day] << 0
+a = A.new
+a.a
+b = B.new
+b.a
+b.b
+[b.a,b.b]
+z = b.a + b.b
+A.foo
+B.foo
+b.bb=1
+b.bb
+

data/test/data/method_args.data.rb

@@ -0,0 +1,106 @@
+# method_args.data.rb
+class FixedArgsMethods
+  def self.singleton(a1) end
+  def initialize(arg) end
+  def f(a1) end
+  def b(a1,&block) end
+  define_method(:defmethod) {|a1|}
+  attr_accessor :by_attr_accessor
+  attr :by_attr_false
+  attr :by_attr_true, true
+  attr_reader :by_attr_reader_1, :by_attr_reader_2
+  attr_writer :by_attr_writer
+  def private_meth(x) end
+  private :private_meth
+  class << self
+    attr_accessor :singleton_attr_accessor
+    define_method(:singleton_defmethod){|a2|}
+  end
+end
+
+module VariableArgsMethods
+  def s(a1,*splat) end
+  def sb(a1,*splat, &block) end
+  def d(a1,default=nil) end
+  def ds(a1,default=nil,*splat) end
+  def dsb(a1,default=nil,*splat,&block) end
+  def db(a1,default=nil,&block) end
+end
+
+class Fixnum
+  def method_in_Fixnum(arg1, arg2) end
+  def self.singleton_method_in_Fixnum(arg1, arg2) end
+end
+class Bignum
+  def method_in_Bignum(arg1, arg2) end
+end
+class Float
+  def method_in_Float(arg1, arg2) end
+end
+class Symbol
+  def method_in_Symbol(arg1, arg2) end
+end
+class Binding
+  def method_in_Binding(arg1, arg2) end
+end
+class UnboundMethod
+  def method_in_UnboundMethod(arg1, arg2) end
+end
+class Method
+  def method_in_Method(arg1, arg2) end
+end
+class Proc
+  def method_in_Proc(arg1, arg2) end
+end
+class Continuation
+  def method_in_Continuation(arg1, arg2) end
+end
+class Thread
+  def method_in_Thread(arg1, arg2) end
+end
+# FIXME mysterious
+# class FalseClass
+#   def method_in_FalseClass(arg1, arg2) end
+# end
+class TrueClass
+  def method_in_TrueClass(arg1, arg2) end
+end
+class NilClass
+  def method_in_NilClass(arg1, arg2) end
+end
+class Struct
+  def method_in_Struct(arg1, arg2) end
+end
+
+require 'digest'
+class Digest::Base
+  def method_in_Digest_Base(arg1, arg2) end
+end
+
+class AnAbstractClass
+  $__method_args_off = true
+  def self.allocate
+    raise NotImplementedError, "#{self} is an abstract class."
+  end
+  $__method_args_off = false
+
+  def method_in_AnAbstractClass(arg1, arg2)
+  end
+
+end
+
+class AClass
+  include VariableArgsMethods
+  extend VariableArgsMethods
+end
+
+class ASubClass < AClass
+end
+
+StructA = Struct.new :a, :b
+class SubclassOfStructA < StructA
+  attr :method_in_b
+end
+class StructSubclass < Struct.new(:c)
+  attr :method_in_c
+end

data/test/data/no_warnings-input.rb

@@ -0,0 +1,3 @@
+A = 1
+A = 1
+p (1)

data/test/data/no_warnings-output.rb

@@ -0,0 +1,4 @@
+A = 1
+A = 1
+p (1)
+# >> 1

data/test/data/refe-input.rb

@@ -0,0 +1 @@
+[].length

data/test/data/refe-output.rb

@@ -0,0 +1 @@
+refe 'Array#length'

data/test/data/ri-input.rb

@@ -0,0 +1 @@
+[].length

data/test/data/ri-output.rb

@@ -0,0 +1 @@
+ri 'Array#length'

data/test/data/ri_emacs-input.rb

@@ -0,0 +1 @@
+[].length

data/test/data/ri_emacs-output.rb

@@ -0,0 +1 @@
+(rct-find-tag-or-ri "Array#length")

data/test/data/ri_vim-input.rb

@@ -0,0 +1 @@
+[].length

data/test/data/ri_vim-output.rb

@@ -0,0 +1 @@
+call RCT_find_tag_or_ri("Array#length")

data/test/data/rspec-input.rb

@@ -0,0 +1,48 @@
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1
+end
+
+
+context "Testing xmpfilter's expectation expansion" do
+  setup do
+    @o = X.new
+  end
+
+  specify "Should expand should_equal expectations" do
+    @o.foo(true)   # =>
+    @o.foo(true).a # =>
+    @o.foo(false)  # =>
+  end
+  
+  specify "Should expand should_raise expectations" do
+    @o.bar         # =>
+  end
+
+  specify "Should expand should_be_nil expectations" do
+    @o.baz         # =>
+  end
+
+  specify "Should expand correct expectations for complex values" do
+    @o.babar       # =>
+  end
+
+  specify "Should expand should_be_close expectations" do
+    @o.fubar(10)   # =>
+  end
+end
+
+context "Testing binding" do
+  specify "Should expand should_equal expectations" do
+    a = b = c = 1
+    d = a
+    d                                              # =>
+  end
+end

data/test/data/rspec-output.rb

@@ -0,0 +1,52 @@
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1 # !> already initialized constant A
+end
+
+
+context "Testing xmpfilter's expectation expansion" do
+  setup do
+    @o = X.new
+  end
+
+  specify "Should expand should_equal expectations" do
+    (@o.foo(true)).should_be_a_kind_of X::Y
+    (@o.foo(true).inspect).should_equal "#<struct X::Y a=2>"
+    (@o.foo(true).a).should_equal 2
+    (@o.foo(false)).should_equal 2
+  end
+  
+  specify "Should expand should_raise expectations" do
+    lambda{@o.bar}.should_raise RuntimeError
+  end
+
+  specify "Should expand should_be_nil expectations" do
+    (@o.baz).should_be_nil
+  end
+
+  specify "Should expand correct expectations for complex values" do
+    (@o.babar).should_equal [1, 2]
+  end
+
+  specify "Should expand should_be_close expectations" do
+    (@o.fubar(10)).should_be_close 101.0, 0.0001
+  end
+end
+
+context "Testing binding" do
+  specify "Should expand should_equal expectations" do
+    a = b = c = 1
+    d = a
+    (d).should_equal a
+    (d).should_equal b
+    (d).should_equal c
+    (d).should_equal 1
+  end
+end

data/test/data/rspec_poetry-input.rb

@@ -0,0 +1,48 @@
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1
+end
+
+
+context "Testing xmpfilter's expectation expansion" do
+  setup do
+    @o = X.new
+  end
+
+  specify "Should expand should_equal expectations" do
+    @o.foo(true)   # =>
+    @o.foo(true).a # =>
+    @o.foo(false)  # =>
+  end
+  
+  specify "Should expand should_raise expectations" do
+    @o.bar         # =>
+  end
+
+  specify "Should expand should_be_nil expectations" do
+    @o.baz         # =>
+  end
+
+  specify "Should expand correct expectations for complex values" do
+    @o.babar       # =>
+  end
+
+  specify "Should expand should_be_close expectations" do
+    @o.fubar(10)   # =>
+  end
+end
+
+context "Testing binding" do
+  specify "Should expand should_equal expectations" do
+    a = b = c = 1
+    d = a
+    d                                              # =>
+  end
+end

data/test/data/rspec_poetry-output.rb

@@ -0,0 +1,52 @@
+
+class X
+  Y = Struct.new(:a)
+  def foo(b); b ? Y.new(2) : 2 end
+  def bar; raise "No good" end
+  def baz; nil end
+  def fubar(x); x ** 2.0 + 1 end
+  def babar; [1,2] end
+  A = 1
+  A = 1 # !> already initialized constant A
+end
+
+
+context "Testing xmpfilter's expectation expansion" do
+  setup do
+    @o = X.new
+  end
+
+  specify "Should expand should_equal expectations" do
+    @o.foo(true).should_be_a_kind_of X::Y
+    @o.foo(true).inspect.should_equal "#<struct X::Y a=2>"
+    @o.foo(true).a.should_equal 2
+    @o.foo(false).should_equal 2
+  end
+  
+  specify "Should expand should_raise expectations" do
+    lambda{@o.bar}.should_raise RuntimeError
+  end
+
+  specify "Should expand should_be_nil expectations" do
+    @o.baz.should_be_nil
+  end
+
+  specify "Should expand correct expectations for complex values" do
+    @o.babar.should_equal [1, 2]
+  end
+
+  specify "Should expand should_be_close expectations" do
+    @o.fubar(10).should_be_close 101.0, 0.0001
+  end
+end
+
+context "Testing binding" do
+  specify "Should expand should_equal expectations" do
+    a = b = c = 1
+    d = a
+    d.should_equal a
+    d.should_equal b
+    d.should_equal c
+    d.should_equal 1
+  end
+end