rb8-trepanning 0.1.5 → 0.1.6

data/test/data/break_loop_bug.right

@@ -5,11 +5,11 @@ debugger testing is on.
 Breakpoint 1 file bp_loop_issue.rb, line 2
 + break_loop_bug.cmd line 3: cont
 Breakpoint 1 at bp_loop_issue.rb:2
--- (bp_loop_issue.rb:2)
+xx (bp_loop_issue.rb:2)
 sleep 0.01
 + break_loop_bug.cmd line 4: cont
 Breakpoint 1 at bp_loop_issue.rb:2
--- (bp_loop_issue.rb:2)
+xx (bp_loop_issue.rb:2)
 sleep 0.01
 + break_loop_bug.cmd line 5: cont
 trepan8: That's all, folks...

data/test/data/edit.cmd

@@ -9,6 +9,6 @@ edit ../example/gcd.rb 5
 # File should not exist
 edit foo
 # Add space to the end of 'edit'
-edit 
+edit
 edit ../example/gcd.rb
 quit!

data/test/data/edit.right

@@ -3,22 +3,28 @@ def gcd(a, b)
 debugger testing is on.
 + edit.cmd line 5: # Edit using current line position.
 + edit.cmd line 6: edit
+*** Editor echo FAKE-EDITOR  is not executable. Trying anyway...
 Running echo FAKE-EDITOR  +4 "gcd.rb"...
 FAKE-EDITOR +4 gcd.rb
 + edit.cmd line 7: edit 7
+*** Editor echo FAKE-EDITOR  is not executable. Trying anyway...
 Running echo FAKE-EDITOR  +7 "gcd.rb"...
 FAKE-EDITOR +7 gcd.rb
 + edit.cmd line 8: edit ../example/gcd.rb 5
+*** Editor echo FAKE-EDITOR  is not executable. Trying anyway...
 Running echo FAKE-EDITOR  +5 "gcd.rb"...
 FAKE-EDITOR +5 gcd.rb
 + edit.cmd line 9: # File should not exist
 + edit.cmd line 10: edit foo
+*** Editor echo FAKE-EDITOR  is not executable. Trying anyway...
 *** File "foo" is not readable.
 + edit.cmd line 11: # Add space to the end of 'edit'
-+ edit.cmd line 12: edit 
++ edit.cmd line 12: edit
+*** Editor echo FAKE-EDITOR  is not executable. Trying anyway...
 Running echo FAKE-EDITOR  +4 "gcd.rb"...
 FAKE-EDITOR +4 gcd.rb
 + edit.cmd line 13: edit ../example/gcd.rb
+*** Editor echo FAKE-EDITOR  is not executable. Trying anyway...
 Running echo FAKE-EDITOR  +1 "gcd.rb"...
 FAKE-EDITOR +1 gcd.rb
 + edit.cmd line 14: quit!

data/test/data/printvar.right

@@ -11,7 +11,7 @@ basename is on.
 Breakpoint 1 file gcd.rb, line 6
 + printvar.cmd line 10: continue
 Breakpoint 1 at gcd.rb:6
--- (gcd.rb:6)
+xx (gcd.rb:6)
 if a > b
 + printvar.cmd line 11: pr a 
 3
@@ -19,7 +19,7 @@ if a > b
 [3, 5]
 + printvar.cmd line 13: continue
 Breakpoint 1 at gcd.rb:6
--- (gcd.rb:6)
+xx (gcd.rb:6)
 if a > b
 + printvar.cmd line 14: eval [a,b]
 [2, 3]

data/test/data/raise.right

@@ -7,7 +7,6 @@ Catch exception x.
 + raise.cmd line 7: catch ZeroDivisionError
 Catch exception ZeroDivisionError.
 + raise.cmd line 8: info catch
-x
 ZeroDivisionError
 + raise.cmd line 9: catch 5
 Warning 5 is not known to be a Class

data/test/data/trace-mingw.right

@@ -0,0 +1,28 @@
+-- (gcd.rb:4 @2)
+def gcd(a, b)
+-- (gcd.rb:18 @2)
+a, b = ARGV[0..1].map {|arg| arg.to_i}
+-- (gcd.rb:19 @45)
+puts "The GCD of %d and %d is %d" % [a, b, gcd(a, b)]
+-- (gcd.rb:6 @4)
+if a > b
+-- (gcd.rb:12 @40)
+if a == 1 or b-a == 0
+METHOD Object#gcd(a, b)
+-> (gcd.rb:4 @2)
+def gcd(a, b)
+-- (gcd.rb:10 @24)
+return nil if a <= 0
+-- (gcd.rb:15 @71)
+return gcd(b-a, a)
+-- (gcd.rb:6 @4)
+if a > b
+-- (gcd.rb:12 @40)
+if a == 1 or b-a == 0
+<- (gcd.rb:13 @68)
+R=> 1
+return a
+<- (gcd.rb:16 @88)
+R=> 1
+end
+The GCD of 3 and 5 is 1

data/test/integration/.gitignore

@@ -2,3 +2,4 @@
 /*.out
 /*~
 /.ruby_inline
+/.trepan8_hist

data/test/integration/test-raise.rb

@@ -14,8 +14,17 @@ class TestRaise < Test::Unit::TestCase
       RUBY_VERSION =~ /1.9/
     common_setup(__FILE__)
     Dir.chdir(@srcdir) do 
+      filter = Proc.new{|got_lines, correct_lines|
+        new_lines = []
+        got_lines.each do |s|
+          new_lines << s unless s == 'x'
+        end
+        got_lines[0..-1] = new_lines[0..-1]
+      }
       assert_equal(true, 
-                   run_debugger(@testname, @prefix + '../example/raise.rb'))
+                   run_debugger(@testname, 
+                                @prefix + '../example/raise.rb',
+                                nil, filter))
     end
   end
 end

data/test/integration/test-trace.rb

@@ -2,15 +2,19 @@
 require 'test/unit'
 require 'rubygems'; require 'require_relative'
 require_relative 'helper'
+require 'rbconfig'
 
 class TestTrace < Test::Unit::TestCase
   include TestHelper
-  TREPAN_LOC    = /.. \(.+:\d+( @\d+)?\)/
+  TREPAN_LOC =
+    if RbConfig::CONFIG['target_os'].start_with?('mingw')
+      /.. \((?:[A-Za-z]:)?.+:\d+( @\d+)?\)/
+    else
+      /.. \(.+:\d+( @\d+)?\)/
+    end
   def test_trepan_trace
-    skip "We may get different results on an unpatched 1.9.2" if 
-      RUBY_VERSION =~ /1.9/
     common_setup(__FILE__)
-    Dir.chdir(@srcdir) do 
+    Dir.chdir(@srcdir) do
       last_line = nil
       filter = Proc.new{|got_lines, correct_lines|
         got_lines.each_with_index do |line, i|
@@ -23,8 +27,8 @@ class TestTrace < Test::Unit::TestCase
         got_lines[last_line..-1] = got_lines[last_line] if last_line
       }
       rightfile = File.join(%W(.. data #{@testname}))
-      assert_equal(true, run_debugger(@testname, 
-                                      "-x #{@prefix}../example/gcd.rb 3 5", 
+      assert_equal(true, run_debugger(@testname,
+                                      "-x #{@prefix}../example/gcd.rb 3 5",
                                       nil, filter, nil, rightfile))
     end
   end

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

@@ -31,7 +31,13 @@ class TestAppOptions < Test::Unit::TestCase
     assert_equal(orig_cd, @options[:chdir])
     assert_not_equal('', @stderr.string)
     assert_equal('', @stdout.string)
-    File.unlink tf.path
+    # Looks like on various MinGW systems Tempfile and tf.path and unlike don't
+    # work together
+    begin
+      File.unlink tf.path
+    rescue
+    end
+
     # FIXME: add test where directory isn't executable.
   end
 
@@ -53,7 +59,7 @@ class TestAppOptions < Test::Unit::TestCase
   end
 
   def no_test_help_and_version_opts
-    omit unless Process.respond_to?(:fork) 
+    omit unless Process.respond_to?(:fork)
     Process.fork {
       %w(help version).each do |name|
         setup
@@ -88,7 +94,7 @@ class TestAppOptions < Test::Unit::TestCase
     assert_equal(true, @options[:client])
     ## FIXME - reinstate
     ## assert_equal(false, @options[:server])
-    
+
   end
 
 end

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

@@ -6,7 +6,14 @@ require_relative '../../app/run'
 class TestAppRun < Test::Unit::TestCase
   include Trepan
   def test_whence
-    assert_equal(true, File.executable?(whence_file('irb')))
+    resolved_file = whence_file('irb')
+    if RbConfig::CONFIG['target_os'].start_with?('mingw')
+      assert_equal(true, File.readable?(resolved_file),
+                   "file #{resolved_file} should be readable")
+    else
+      assert_equal(true, File.executable?(resolved_file),
+                   "file #{resolved_file} should be executable")
+    end
     ng = whence_file('probably-does-not-exist')
     assert_equal(true, File.executable?(ng) || ng == 'probably-does-not-exist')
   end

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

@@ -33,8 +33,8 @@ class TestCommandAliasUnalias < Test::Unit::TestCase
   def alias_defined?(alias_name)
     @cmdproc.aliases.member?(alias_name)
   end
-  
-  def test_alias_command
+
+  def test_alias_unalias_command
 
     assert_equal(false, @cmdproc.aliases.empty?,
                  'There should be some aliases defined')

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

@@ -0,0 +1,34 @@
+#!/usr/bin/env ruby
+require 'test/unit'
+
+# Test Trepan::CmdProcessor::Default
+class TestProcDefault < Test::Unit::TestCase
+
+  DIR = File.dirname(__FILE__)
+  DEFAULT_RBFILE = File.join(%W(#{DIR} .. .. processor default.rb))
+
+  def test_maxwidth_setting
+    ENV['COLUMNS'] = '50'
+    Trepan::CmdProcessor.send(:remove_const, 'DEFAULT_SETTINGS') if
+      Trepan::CmdProcessor.const_defined?('DEFAULT_SETTINGS')
+    load DEFAULT_RBFILE
+    assert_equal(50, Trepan::CmdProcessor::DEFAULT_SETTINGS[:maxwidth],
+                 'Pick up COLUMNS environment')
+
+    Trepan::CmdProcessor.send(:remove_const, 'DEFAULT_SETTINGS')
+    load DEFAULT_RBFILE
+
+    ENV['COLUMNS'] = '0'
+    assert_operator(Trepan::CmdProcessor::DEFAULT_SETTINGS[:maxwidth],
+                    :>=, 10,
+                 'Change too small COLUMNS environment value')
+
+    Trepan::CmdProcessor.send(:remove_const, 'DEFAULT_SETTINGS')
+    load DEFAULT_RBFILE
+
+    ENV['COLUMNS'] = 'non-numeric-string'
+    assert_operator(Trepan::CmdProcessor::DEFAULT_SETTINGS[:maxwidth],
+                    :>=, 10,
+                 'Change too small COLUMNS environment value')
+  end
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: rb8-trepanning
 version: !ruby/object:Gem::Version 
-  hash: 17
+  hash: 23
   prerelease: 
   segments: 
   - 0
   - 1
-  - 5
-  version: 0.1.5
+  - 6
+  version: 0.1.6
 platform: ruby
 authors: 
 - R. Bernstein
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2012-03-01 00:00:00 Z
+date: 2013-03-31 00:00:00 Z
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: rbx-require-relative
@@ -105,6 +105,7 @@ files:
 - app/util.rb
 - bin/.gitignore
 - bin/trepan8
+- check-filter.rb
 - data/.gitignore
 - data/irbrc
 - data/perldb.bindings
@@ -266,6 +267,7 @@ files:
 - processor/command/unalias.rb
 - processor/command/undisplay.rb
 - processor/command/up.rb
+- processor/complete.rb
 - processor/default.rb
 - processor/display.rb
 - processor/eval.rb
@@ -306,6 +308,7 @@ files:
 - test/data/stepping-1.9.right
 - test/data/stepping.cmd
 - test/data/stepping.right
+- test/data/trace-mingw.right
 - test/data/trace.cmd
 - test/data/trace.right
 - test/data/trepan8-save.1
@@ -362,6 +365,7 @@ files:
 - test/unit/test-io-tcpclient.rb
 - test/unit/test-io-tcpfns.rb
 - test/unit/test-io-tcpserver.rb
+- test/unit/test-proc-default.rb
 - test/unit/test-proc-eval.rb
 - test/unit/test-proc-hook.rb
 - test/unit/test-proc-load_cmds.rb
@@ -374,7 +378,7 @@ licenses:
 post_install_message: 
 rdoc_options: 
 - --title
-- Trepan 0.1.5 Documentation
+- Trepan 0.1.6 Documentation
 require_paths: 
 - lib
 required_ruby_version: !ruby/object:Gem::Requirement 
@@ -398,7 +402,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.8.6
+rubygems_version: 1.8.24
 signing_key: 
 specification_version: 3
 summary: Ruby Trepanning Debugger using ruby-debug-base