rb8-trepanning 0.1.3 → 0.1.4

data/CHANGES

@@ -1,3 +1,13 @@
+Oct 27, 2011 (0.1.4)
+
+- POSIX shell -x (long form: --trace) fixed
+- Go with rdoc 2.4.2 now
+- Improve documentation for "macro"
+- show alias => show aliases
+- correct info variables
+- Add ruby-debug-base dependency
+- Bugs fixed, code reorganized.
+
 June 12, 2011 (0.1.3) Fleetwood release
 
 First attempt at backport from trepanning.

data/ChangeLog

@@ -1,3 +1,279 @@
+2011-10-15  rocky <rockyb@rubyforge.org>
+
+	* app/display.rb, processor/command/undisplay.rb: Sync with
+	rb-trepanning.
+
+2011-10-14  rocky <rockyb@rubyforge.org>
+
+	I hate conflicted merges
+
+2011-10-14  rocky <rockyb@rubyforge.org>
+
+	* app/display.rb, processor/command/disable.rb,
+	processor/command/display.rb, processor/command/enable.rb,
+	processor/command/set_subcmd/auto.rb, processor/display.rb: Sync
+	with rb-trepanning and rbx-trepanning although enable/disable
+	display numbers not supported yet.
+
+2011-10-09  rocky <rockyb@rubyforge.org>
+
+	* processor/command/set_subcmd/auto.rb,
+	processor/command/set_subcmd/trace.rb,
+	processor/command/set_subcmd/trace_subcmd/print.rb: Regularize and
+	improve "set" help a little bit. Sync with rb-trepanning
+
+2011-10-09  rocky <rockyb@rubyforge.org>
+
+	Merge branch 'master' of github.com:rocky/rb8-trepanning
+
+2011-10-09  rocky <rockyb@rubyforge.org>
+
+	* app/options.rb, app/run.rb, bin/trepan8, lib/trepanning.rb,
+	processor.rb, processor/old-processor.rb, test/data/trace.cmd,
+	test/data/trace.right, test/integration/helper.rb,
+	test/integration/test-trace.rb: trepan8 --trace option (-x) works
+	again.
+
+2011-09-27  rocky <rockyb@rubyforge.org>
+
+	* Rakefile, trepan8.gemspec: Go with rdoc > 2.4.2 now. Sigh
+
+2011-09-27  rocky <rockyb@rubyforge.org>
+
+	* processor/command/macro.rb, test/unit/test-proc-location.rb: 
+	Improve documentation for "macro". Remove a stray "require
+	'ruby-debug'".
+
+2011-09-25  rocky <rockyb@rubyforge.org>
+
+	* processor/command/show_subcmd/alias.rb,
+	processor/command/show_subcmd/aliases.rb: show alias => show aliases
+
+
+2011-09-25  rocky <rockyb@rubyforge.org>
+
+	* processor/command/finish.rb, processor/command/unalias.rb: Sync
+	with rbx-trepanning.
+
+2011-09-25  rocky <rockyb@rubyforge.org>
+
+	* app/run.rb, processor/command/kill.rb,
+	processor/command/set_subcmd/different.rb,
+	processor/command/unalias.rb, test/unit/test-cmd-kill.rb: Misc
+	changes to sync with rb{,x}-trepanning
+
+2011-08-28  rocky <rockyb@rubyforge.org>
+
+	* processor/command.rb, processor/command/alias.rb,
+	processor/command/backtrace.rb, processor/command/base/cmd.rb,
+	processor/command/base/subcmd.rb, processor/command/base/submgr.rb,
+	processor/command/base/subsubcmd.rb, processor/command/break.rb,
+	processor/command/catch.rb, processor/command/complete.rb,
+	processor/command/continue.rb, processor/command/directory.rb,
+	processor/command/disable.rb, processor/command/display.rb,
+	processor/command/edit.rb, processor/command/eval.rb,
+	processor/command/exit.rb, processor/command/finish.rb,
+	processor/command/frame.rb, processor/command/help.rb,
+	processor/command/kill.rb, processor/command/list.rb,
+	processor/command/macro.rb, processor/command/next.rb,
+	processor/command/parsetree.rb, processor/command/pp.rb,
+	processor/command/pr.rb, processor/command/ps.rb,
+	processor/command/restart.rb, processor/command/save.rb,
+	processor/command/shell.rb, processor/command/source.rb,
+	processor/command/step.rb, processor/command/tbreak.rb,
+	processor/command/unalias.rb, processor/command/undisplay.rb,
+	processor/command/up.rb, processor/old-command.rb,
+	processor/old-processor.rb, processor/subcmd.rb,
+	test/unit/test-base-cmd.rb: processor/command.rb  ->
+	processor/old-command.rb processor/base/cmd.rb ->
+	processor/command.rb
+
+2011-08-28  rocky <rockyb@rubyforge.org>
+
+	Merge branch 'master' of github.com:rocky/rb8-trepanning
+
+2011-08-28  rocky <rockyb@rubyforge.org>
+
+	* interface.rb, interface/base_intf.rb, interface/script.rb,
+	interface/server.rb, interface/user.rb, io.rb, io/base_io.rb,
+	io/input.rb, io/null_output.rb, io/string_array.rb,
+	io/tcpclient.rb, io/tcpserver.rb, lib/trepanning.rb, processor.rb,
+	processor/command/base/subcmd.rb, processor/command/exit.rb,
+	processor/command/help.rb, processor/help.rb,
+	processor/location.rb, processor/main.rb, processor/mock.rb,
+	processor/msg.rb, processor/old-processor.rb,
+	processor/processor.rb, processor/subcmd.rb, processor/validate.rb,
+	test/unit/test-proc-eval.rb, test/unit/test-subcmd-help.rb: Partial
+	sync with rbx-trepanning:   interface/base_intf.rb -> interface.rb
+	base_io -> io.rb   processor/main.rb -> processor.b
+
+2011-08-28  rocky <rockyb@rubyforge.org>
+
+	* lib/trepanning.rb, processor.rb,
+	processor/command/base/subcmd.rb, processor/command/exit.rb,
+	processor/command/help.rb, processor/help.rb,
+	processor/location.rb, processor/main.rb, processor/mock.rb,
+	processor/msg.rb, processor/old-processor.rb,
+	processor/processor.rb, processor/subcmd.rb, processor/validate.rb,
+	test/unit/test-proc-eval.rb, test/unit/test-subcmd-help.rb: Partial
+	sync with rbx-trepanning.
+
+2011-08-14  rocky <rockyb@rubyforge.org>
+
+	* processor/command/kill.rb: See above
+
+2011-08-14  rocky <rockyb@rubyforge.org>
+
+	* processor/command/kill.rb, test/unit/test-app-options.rb: 
+	test-app-options.rb: testing help/version options was killing the
+	rest of the tests Speaking of killing.. add more robust kill
+	checking and fix an outright bug in name-to-number access.
+
+2011-06-21  rocky <rockyb@rubyforge.org>
+
+	* app/run.rb: backticks work differently between 1.9.2 and 1.8.7?
+	Can't do an inspect on a string and have the shell drop the quotes.
+
+
+2011-06-21  rocky <rockyb@rubyforge.org>
+
+	* app/run.rb, app/util.rb, processor/command/info_subcmd/files.rb: 
+	Sync with rb-trepanning
+
+2011-06-21  rocky <rockyb@rubyforge.org>
+
+	* processor/command/continue.rb: One more place we should be
+	checking for a valid Ruby program.
+
+2011-06-21  rocky <rockyb@rubyforge.org>
+
+	* processor/command/base/cmd.rb, processor/command/break.rb,
+	processor/command/disable.rb, processor/command/eval.rb,
+	processor/command/up.rb: Test for syntactically-correct Ruby program
+	on the break command. DRY including util which is needed for
+	silencing already-defined constant messages.
+
+2011-06-21  rocky <rockyb@rubyforge.org>
+
+	* app/display.rb, app/run.rb, lib/debugger.rb,
+	processor/command/info_subcmd/source.rb,
+	processor/command/info_subcmd/variables_subcmd/constant.rb,
+	test/unit/test-app-run.rb: "info source" should not try to look for
+	breakpoint line numbers if the source is syntactically invalid as is
+	the case for erb files. Other small changes.
+
+2011-06-19  rocky <rockyb@rubyforge.org>
+
+	* processor/command/info_subcmd/variables.rb,
+	processor/command/info_subcmd/variables_subcmd/class.rb,
+	processor/command/info_subcmd/variables_subcmd/constant.rb,
+	processor/help.rb, processor/msg.rb, processor/subcmd.rb: Add "info
+	var constant". Correct abbreviation lookup. Sync with
+	rbx-trepanning.
+
+2011-06-19  rocky <rockyb@rubyforge.org>
+
+	* app/irb.rb, processor/command/enable.rb: Silence another
+	constant-init wraning. Sync with rbx-trepanning.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* app/irb.rb, processor/command/shell.rb: Fix bug in running 'dbgr'
+	inside irb.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* app/irb.rb,
+	processor/command/info_subcmd/variables_subcmd/class.rb,
+	processor/command/info_subcmd/variables_subcmd/globals.rb,
+	processor/command/info_subcmd/variables_subcmd/instance.rb,
+	processor/command/info_subcmd/variables_subcmd/locals.rb,
+	processor/command/shell.rb, processor/msg.rb: Colorize "info
+	variable" display and show class name in header.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* processor/command/help.rb,
+	processor/command/info_subcmd/variables.rb,
+	processor/command/info_subcmd/variables_subcmd/globals.rb,
+	processor/mock.rb: Small changes.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* processor/command/info_subcmd/variables.rb,
+	processor/command/info_subcmd/variables_subcmd/locals.rb,
+	trepan8.gemspec: Correct info variables.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* processor/command/base/subsubmgr.rb,
+	processor/command/info_subcmd/globals.rb,
+	processor/command/info_subcmd/iv.rb,
+	processor/command/info_subcmd/locals.rb,
+	processor/command/info_subcmd/variables_subcmd/.gitignore,
+	processor/command/info_subcmd/variables_subcmd/class.rb,
+	processor/command/info_subcmd/variables_subcmd/globals.rb,
+	processor/command/info_subcmd/variables_subcmd/instance.rb,
+	processor/command/info_subcmd/variables_subcmd/locals.rb: Add "info
+	variables". Sync with rb-trepanning.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* trepan8.gemspec: Add ruby-debug-base dependency. Issue #1.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* app/util.rb, processor/command/disable.rb,
+	processor/command/down.rb, processor/command/enable.rb,
+	processor/command/info.rb,
+	processor/command/info_subcmd/globals.rb,
+	processor/command/info_subcmd/iv.rb,
+	processor/command/info_subcmd/locals.rb, processor/command/up.rb: 
+	Add 'info iv' for instance variables. Use better way to suppress
+	warnings.
+
+2011-06-18  rocky <rockyb@rubyforge.org>
+
+	* data/perldb.bindings, processor/command/alias.rb,
+	processor/command/list.rb, processor/main.rb,
+	test/unit/test-io-tcpserver.rb: alias.rb: cat is an alias for
+	"list". perldb.bindings first attempt at perldb bindings.
+	test-io-tcpserver.rb: skip test if we can't open socket.
+
+2011-06-16  rocky <rockyb@rubyforge.org>
+
+	* app/irb.rb, app/options.rb, processor/command/shell.rb: Suppress
+	rb-readline dup constant warnings.
+
+2011-06-16  rocky <rockyb@rubyforge.org>
+
+	* app/irb.rb, processor/command/shell.rb, test/unit/cmd-helper.rb,
+	test/unit/test-proc-location.rb: Get unit test test-proc-location
+	working. There is weirdness here where things are getting required
+	multiple times.
+
+2011-06-15  rocky <rockyb@rubyforge.org>
+
+	* app/irb.rb, processor/command/step.rb, processor/hook.rb,
+	processor/running.rb: Had broken "autoirb" when I renamed "irb" to
+	"shell". Make a little more like other trepanning debuggers.
+
+2011-06-12  rocky <rockyb@rubyforge.org>
+
+	* processor/command/set_subcmd/trace.rb,
+	processor/command/set_subcmd/trace_subcmd/buffer.rb,
+	processor/command/set_subcmd/trace_subcmd/print.rb,
+	processor/command/show_subcmd/trace.rb,
+	processor/command/show_subcmd/trace_subcmd/buffer.rb,
+	processor/command/show_subcmd/trace_subcmd/print.rb,
+	trepan8.gemspec: Wrong package name and forgot to add set/show trace
+	files.
+
+2011-06-11  rocky <rockyb@rubyforge.org>
+
+	* ChangeLog, Rakefile, app/options.rb: Get ready for 0.1.3 release.
+
+
 2011-06-11  rocky <rockyb@rubyforge.org>
 
 	* Rakefile: I run rubinius on this too often.

data/Makefile

@@ -0,0 +1,13 @@
+# I'll admit it -- I'm an absent-minded old-timer who has trouble
+# learning new tricks.
+.PHONY: all test
+
+all: test
+
+check: 
+	rake test
+test: 
+	rake test
+
+%: 
+	rake $@

data/Rakefile

@@ -10,7 +10,7 @@ def gemspec
   @gemspec ||= eval(File.read(Gemspec_filename), binding, Gemspec_filename)
 end
 
-require 'rake/gempackagetask'
+require 'rdoc/task'
 desc 'Build the gem'
 task :package=>:gem
 task :gem=>:gemspec do
@@ -177,7 +177,6 @@ task :gemspec do
 end
 
 # ---------  RDoc Documentation ------
-require 'rake/rdoctask'
 desc 'Generate rdoc documentation'
 Rake::RDocTask.new('rdoc') do |rdoc|
   rdoc.rdoc_dir = 'doc'

data/app/display.rb

@@ -19,6 +19,13 @@ class DisplayMgr
     @list = []
   end
   
+  def [](index)
+    raise TypeError, 
+    "index #{index} should be a Fixnum, is #{index.class}" unless
+      index.is_a?(Fixnum)
+    @list.detect {|disp| disp.number == index }
+  end
+
   def add(frame, arg, fmt=nil)
     return nil unless frame
     begin
@@ -83,6 +90,18 @@ Num Enb Expression"
     end
     false
   end
+
+  def max
+    @list.map{|disp| disp.number}.max
+  end
+
+  def nums
+    @list.map{|disp| disp.number}
+  end
+
+  def size
+    @list.size
+  end
 end
 
 class Display
@@ -98,6 +117,22 @@ class Display
     @number    = number
   end
 
+  def disable
+    @enabled = false
+  end
+
+  def disabled?
+    !@enabled
+  end
+
+  def enable
+    @enabled = true
+  end
+
+  def enabled?
+    @enabled
+  end
+
   def to_s(frame)
     return 'No symbol "' + @arg + '" in current context.' unless frame
     
@@ -119,10 +154,13 @@ class Display
     what += @arg if @arg
     '%3d: %s' % [@number, what]
   end
+
 end
 
 if __FILE__ == $0
   # Demo it.
+  require 'rubygems'
+  require 'ruby-debug-base'; Debugger.start
   mgr = DisplayMgr.new
 
   def print_display(mgr)
@@ -130,10 +168,12 @@ if __FILE__ == $0
     puts '=' * 40
   end
     
-  frame = Rubinius::VM.backtrace(0)[0]
+  frame = Debugger.current_context
 
   x = 1
   mgr.add(frame, 'x > 1')
+  puts "Number of displays %s" % mgr.size
+  puts "Max Number  %d" % mgr.max
   print_display(mgr)
 
   mgr.enable_disable(1, false)

data/app/irb.rb

@@ -1,74 +1,80 @@
-# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
 # This code comes more or less from ruby-debug.
-require 'irb'
+require 'rubygems'; require 'require_relative'
+require_relative 'util'
+
+Trepan::Util.suppress_warnings { 
+  require 'irb'
+}
+
 module IRB # :nodoc:
   module ExtendCommand # :nodoc:
     # FIXME: should we read these out of a directory to 
     #        make this more user-customizable? 
 
-    # A base command class that resume execution
-    class DebuggerResumeCommand
-      def self.execute(conf, *opts)
-        name = 
-          if self.name =~ /IRB::ExtendCommand::(\S+)/
-            $1.downcase
-          else
-            'unknown'
-          end
-        $trepan_args = opts
-        $trepan_command = 
-          if $trepan_irb_statements 
-            $trepan_irb_statements
-          else
-            ([name] + opts).join(' ')
-          end
+    unless defined? TContinue
 
-        throw :IRB_EXIT, name.to_sym
+      # A base command class that resume execution
+      class TrepanResumeCommand
+        def self.execute(conf, *opts)
+          name = 
+            if self.name =~ /IRB::ExtendCommand::(\S+)/
+              $1[1..-1].downcase
+            else
+              'unknown'
+            end
+          $trepan_args = opts
+          $trepan_command = 
+            if $trepan_irb_statements 
+              $trepan_irb_statements
+            else
+              ([name] + opts).join(' ')
+            end
+          
+          throw :IRB_EXIT, name.to_sym
+        end
       end
-    end
-
-    # FIXME: figure out why superclass type mismatch problem on 1.9
-    if RUBY_VERSION !~ /^1.9/
-      class Continue < DebuggerResumeCommand ; end
-      class Finish   < DebuggerResumeCommand ; end
-      class Next     < DebuggerResumeCommand ; end
-      class Quit     < DebuggerResumeCommand ; end
-      class Step     < DebuggerResumeCommand ; end
-    end
-
-    # Issues a comamnd to the debugger without continuing
-    # execution. 
-    class Dbgr
-      def self.execute(conf, *opts)
-        $trepan_command = 
-          if opts.size == 1 && opts[0].is_a?(String)
-            $trepan_args = opts[0]
-          else
-            opts.join(' ')
-          end
-        dbg_cmdproc = conf.workspace.instance_variable_get('@dbg_cmdproc')
-        dbg_cmdproc.run_command($trepan_command)
+      
+      class TContinue < TrepanResumeCommand ; end
+      class TFinish   < TrepanResumeCommand ; end
+      class TNext     < TrepanResumeCommand ; end
+      class TQuit     < TrepanResumeCommand ; end
+      class TStep     < TrepanResumeCommand ; end
+    
+      # Issues a comamnd to the debugger without continuing
+      # execution. 
+      class TDbgr
+        def self.execute(conf, *opts)
+          $trepan_command = 
+            if opts.size == 1 && opts[0].is_a?(String)
+              $trepan_args = opts[0]
+            else
+              opts.join(' ')
+            end
+          # dbg_cmdproc = conf.workspace.instance_variable_get('@dbg_cmdproc')
+          # dbg_cmdproc.run_command($trepan_command)
+          $trepan_cmdproc.run_command($trepan_command)
+        end
       end
     end
-
   end
   if defined?(ExtendCommandBundle)
     # New irb Commands which are the same name as their debugger
     # counterpart
-    %w(Dbgr Finish Step).each do |name|
-      command = name.downcase
+    %w(TDbgr TFinish TStep).each do |name|
+      command = name[1..-1].downcase
       sym     = name.to_sym
       ExtendCommandBundle.def_extend_command command, sym
     end
     # New irb Commands which are the slightly different from their
     # debugger counterpart
-    [['cont',   :Continue],
-     ['ne',     :Next],
-     ['q',      :Quit]].each do |command, sym|
+    [['cont',   :TContinue],
+     ['ne',     :TNext],
+     ['q',      :TQuit]].each do |command, sym|
       ExtendCommandBundle.def_extend_command command, sym
     end
   end
-  
+
   def self.start_session(binding, dbg_cmdproc, conf={})
     unless @__initialized
 

data/app/options.rb

@@ -9,7 +9,7 @@ module Trepan
   require 'rubygems'; require 'require_relative'
   require_relative 'default'
 
-  VERSION = '0.1.3' unless defined? Trepan::VERSION
+  VERSION = '0.1.4' unless defined? Trepan::VERSION
   PROGRAM = 'trepan8' unless defined? Trepan::PROGRAM
 
   module_function
@@ -163,7 +163,8 @@ EOB
         options[:wait] = true
       end
       opts.on('-x', '--trace', 'Turn on line tracing') do 
-        options[:tracing] = true
+        options[:traceprint] = true
+        options[:nx] = true
       end
       opts.separator ''
       opts.on_tail('-?', '--help', 'Show this message') do

data/app/run.rb

@@ -10,21 +10,24 @@ module Trepan
   # The caller must ensure that ARGV is set up to remove any debugger
   # arguments or things that the debugged program isn't supposed to
   # see.  FIXME: Should we make ARGV an explicit parameter?
-
   def debug_program(ruby_path, options)
     # Make sure Ruby script syntax checks okay.
     # Otherwise we get a load message that looks like trepan8 has 
     # a problem. 
-    output = `#{ruby_path} -c #{Trepan::PROG_SCRIPT.inspect} 2>&1`
-    if $?.exitstatus != 0 and RUBY_PLATFORM !~ /mswin/
+    
+    output = ruby_syntax_errors(Trepan::PROG_SCRIPT.inspect)
+    if output
       puts output
       exit $?.exitstatus 
     end
 
-    %w(highlight basename).each do |opt|
+    cmdproc = Debugger.handler.cmdproc
+    %w(highlight basename traceprint).each do |opt|
       opt = opt.to_sym
-      Debugger.handler.cmdproc.settings[opt] = options[opt]
+      cmdproc.settings[opt] = options[opt]
     end
+    cmdproc.unconditional_prehooks.insert_if_new(-1, *cmdproc.trace_hook) if
+      options[:traceprint]
 
     # Record where we are we can know if the call stack has been
     # truncated or not.
@@ -44,8 +47,9 @@ module Trepan
   # Do a shell-like path lookup for prog_script and return the results.
   # If we can't find anything return prog_script.
   def whence_file(prog_script)
-    if prog_script.index(File::SEPARATOR)
-      # Don't search since this name has path separator components
+    if prog_script.start_with?(File::SEPARATOR) || prog_script.start_with?('.')
+      # Don't search since this name has path is explicitly absolute or
+      # relative.
       return prog_script
     end
     for dirname in ENV['PATH'].split(File::PATH_SEPARATOR) do
@@ -55,6 +59,14 @@ module Trepan
     # Failure
     return prog_script
   end
+
+  def ruby_syntax_errors(prog_script)
+    output = `#{RbConfig.ruby} -c #{prog_script} 2>&1`
+    if $?.exitstatus != 0 and RUBY_PLATFORM !~ /mswin/
+      return output
+    end
+    return nil
+  end
 end
 
 # Path name of Ruby interpreter we were invoked with. Is part of 
@@ -71,4 +83,10 @@ if __FILE__ == $0
   puts whence_file('irb')
   puts whence_file('probably-does-not-exist')
   puts RbConfig.ruby
+  puts "#{__FILE__} is syntactically correct" unless 
+    ruby_syntax_errors(__FILE__)
+  readme = File.join(File.dirname(__FILE__), '..', 'README.textile')
+  puts "#{readme} is not syntactically correct" if
+    ruby_syntax_errors(readme)
+
 end

data/app/util.rb

@@ -45,6 +45,16 @@ module Trepan
       end
       return text
     end
+
+    # Suppress warnings. The main one we encounter is "already initialized
+    # constant" because perhaps another version readline has done that already.
+    def suppress_warnings
+      original_verbosity = $VERBOSE
+      $VERBOSE = nil
+      result = yield
+      $VERBOSE = original_verbosity
+      return result
+    end  
   end
 end
 
@@ -55,7 +65,15 @@ if __FILE__ == $0
   puts safe_repr(string, 17)
   puts safe_repr(string.inspect, 17)
   puts safe_repr(string.inspect, 17, '')
-  ## puts "main script in above is #{locs.size() - 1 - find_main_script(locs)}"
+  # ------------------------------------
+  # extract_expression
+  ['if condition("if")', 
+   'until until_termination',
+   'return return_value',
+    'nothing_to_be.done'
+  ].each do |stmt|
+    puts extract_expression stmt
+  end
 
   list = %w(disassemble disable distance up)
   p list

data/bin/trepan8

@@ -83,8 +83,6 @@ else
 
     # activate post-mortem
     Trepan.post_mortem if options[:post_mortem]
-    options[:stop] = false if options[:tracing]
-    Debugger.tracing = options[:tracing]
 
     if !options[:quit]
       if Debugger.started?

data/data/perldb.bindings

@@ -0,0 +1,17 @@
+# Aliases to simulate some of the Perl debugger command set
+alias = alias
+alias R restart
+alias b break
+alias c continue
+alias f list
+alias n next
+alias p pr
+alias q quit
+alias s step
+alias v list
+macro - Proc.new{|*args| "list -"}
+macro E Proc.new{|*args| "info thread"}
+macro L Proc.new{|*args| "info break"}
+macro T Proc.new{|*args| "info stack"}
+macro l Proc.new{|*args| "list>"}
+macro r Proc.new{|*args| %w(finish step)}