rbx-trepanning 0.0.6-universal-rubinius-1.2 → 0.0.7-universal-rubinius-1.2

data/test/functional/test-finish.rb

@@ -42,7 +42,7 @@ class TestFinish < Test::Unit::TestCase
     def five; 5 end
     def something(x)
       return 1 if x <= 1
-      x = 
+      x =
         if five > 5
           24
         else
@@ -63,7 +63,7 @@ class TestFinish < Test::Unit::TestCase
            '-> ',
            'return 1 if x <= 1',
            '<- ',
-           '22', '22']
+           'x =', '22']
     compare_output(out, d, cmds)
   end
   

data/test/integration/.gitignore

@@ -0,0 +1,3 @@
+/*.out
+/*~
+/*.rbc

data/test/unit/.gitignore

@@ -0,0 +1,3 @@
+/*.rbc
+/*~
+

data/test/unit/cmd-helper.rb

@@ -9,6 +9,7 @@ require_relative '../../processor/frame'
 
 module UnitHelper
 
+  module_function
   def common_setup
     @dbg      = MockDebugger::MockDebugger.new(:nx => true)
     @cmdproc  = Trepan::CmdProcessor.new(@dbg)
@@ -33,13 +34,16 @@ module UnitHelper
     end
     reset_cmdproc_vars
   end
-  module_function :common_setup
+
+  def common_teardown
+    @cmdproc.finalize
+  end
   
   def reset_cmdproc_vars
     @cmdproc.instance_variable_set('@msgs', [])
     @cmdproc.instance_variable_set('@errmsgs', [])
   end
-  module_function :reset_cmdproc_vars
+
 end
 
 if __FILE__ == $0

data/test/unit/test-app-brkpt.rb

@@ -11,19 +11,21 @@ class TestAppBrkpt < Test::Unit::TestCase
     assert_equal(false, b1.temp?)
     assert_equal(0, b1.hits)
     assert_equal('B', b1.icon_char)
-    # assert_equal(true, b1.condition?)
-    # assert_equal(1, b1.hits)
-    # assert_equal(b1.source_container, tf.source_container)
+    assert_equal(true, b1.condition?(binding))
+    assert_equal(1, b1.hits)
     b1.enabled = false
+    assert_equal(false, b1.active?)
     assert_equal('b', b1.icon_char)
-    # assert_raises TypeError do 
-    #   Trepan::Breakpoint.new(iseq, iseq.iseq_size, :temp => true)
-    # end
-    # assert_raises TypeError do 
-    #   Trepan::Breakpoint.new(0, 5)
-    # end
-    # require_relative '../../lib/trepanning.rb'
-    b2 = Trepan::Breakpoint.new('temp brkpt', method, 2, 3, 0, :temp => true)
-    assert_equal('t', b2.icon_char)
+    assert_raises ArgumentError do 
+      b1.activate
+    end
+
+    b2 = Trepan::Breakpoint.new('<start>', method, 0, 2, 0)
+    b2.activate
+    assert_equal(true, b2.active?)
+    b2.remove!
+    assert_equal(false, b2.active?)
+    b3 = Trepan::Breakpoint.new('temp brkpt', method, 2, 3, 0, :temp => true)
+    assert_equal('t', b3.icon_char)
   end
 end

data/test/unit/test-app-complete.rb

@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+require 'test/unit'
+require 'rubygems'; require 'require_relative'
+require_relative '../../app/complete'
+
+class TestAppUtil < Test::Unit::TestCase
+  include Trepan::Complete
+  def test_complete
+    hash = {'ab' => 1, 'aac' => 2, 'aa' => 3, 'a' => 4}
+    ary = hash.keys.sort
+    [[[], 'b'], [ary, 'a'], [%w(aa aac), 'aa'], 
+     [ary, ''], [['ab'], 'ab'], [[], 'abc']].each do |result, prefix|
+      assert_equal(result, complete_token(ary, prefix),
+                   "Trouble matching #{ary}.inspect on #{prefix.inspect}")
+    end
+    [[ary, 'a'], [%w(aa aac), 'aa'], 
+     [['ab'], 'ab'], [[], 'abc']].each do |result_keys, prefix|
+      result = result_keys.map {|key| [key, hash[key]]}
+      assert_equal(result, complete_token_with_next(hash, prefix),
+                   "Trouble matching #{hash}.inspect on #{prefix.inspect}")
+    end
+    
+  end
+
+  def test_next_token
+    x = '  now is  the  time'
+    [[0, [ 5, 'now']], 
+     [2, [ 5, 'now']],
+     [5, [ 8, 'is']], 
+     [8, [13, 'the']],
+     [9, [13, 'the']],
+     [13, [19, 'time']],
+     [19, [19, '']],
+    ].each do |pos, expect|
+      assert_equal expect, next_token(x, pos)
+    end
+  end
+
+end

data/test/unit/test-app-condition.rb

@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+require 'stringio'
+require 'test/unit'
+require 'rubygems'; require 'require_relative'
+require_relative '../../app/condition'
+
+class TestAppCondition < Test::Unit::TestCase
+  include Trepan::Condition
+  
+  def test_basic
+    assert valid_condition?('1+2')
+    old_stderr = $stderr
+    new_stdout = StringIO.new
+    $stderr = new_stdout
+    assert_equal nil, valid_condition?('1+')
+    $stderr = old_stderr
+  end
+end

data/test/unit/test-app-options.rb

@@ -35,13 +35,20 @@ class TestAppOptions < Test::Unit::TestCase
   end
 
   def test_binary_opts
-    %w(nx).each do |name|
+    %w(nx readline).each do |name|
       setup
       o    = ["--#{name}"]
       rest = @opts.parse o
       assert_equal('', @stderr.string)
       assert_equal(true, @options[name.to_sym])
     end
+    # --no- options
+    %w(readline).each do |name|
+      o    = ["--no-#{name}"]
+      rest = @opts.parse o
+      assert_equal('', @stderr.string)
+      assert_equal(false, @options[name.to_sym])
+    end
   end
 
   def test_help_and_version_opts

data/test/unit/test-base-subsubcmd.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+require 'test/unit'
+require 'rubygems'; require 'require_relative'
+require_relative '../../processor/command/base/subsubcmd'
+
+# Mock debugger stub. FIXME: put in common helper routine.
+class Trepan
+end
+
+$errors = []
+class TestBaseSubCommand < Test::Unit::TestCase
+
+  def test_prefix_set
+    Trepanning::SubSubcommand.set_name_prefix('/tmp/show_subcmd/auto_subcmd/food.rb', 
+                                           self.class)
+    assert_equal('food', NAME, "should have set NAME")
+    assert_equal('show auto food', CMD)
+    assert_equal(%w(show auto food), PREFIX)
+  end
+
+end

data/test/unit/test-cmd-finish.rb

@@ -11,6 +11,10 @@ class TestCommandFinish < Test::Unit::TestCase
     @name   = File.basename(__FILE__, '.rb').split(/-/)[2]
     @my_cmd = @cmds[@name]
   end
+
+  def teardown
+    common_teardown
+  end
   
   def test_basic
     [

data/test/unit/test-completion.rb

@@ -16,21 +16,26 @@ class TestCompletion < Test::Unit::TestCase
     [
      ['sh', 'sh', ['show']],  # Simple single completion
      ['se', 'se', ['server', 'set']],  # Simple multiple completion
-     ['show', 'show', ['show ']], # Add a space because there is more
+     ['show', 'show', ['show']], # Completion when word is complete
      ['irb ', 'irb ', []],        # Don't add anything - no more
-     # ['irb ', 'irb', []],         # Don't add anything - no more
+     ['set auto', 'auto', ['auto']], # Single completion on two words
      ['set au', 'au', ['auto']],  # Single completion when there are two words
-     ['set auto', 'auto', ['auto ']], # Add a space because there is more
-     ['set auto ', '', ['dis', 'eval', 'irb', 'list']], # Many two-word completions
+     ['sho aut', 'aut', ['auto']], # Add a space because there is more
+     ['set auto eval ', '', ['off', 'on']], # Many 3-word completions
+
+     # Many two-word completions
+     ['set auto ', '', ['dis', 'eval', 'irb', 'list']], 
+
      ['set auto e', 'e', ['eval']],
-     ['disas', 'disas ', ['disassemble']], # Another single completion
+     ['disas', 'disas', ['disassemble']], # Another single completion
      ['help syn', 'syn', ['syntax']],
      ['help br', 'br', ['break', 'breakpoints']],
+     ['where', 'where', ['where']],  # Single alias completion
      ['set basename o', 'o', ['off', 'on']],
     ].each do |line, token, expect_completion|
       assert_equal(expect_completion, 
                    dbgr.completion_method(token, line),
-                   "Bad completion of #{token.inspect} with #{line.inspect}")
+                   "Bad completion on #{line.inspect} with #{token.inspect}")
     end
     assert(dbgr.completion_method('', '').size > 30, 
            'Initial completion should return more than 30 commands')

data/test/unit/test-proc-load_cmds.rb

@@ -20,9 +20,9 @@ class TestCmdProcessorLoadCmds < Test::Unit::TestCase
 
   def test_complete
     assert_equal(%w(delete directory disassemble display down),
-                 @proc.complete("d"),
+                 @proc.complete('d', 'd'),
                  "Failed completion of 'd' commands")
-    assert_equal(['show debug', 'show different'], @proc.complete("sho d"),
+    assert_equal(['debug', 'different'], @proc.complete('sho d', 'd'),
                  "Failed completion of 'sho d' subcommands")
     $errors = []
   end