live_ast 0.6.3 → 0.7.0

data/test/replace_eval_test.rb

@@ -0,0 +1,376 @@
+require_relative 'main'
+
+class ZZY_ReplaceEvalTest < ReplaceEvalTest
+  RESULT = {}
+
+  def setup
+    RESULT.clear
+  end
+
+  DEFINE_A = lambda do
+    class A
+      eval %{
+        def f(x, y)
+          x**y
+        end
+      }
+    end
+  end
+
+  def test_a_def_method
+    DEFINE_A.call
+    assert_equal binop_def(:f, :**), A.instance_method(:f).to_ast
+  end
+
+  DEFINE_B = lambda do
+    eval %{
+      class B
+        def f(x, y)
+          x / y
+        end
+      end
+    }
+  end
+
+  def test_def_class
+    DEFINE_B.call
+    assert_equal "ZZY_ReplaceEvalTest::B", B.name
+    assert_equal binop_def(:f, :/), B.instance_method(:f).to_ast
+  end
+
+  def moo
+    a = 22
+    binding
+  end
+
+  def test_binding_eval
+    assert_equal 22, moo.eval("a")
+    assert_equal 22, moo.eval("lambda { a }").call
+  end
+
+  DEFINE_P = lambda do
+    class P
+      eval %{
+        def f
+          @x = 33
+          RESULT[:old] = live_ast_original_eval("@x")
+          RESULT[:new] = eval("@x")
+        end
+      }
+    end
+  end
+
+  def test_const_lookup
+    DEFINE_P.call
+    P.new.f
+
+    assert_equal 33, RESULT[:old]
+    assert_equal 33, RESULT[:new]
+  end
+
+  def test_const_lookup_2
+    Class.new do
+      eval %{
+        def f
+          @x = 44
+          RESULT[:old] = live_ast_original_eval("@x")
+          RESULT[:new] = eval("@x")
+        end
+      }
+    end.new.f
+
+    assert_equal 44, RESULT[:old]
+    assert_equal 44, RESULT[:new]
+  end
+
+  DEFINE_QS = lambda do
+    class Q
+      class R
+        eval %{
+          def f
+            RESULT[:qr] = 55
+          end
+        }
+      end
+    end
+  
+    module S
+      class T
+        eval %{
+          def f
+            RESULT[:st] = 66
+          end
+        }
+      end
+    end
+  end
+  
+  def test_const_lookup_3
+    DEFINE_QS.call
+    Q::R.new.f
+    S::T.new.f
+    assert_equal 55, RESULT[:qr]
+    assert_equal 66, RESULT[:st]
+  end
+
+  def test_eval_arg_error
+    [[], (1..5).to_a].each do |args|
+      orig = assert_raises ArgumentError do
+        live_ast_original_eval(*args)
+      end
+      live = assert_raises ArgumentError do
+        eval(*args)
+      end
+      assert_equal orig.message, live.message
+    end
+  end
+
+  def test_singleton_eval_arg_error
+    [[], (1..5).to_a].each do |args|
+      orig = assert_raises ArgumentError do
+        Kernel.live_ast_original_singleton_eval(*args)
+      end
+      live = assert_raises ArgumentError do
+        Kernel.eval(*args)
+      end
+      assert_equal orig.message, live.message
+    end
+  end
+
+  def test_instance_eval_arg_error_no_block
+    [[], ('a'..'z').to_a].each do |args|
+      orig = assert_raises ArgumentError do
+        Object.new.live_ast_original_instance_eval(*args)
+      end
+      live = assert_raises ArgumentError do
+        Object.new.instance_eval(*args)
+      end
+      assert_equal orig.message, live.message
+    end
+
+    orig = assert_raises TypeError do
+      Object.new.live_ast_original_instance_eval(nil)
+    end
+    live = assert_raises TypeError do
+      Object.new.instance_eval(nil)
+    end
+    assert_equal orig.message, live.message
+
+    [[nil], [Object.new], [3], [4,3,2], (1..10).to_a].each do |args|
+      orig = assert_raises TypeError do
+        Object.new.live_ast_original_instance_eval(*args)
+      end
+      live = assert_raises TypeError do
+        Object.new.instance_eval(*args)
+      end
+      assert_equal orig.message, live.message
+    end
+  end
+
+  def test_instance_eval_arg_error_with_block
+    orig = assert_raises ArgumentError do
+      Object.new.live_ast_original_instance_eval(3,4,5) { }
+    end
+    live = assert_raises ArgumentError do
+      Object.new.instance_eval(3,4,5) { }
+    end
+    assert_equal orig.message, live.message
+  end
+
+  def test_instance_eval_block
+    orig = {}
+    orig.live_ast_original_instance_eval do
+      self[:x] = 33
+    end
+    assert_equal 33, orig[:x]
+
+    live = {}
+    live.instance_eval do
+      self[:x] = 44
+    end
+    assert_equal 44, live[:x]
+  end
+
+  def test_instance_eval_string
+    orig = {}
+    orig.live_ast_original_instance_eval %{
+      self[:x] = 33
+    }
+    assert_equal 33, orig[:x]
+
+    live = {}
+    live.instance_eval %{
+      self[:x] = 44
+    }
+    assert_equal 44, live[:x]
+  end
+
+  def test_instance_eval_binding
+    x = 33
+    orig = {}
+    orig.live_ast_original_instance_eval %{
+      self[:x] = x
+      self[:f] = lambda { "f" }
+    }
+    assert_equal x, orig[:x]
+
+    y = 44
+    live = {}
+    live.instance_eval %{
+      self[:y] = y
+      self[:g] = lambda { "g" }
+    }
+    assert_equal y, live[:y]
+    
+    assert_equal no_arg_block(:lambda, "g"), live[:g].to_ast
+  end
+
+  def test_module_eval_block
+    orig = Module.new
+    orig.live_ast_original_module_eval do
+      def f
+        "orig"
+      end
+    end
+    orig.instance_method(:f)
+
+    live = Module.new
+    live.module_eval do
+      def f
+        "live"
+      end
+    end
+    assert_equal no_arg_def(:f, "live"),
+                 live.instance_method(:f).to_ast
+  end
+
+  def test_module_eval_string
+    orig = Module.new
+    orig.live_ast_original_module_eval %{
+      def f
+        "orig"
+      end
+    }
+    orig.instance_method(:f)
+
+    live = Module.new
+    live.module_eval %{
+      def h
+        "live h"
+      end
+    }
+    assert_equal no_arg_def(:h, "live h"),
+                 live.instance_method(:h).to_ast
+  end
+
+  def test_module_eval_binding
+    x = 33
+    orig = Class.new
+    orig.live_ast_original_module_eval %{
+      define_method :value do
+        x
+      end
+      define_method :f do
+        lambda { }
+      end
+    }
+    assert_equal 33, orig.new.value
+    assert orig.new.f.is_a?(Proc)
+
+    y = 44
+    live = Class.new
+    live.module_eval %{
+      define_method :value do
+        y
+      end
+      define_method :g do
+        lambda { "g return" }
+      end
+    }
+    assert_equal 44, live.new.value
+    assert live.new.g.is_a?(Proc)
+
+    assert_equal no_arg_block(:lambda, "g return"),
+                 live.new.g.to_ast
+  end
+
+  def test_module_eval_file_line
+    klass = Module.new
+
+    orig =
+      klass.live_ast_original_module_eval("[__FILE__, __LINE__]", "test", 102)
+    live =
+      klass.module_eval("[__FILE__, __LINE__]", "test", 102)
+
+    unfixable do
+      assert_equal orig, live
+    end
+    
+    live.first.sub!(/#{Regexp.quote LiveAST::Linker::REVISION_TOKEN}.*\Z/, "")
+    assert_equal orig, live
+    assert_equal ["test", 102], live
+  end
+
+  def test_module_eval_to_str
+    file = MiniTest::Mock.new
+    file.expect(:to_str, "zebra.rb")
+    Class.new.module_eval("33 + 44", file)
+    file.verify
+  end
+
+  def test_eval_not_hosed
+    assert_equal 3, eval("1 + 2")
+    1.times do
+      assert_equal 3, eval("1 + 2")
+    end
+
+    assert_equal(3, eval(%{ eval("1 + 2") }))
+    1.times do
+      assert_equal(3, eval(%{ eval("1 + 2") }))
+    end
+
+    x = 5
+    eval %{
+      assert_equal(3, eval(%{ eval("1 + 2") }))
+      x = 6
+    }
+    assert_equal 6, x
+  end
+
+  def test_local_var_collision
+    args = 33
+
+    assert_equal 33, live_ast_original_eval("args")
+    assert_equal 33, eval("args")
+
+    assert_equal 33, Kernel.live_ast_original_singleton_eval("args")
+    assert_equal 33, Kernel.eval("args")
+
+    assert_equal 33, binding.live_ast_original_binding_eval("args")
+    assert_equal 33, binding.eval("args")
+
+    assert_equal 33, Object.new.live_ast_original_instance_eval("args")
+    assert_equal 33, Object.new.instance_eval("args")
+
+    assert_equal 33, Class.new.live_ast_original_module_eval("args")
+    assert_equal 33, Class.new.module_eval("args")
+
+    assert_equal 33, Class.new.live_ast_original_instance_eval("args")
+    assert_equal 33, Class.new.instance_eval("args")
+  end
+
+  def test_location_without_binding
+    expected = ["(eval)", 2]
+
+    assert_equal expected, live_ast_original_eval("\n[__FILE__, __LINE__]")
+
+    unfixable do
+      assert_equal expected, eval("\n[__FILE__, __LINE__]")
+    end
+
+    file, line = eval("\n[__FILE__, __LINE__]")
+    file = LiveAST.strip_token file
+
+    assert_equal expected, [file, line]
+  end
+end

data/test/rubyspec_test.rb

@@ -0,0 +1,28 @@
+require_relative 'main'
+require_relative '../devel/levitate'
+
+class ZZZ_RubySpecTest < ReplaceEvalTest
+  def setup
+    super
+    puts "\n==== rubyspec"
+  end
+
+  FILES = [
+    'core/basicobject/instance_eval_spec.rb',
+    'core/binding/eval_spec.rb',
+    'core/kernel/eval_spec.rb',
+    'core/kernel/instance_eval_spec.rb',
+    'core/module/class_eval_spec.rb',
+    'core/module/module_eval_spec.rb',
+  ]
+
+  def test_rubyspec
+    Dir.chdir(ENV["RUBYSPEC_HOME"] || "../rubyspec") do
+      FILES.each do |file|
+        cmd = %w[mspec -I../live_ast/lib -t] + [Levitate::Ruby.executable, file]
+        assert system(*cmd)
+      end
+    end
+  end
+end if ENV["LIVE_AST_RUBYSPEC"]
+

metadata

@@ -2,7 +2,7 @@
 name: live_ast
 version: !ruby/object:Gem::Version 
   prerelease: 
-  version: 0.6.3
+  version: 0.7.0
 platform: ruby
 authors: 
 - James M. Lawrence
@@ -10,7 +10,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-03-09 00:00:00 -05:00
+date: 2011-03-15 00:00:00 -04:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -43,12 +43,15 @@ files:
 - lib/live_ast/ast_eval.rb
 - lib/live_ast/ast_load.rb
 - lib/live_ast/base.rb
+- lib/live_ast/common.rb
 - lib/live_ast/error.rb
 - lib/live_ast/evaler.rb
+- lib/live_ast/full.rb
 - lib/live_ast/irb_spy.rb
 - lib/live_ast/linker.rb
 - lib/live_ast/loader.rb
 - lib/live_ast/reader.rb
+- lib/live_ast/replace_eval.rb
 - lib/live_ast/replace_load.rb
 - lib/live_ast/replace_raise.rb
 - lib/live_ast/to_ast.rb
@@ -89,6 +92,8 @@ files:
 - test/recursive_eval_test.rb
 - test/redefine_method_test.rb
 - test/reload_test.rb
+- test/replace_eval_test.rb
+- test/rubyspec_test.rb
 - test/stdlib_test.rb
 - test/thread_test.rb
 - test/to_ast_feature_test.rb
@@ -104,14 +109,18 @@ rdoc_options:
 - --main
 - README.rdoc
 - --title
-- "LiveAST: Live Abstract Syntax Trees"
+- "live_ast: Live abstract syntax trees of methods and procs"
 - --exclude
 - lib/live_ast/ast_load.rb
 - --exclude
+- lib/live_ast/common.rb
+- --exclude
 - lib/live_ast/error.rb
 - --exclude
 - lib/live_ast/evaler.rb
 - --exclude
+- lib/live_ast/full.rb
+- --exclude
 - lib/live_ast/irb_spy.rb
 - --exclude
 - lib/live_ast/linker.rb
@@ -120,6 +129,8 @@ rdoc_options:
 - --exclude
 - lib/live_ast/reader.rb
 - --exclude
+- lib/live_ast/replace_eval.rb
+- --exclude
 - lib/live_ast/replace_load.rb
 - --exclude
 - lib/live_ast/replace_raise.rb
@@ -133,7 +144,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
-      version: "0"
+      version: 1.9.2
 required_rubygems_version: !ruby/object:Gem::Requirement 
   none: false
   requirements: 
@@ -143,9 +154,9 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.5.3
+rubygems_version: 1.6.2
 signing_key: 
 specification_version: 3
-summary: A pure Ruby library for obtaining live abstract syntax trees of methods and procs.
+summary: Live abstract syntax trees of methods and procs.
 test_files: []