rbx-trepanning 0.2.0-universal-rubinius-2.0

data/processor/command/show_subcmd/kernelstep.rb

@@ -0,0 +1,34 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../base/subcmd'
+
+class Trepan::Subcommand::ShowKernelstep < Trepan::Subcommand
+  unless defined?(HELP)
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP         = "Show stepping into kernel methods"
+    MIN_ABBREV   = 'kern'.size
+
+    # Specific to this class
+    KERNEL_METHOD_FILE_RE    = /^kernel\//
+  end
+
+  def ignore?
+    @proc.ignore_file_re.member?(KERNEL_METHOD_FILE_RE)
+  end
+
+  def show
+    msg("stepping into kernel methods is %s." % 
+        (ignore? ? 'disallowed' : 'allowed'))
+  end
+
+  def run(args)
+    show
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  cmd = MockDebugger::sub_setup(Trepan::Subcommand::ShowKernelstep)
+end

data/processor/command/show_subcmd/max.rb

@@ -0,0 +1,27 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../base/subsubcmd'
+require_relative '../base/subsubmgr'
+
+class Trepan::SubSubcommand::ShowMax < Trepan::SubSubcommandMgr
+  unless defined?(HELP)
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP   = 'Show "maximum length" settings'
+  end
+
+  def run(args)
+    super
+  end
+end
+
+if __FILE__ == $0
+  require_relative '../../mock'
+  cmd_ary          = Trepan::SubSubcommand::ShowMax::PREFIX
+  dbgr, parent_cmd = MockDebugger::setup(cmd_ary[0], false)
+  cmd              = Trepan::SubSubcommand::ShowMax.new(dbgr.processor, 
+                                                        parent_cmd)
+  cmd_name       = cmd_ary.join('')
+  prefix_run = cmd_ary[1..-1]
+  cmd.run(prefix_run)
+end

data/processor/command/show_subcmd/max_subcmd/.gitignore

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

data/processor/command/show_subcmd/max_subcmd/list.rb

@@ -0,0 +1,38 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowMaxList < Trepan::ShowIntSubSubcommand
+  unless defined?(HELP)
+    HELP = 'Show the number of source file lines to list'
+    MIN_ABBREV   = 'lis'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show max list)
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+
+  # FIXME: DRY the below code
+  cmd_ary          = Trepan::SubSubcommand::ShowMaxList::PREFIX
+  dbgr, parent_cmd = MockDebugger::setup(cmd_ary[0], false)
+  cmd              = Trepan::SubSubcommand::ShowMax.new(dbgr.processor, 
+                                                        parent_cmd)
+  cmd_name       = cmd_ary.join('')
+  subcmd         = Trepan::SubSubcommand::ShowMaxList.new(parent_cmd.proc,
+                                                          cmd,
+                                                          cmd.name)
+  prefix_run = cmd_ary[1..-1]
+  subcmd.run(prefix_run)
+  
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  puts subcmd.summary_help(cmd.name)
+  puts
+  puts '-' * 20
+end

data/processor/command/show_subcmd/max_subcmd/stack.rb

@@ -0,0 +1,36 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowMaxStack < Trepan::ShowIntSubSubcommand
+  unless defined?(HELP)
+    HELP         = 'Show the number of backtrace lines the debugger will show'
+    MIN_ABBREV   = 'sta'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show max stack)
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+
+  # FIXME: DRY the below code
+  dbgr, show_cmd = MockDebugger::setup('show')
+  testcmdMgr     = Trepan::Subcmd.new(show_cmd)
+  # max_cmd        = Trepan::SubSubcommand::ShowMax.new(dbgr.core.processor, 
+  #                                                     show_cmd)
+  
+  # cmd_name       = Trepan::SubSubcommand::ShowMaxStack::PREFIX.join('')
+  # maxx_cmd       = Trepan::SubSubcommand::ShowMaxStack.new(show_cmd.proc,
+  #                                                          max_cmd,
+  #                                                          cmd_name)
+  # # require_relative '../../../../lib/trepanning'
+  # # dbgr = Trepan.new(:set_restart => true)
+  # # dbgr.debugger
+  puts max_cmd.summary_help(maxx_cmd)
+  puts
+  # maxx_cmd.run([])
+end

data/processor/command/show_subcmd/max_subcmd/string.rb

@@ -0,0 +1,42 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowMaxString < Trepan::ShowIntSubSubcommand
+  unless defined?(HELP)
+    HELP = 'Show the number of characters in a string before truncating.
+
+Sometimes the string representation of an object is very long. This
+setting limits how much of the string representation you want to
+see. However if the string has an embedded newline then we will assume
+the output is intended to be formated as.'
+    MIN_ABBREV   = 'st'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show max string)
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+
+  # FIXME: DRY the below code
+  dbgr, show_cmd = MockDebugger::setup('show')
+  testcmdMgr     = Trepan::Subcmd.new(show_cmd)
+  # max_cmd        = Trepan::SubSubcommand::ShowMax.new(dbgr.core.processor, 
+  #                                                     show_cmd)
+  
+  # cmd_name       = Trepan::SubSubcommand::ShowMaxString::PREFIX.join('')
+  # maxx_cmd       = Trepan::SubSubcommand::ShowMaxString.new(show_cmd.proc,
+  #                                                           max_cmd,
+  #                                                           cmd_name)
+
+  # # require_relative '../../../../lib/trepanning'
+  # # dbgr = Trepan.new(:set_restart => true)
+  # # dbgr.debugger
+  puts max_cmd.summary_help(maxx_cmd)
+  puts 
+  maxx_cmd.run([])
+end

data/processor/command/show_subcmd/max_subcmd/width.rb

@@ -0,0 +1,37 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowMaxWidth < Trepan::ShowIntSubSubcommand
+  unless defined?(HELP)
+    HELP = 'Show the number of characters the debugger thinks are in a line.'
+    MIN_ABBREV   = 'wid'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show max width)
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+
+  # FIXME: DRY the below code
+  dbgr, show_cmd = MockDebugger::setup('show')
+  testcmdMgr     = Trepan::Subcmd.new(show_cmd)
+  # max_cmd        = Trepan::SubSubcommand::ShowMax.new(dbgr.core.processor, 
+  #                                                     show_cmd)
+  # cmd_name       = Trepan::SubSubcommand::ShowMaxWidth::PREFIX.join('')
+  # maxx_cmd       = Trepan::SubSubcommand::ShowMaxWidth.new(show_cmd.proc,
+  #                                                          max_cmd,
+  #                                                          cmd_name)
+  
+  name = File.basename(__FILE__, '.rb')
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  # puts max_cmd.summary_help(maxx_cmd)
+  # puts
+  # maxx_cmd.run([])
+end

data/processor/command/show_subcmd/reload.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../base/subcmd'
+
+class Trepan::Subcommand::ShowReload < Trepan::ShowBoolSubcommand
+  unless defined?(SHORT_HELP)
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP = "Show whether to reread source text when it changes"
+    MIN_ABBREV = 're'.size
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  cmd = MockDebugger::sub_setup(Trepan::Subcommand::ShowReload, false)
+end

data/processor/command/show_subcmd/timer.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../base/subcmd'
+
+class Trepan::Subcommand::ShowTimer < Trepan::ShowBoolSubcommand
+  unless defined?(HELP)
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP       = "Show status of the timing hook"
+    MIN_ABBREV = 'ti'.size
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  cmd = MockDebugger::sub_setup(Trepan::Subcommand::ShowTimer)
+end

data/processor/command/show_subcmd/trace.rb

@@ -0,0 +1,27 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../base/subsubcmd'
+require_relative '../base/subsubmgr'
+
+class Trepan::SubSubcommand::ShowTrace < Trepan::SubSubcommandMgr 
+
+  unless defined?(HELP)
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP = "Show event tracing printing"
+    MIN_ABBREV = 'tr'.size
+    SHORT_HELP = HELP
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  cmd_ary          = Trepan::SubSubcommand::ShowTrace::PREFIX
+  dbgr, parent_cmd = MockDebugger::setup(cmd_ary[0], false)
+  cmd              = Trepan::SubSubcommand::ShowTrace.new(dbgr.processor, 
+                                                          parent_cmd)
+  cmd_name       = cmd_ary.join('')
+  prefix_run = cmd_ary[1..-1]
+  cmd.run(prefix_run)
+end

data/processor/command/show_subcmd/trace_subcmd/.gitignore

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

data/processor/command/show_subcmd/trace_subcmd/buffer.rb

@@ -0,0 +1,64 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowTraceBuffer < Trepan::ShowBoolSubSubcommand
+  Trepanning::SubSubcommand.set_name_prefix(__FILE__, self)
+  unless defined?(HELP)
+    HELP         = <<-EOH
+#{CMD} [NUM]
+
+Show the events recorded in the event buffer. If NUM is a negative
+number, events run starting from that many debugger stops back. If NUM
+is a positive number, we print starting from that (adjusted) position
+in the event buffer with Since the event buffer may be a ring, its
+zero being the first position. (Since the event buffer may be a ring
+the earliest position recorded may move around.)
+    EOH
+    MIN_ABBREV   = 'b'.size
+    SHORT_HELP   = "Show tracing buffer"
+  end
+
+  def parse_show_buffer_args(args)
+    marksize = @proc.eventbuf.size
+    opts = {
+      :max_value    => @proc.eventbuf.size,
+      :min_value    => - marksize,
+      :msg_on_error => 
+      'Positive or negative number expected, got %s.' % args[0]
+    }
+    num = @proc.get_an_int(args[0], opts)
+    return nil, nil unless num
+    num = marksize + num  if num < 0 
+    first = @proc.eventbuf.zero_pos + num
+    return first, nil
+  end
+
+  def run(args)
+    if args.size > 1
+      if @proc.eventbuf.size ==  0 
+        msg 'no events recorded.'
+        errmsg 'event buffer tracing is off. ' + 
+          'use "set trace buffer on" to turn on.' unless 
+          settings[:tracebuffer]
+        return
+      end
+      first, last = parse_show_buffer_args(args[1..-1])
+
+      return unless first
+      @proc.eventbuf_print(first, last, settings[:maxwidth])
+    else
+      super
+    end
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../trace'
+  cmd = MockDebugger::subsub_setup(Trepan::SubSubcommand::ShowTrace,
+                                   Trepan::SubSubcommand::ShowTraceBuffer)
+end

data/processor/command/show_subcmd/trace_subcmd/print.rb

@@ -0,0 +1,23 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowTracePrint < Trepan::ShowBoolSubSubcommand
+  unless defined?(HELP)
+    HELP = "Show tracing print status"
+    MIN_ABBREV   = 'p'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show trace buffer)
+    SHORT_HELP   = "Show tracing print status"
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../trace'
+  cmd = MockDebugger::subsub_setup(Trepan::SubSubcommand::ShowTrace,
+                                   Trepan::SubSubcommand::ShowTracePrint)
+end

data/processor/command/show_subcmd/version.rb

@@ -0,0 +1,23 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'rubygems'; require 'require_relative'
+require_relative '../../../app/options'
+require_relative '../base/subcmd'
+
+class Trepan::Subcommand::ShowVersion < Trepan::Subcommand
+  unless defined?(HELP)
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP         = "Show what version of #{Trepan::PROGRAM} this is"
+    MIN_ABBREV   = 'vers'.size
+  end
+
+  def run(args)
+    msg Trepan::show_version
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  cmd = MockDebugger::sub_setup(Trepan::Subcommand::ShowVersion)
+end

data/processor/command/source.rb

@@ -0,0 +1,133 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+require 'optparse'
+
+# Our local modules
+require 'rubygems'; require 'require_relative'
+require_relative '../command'
+require_relative '../../interface/script'
+require_relative '../../io/null_output'
+require_relative '../../app/default'
+
+class Trepan::Command::SourceCommand < Trepan::Command
+  unless defined?(HELP)
+    NAME = File.basename(__FILE__, '.rb')
+    HELP = <<-HELP
+#{NAME} [options] FILE
+
+options: 
+    -q | --quiet | --no-quiet
+    -c | --continue | --no-continue
+    -Y | --yes | -N | --no
+    -v | --verbose | --no-verbose
+
+Read debugger commands from a file named FILE.  Optional -v switch
+causes each command in FILE to be echoed as it is executed.  Option -Y
+sets the default value in any confirmation command to be 'yes' and -N
+sets the default value to 'no'.
+
+Option -q will turn off any debugger output that normally occurs in the
+running of the program.
+
+Note that the command startup file #{Trepan::CMD_INITFILE_BASE} is read automatically
+via a #{NAME} command the debugger is started.
+
+An error in any command terminates execution of the command file
+unless option -c or --continue is given.
+    HELP
+    CATEGORY     = 'support'
+    MIN_ARGS     = 1  # Need at least this many
+    MAX_ARGS     = nil
+    SHORT_HELP   = 'Read and run debugger commands from a file'
+
+    DEFAULT_OPTIONS = {
+      :abort_on_error => false,
+      :confirm_val => false,
+      :quiet => false,
+      :verbose => false
+    }
+
+  end
+
+  def complete(prefix)
+    # opts = %w(-c --continue --no-continue -N --no -y --yes
+    #           --verbose --no-verbose)
+    # return Trepan::Complete.complete_token(opts, prefix) if prefix.empty?
+    Readline::FILENAME_COMPLETION_PROC.call(prefix) || []
+  end
+    
+  def parse_options(options, args) # :nodoc
+    seen_yes_no = false
+    parser = OptionParser.new do |opts|
+      opts.on('-c', '--[no-]continue', 
+              'Continue in the face of errors') do
+        |v| 
+        options[:abort_on_error] = !v
+      end
+      opts.on('-v', 
+              '--[no-]verbose', 'echo each command as it is executed') do
+        |v| 
+        options[:verbose] = v
+      end
+      opts.on('-N', '--no', "Use 'no' in any confirmation prompts") do
+        |v| 
+        if seen_yes_no
+          msg('Yes/No option already seen. This option (no) ignored.')
+        end
+        options[:confirm_val] = false
+      end
+      opts.on('-q', '--[no-]quiet', 'Silence debugger output') do
+        |v| 
+        options[:quiet] = v
+      end
+      opts.on('-Y', '--yes', "Use 'yes' in any confirmation prompts") do
+        |v| 
+        if seen_yes_no
+          msg("Yes/No option already seen. This option, --yes, ignored.")
+        end
+        options[:confirm_val] = true
+        seen_yes_no = true
+      end
+    end
+    parser.parse(args)
+    return options
+  end
+
+  def run(args)
+    options = parse_options(DEFAULT_OPTIONS.dup, args[1..-2])
+    intf = @proc.dbgr.intf
+    output  = options[:quiet] ? Trepan::OutputNull.new(nil) : intf[-1].output
+    
+    filename = args[-1]
+    
+    expanded_file = File.expand_path(filename)
+    unless File.readable?(expanded_file)
+      errmsg("Debugger command file '%s' is not a readable file" % filename)
+      return false
+    end
+    
+    # Push a new debugger interface.
+    script_intf = Trepan::ScriptInterface.new(expanded_file, output, options)
+    intf << script_intf
+    return false
+  end
+end
+  
+# Demo it
+if __FILE__ == $0
+  require_relative '../mock'
+  dbgr, cmd = MockDebugger::setup
+  %w(--quiet -q --no-quiet --continue --no-continue -c -v --verbose 
+     --no-verbose).each do |opt|
+    puts "parsing #{opt}"
+    options = 
+      cmd.parse_options(Trepan::Command::SourceCommand::DEFAULT_OPTIONS.dup,
+                        opt)
+    p options
+  end
+
+  if ARGV.size >= 1 
+    puts "running... #{cmd.name} #{ARGV}"
+    cmd.run([cmd.name, *ARGV])
+  end
+end

data/processor/command/step.rb

@@ -0,0 +1,97 @@
+require 'rubygems'; require 'require_relative'
+require_relative '../command'
+require_relative '../../app/condition'
+require_relative '../stepping'
+
+class Trepan::Command::StepCommand < Trepan::Command
+
+  ALIASES      = %w(s s+ s- step+ step-)
+  CATEGORY     = 'running'
+  NAME         = File.basename(__FILE__, '.rb')
+  HELP         = <<-HELP
+#{NAME}[+|-] [into]  [count]
+#{NAME} until EXPRESSION
+#{NAME} over [args..]
+#{NAME} out  [args..]
+
+Execute the current line, stopping at the next line.  Sometimes this
+is called 'step into'.
+
+Behaves like 'next', but if there is a method call on the current line,
+execution is stopped in the called method.
+
+Examples: 
+  #{NAME}        # step 1 line
+  #{NAME} 1      # same as above
+  #{NAME} into   # same as above
+  #{NAME} into 1 # same as above
+  #{NAME} 5/5+0  # same as above
+  #{NAME}+       # same but force stopping on a new line
+  #{NAME}-       # same but force stopping on a new line a new frame added
+  #{NAME} until a > b
+  #{NAME} over   # same as 'next'
+  #{NAME} out    # same as 'finish'
+
+Related and similar is the 'next' (step over) and 'finish' (step out)
+commands.
+
+See also the commands:
+'continue', 'next', 'nexti' and 'finish' for other ways to progress execution.
+      HELP
+  NEED_RUNNING = true
+  SHORT_HELP   = 'Step into next method call or to next line'
+
+  Keyword_to_related_cmd = {
+    'out'  => 'finish',
+    'over' => 'next',
+    'into' => 'step',
+  }
+  
+  include Trepan::Condition
+  # This method runs the command
+  def run(args) # :nodoc
+    condition = nil
+    opts = {}
+    if args.size == 1
+      step_count = 1
+    else
+      replace_cmd = Keyword_to_related_cmd[args[1]]
+      if replace_cmd
+        cmd = @proc.commands[replace_cmd]
+        return cmd.run([replace_cmd] + args[2..-1])
+      elsif 'until' == args[1]
+        try_condition = args[2..-1].join(' ')
+        if valid_condition?(try_condition)
+          condition = try_condition
+          opts[:different_pos] = false
+          step_count = 0
+        end
+      else
+        step_str = args[1]
+        opts = @proc.parse_next_step_suffix(args[0])
+        count_opts = {
+          :msg_on_error => 
+          "The #{NAME} command argument must eval to an integer. Got: %s" % 
+          step_str,
+          :min_value => 1
+        }
+        step_count = @proc.get_an_int(step_str, count_opts)
+        return unless step_count
+      end
+    end
+    
+    @proc.step('step', step_count, opts, condition)
+  end
+end
+
+if __FILE__ == $0
+  require_relative '../mock'
+  dbgr, cmd = MockDebugger::setup
+  [%W(#{cmd.name}), %W(#{cmd.name} 2), %W(#{cmd.name} into 1+2),
+   %W(#{cmd.name} over)].each do |c|
+    cmd.proc.instance_variable_set('@return_to_program', false)
+    cmd.run(c)
+    puts 'return_to_program: %s' % cmd.proc.instance_variable_get('@return_to_program')
+    puts 'step_count: %s' % cmd.proc.instance_variable_get('@step_count')
+  end
+end

data/processor/command/tbreak.rb

@@ -0,0 +1,20 @@
+require 'rubygems'; require 'require_relative'
+require_relative '../command'
+require_relative 'break'
+
+class Trepan::Command::SetTempBreakpointCommand < 
+    Trepan::Command::BreakCommand
+  ALIASES      = []
+  CATEGORY     = 'breakpoints'
+  NAME         = File.basename(__FILE__, '.rb')
+  HELP         = <<-HELP
+Same as break, but the breakpoint is deleted when it is hit.
+See also "break".
+      HELP
+  SHORT_HELP   = 'Set a temporary breakpoint'
+  
+  def run(args)
+    super args, true
+  end
+end
+