debugger 1.0.0.rc1

data/test/data/list.cmd

@@ -0,0 +1,19 @@
+# ********************************************************
+# This tests the 'list' command.
+# ********************************************************
+set basename on
+list
+list
+list
+list
+list -
+list -
+list -
+list -
+list 1
+list 20
+set listsize 5
+list 5
+list =
+list 3-4
+

data/test/data/list.right

@@ -0,0 +1,127 @@
+gcd.rb:4
+def gcd(a, b)
+# # ********************************************************
+# # This tests the 'list' command.
+# # ********************************************************
+# set basename on
+basename is on.
+# list
+[-1, 8] in ./gcd.rb
+   1  #!/usr/bin/env ruby
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+   7      a, b = [b, a]
+   8    end
+# list
+[9, 18] in ./gcd.rb
+   9  
+   10    return nil if a <= 0
+   11  
+   12    if a == 1 or b-a == 0
+   13      return a
+   14    end
+   15    gcd(b-a, a)
+   16  end
+   17  
+   18  gcd(3,5)
+# list
+[9, 18] in ./gcd.rb
+   9  
+   10    return nil if a <= 0
+   11  
+   12    if a == 1 or b-a == 0
+   13      return a
+   14    end
+   15    gcd(b-a, a)
+   16  end
+   17  
+   18  gcd(3,5)
+# list
+[9, 18] in ./gcd.rb
+   9  
+   10    return nil if a <= 0
+   11  
+   12    if a == 1 or b-a == 0
+   13      return a
+   14    end
+   15    gcd(b-a, a)
+   16  end
+   17  
+   18  gcd(3,5)
+# list -
+[-1, 8] in ./gcd.rb
+   1  #!/usr/bin/env ruby
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+   7      a, b = [b, a]
+   8    end
+# list -
+[-1, 8] in ./gcd.rb
+   1  #!/usr/bin/env ruby
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+   7      a, b = [b, a]
+   8    end
+# list -
+[-1, 8] in ./gcd.rb
+   1  #!/usr/bin/env ruby
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+   7      a, b = [b, a]
+   8    end
+# list -
+[-1, 8] in ./gcd.rb
+   1  #!/usr/bin/env ruby
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+   7      a, b = [b, a]
+   8    end
+# list 1
+[-4, 5] in ./gcd.rb
+   1  #!/usr/bin/env ruby
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+# list 20
+[15, 24] in ./gcd.rb
+   15    gcd(b-a, a)
+   16  end
+   17  
+   18  gcd(3,5)
+# set listsize 5
+Number of source lines to list by default is 5.
+# list 5
+[3, 7] in ./gcd.rb
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+   7      a, b = [b, a]
+# list =
+[2, 6] in ./gcd.rb
+   2  
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+   5    # Make: a <= b
+   6    if a > b
+# list 3-4
+[3, 4] in ./gcd.rb
+   3  # GCD. We assume positive numbers
+=> 4  def gcd(a, b)
+# 

data/test/data/method.cmd

@@ -0,0 +1,10 @@
+# ********************************************************
+# This tests the 'method' command
+# ********************************************************
+set debuggertesting on
+set autoeval off
+b 11
+c
+method Mine
+m iv me
+quit

data/test/data/method.right

@@ -0,0 +1,21 @@
+classes.rb:1
+class Mine
+# # ********************************************************
+# # This tests the 'method' command
+# # ********************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# set autoeval off
+autoeval is off.
+# b 11
+Breakpoint 1 file ./classes.rb, line 11
+# c
+Breakpoint 1 at classes.rb:11
+classes.rb:11
+metoo = Mine(new)
+# method Mine
+mymethod
+
+# m iv me
+@myvar = "init"
+# quit

data/test/data/methodsig.cmd

@@ -0,0 +1,10 @@
+# ********************************************************
+# This tests the 'method' command
+# ********************************************************
+set debuggertesting on
+set autoeval off
+b 3
+c
+method sig initialize
+method sig mymethod
+quit

data/test/data/methodsig.right

@@ -0,0 +1,20 @@
+classes.rb:1
+class Mine
+# # ********************************************************
+# # This tests the 'method' command
+# # ********************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# set autoeval off
+autoeval is off.
+# b 3
+Breakpoint 1 file ./classes.rb, line 3
+# c
+Breakpoint 1 at classes.rb:3
+classes.rb:3
+@myvar = 'init'
+# method sig initialize
+Mine#initialize()
+# method sig mymethod
+Mine#mymethod(a, b=5, &block)
+# quit

data/test/data/next.cmd

@@ -0,0 +1,22 @@
+# ********************************************************
+# This tests next command and break at proc def
+# ********************************************************
+set debuggertesting on
+set callstyle last
+set force off
+break 1
+next
+next
+next
+next
+next
+next
+next
+next
+next
+next
+next
+next
+next
+next
+next

data/test/data/next.right

@@ -0,0 +1,61 @@
+next.rb:1
+def foo
+# # ********************************************************
+# # This tests next command and break at proc def
+# # ********************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# set callstyle last
+Frame call-display style is last.
+# set force off
+force-stepping is off.
+# break 1
+Breakpoint 1 file ./next.rb, line 1
+# next
+next.rb:7
+a = 1
+# next
+next.rb:8
+if a == 1
+# next
+next.rb:9
+a += 2
+# next
+next.rb:10
+puts a
+# next
+3
+next.rb:12
+foo
+# next
+Breakpoint 1 at next.rb:1
+next.rb:1
+def foo
+# next
+next.rb:2
+a = 1
+# next
+next.rb:3
+puts "Stop here"
+# next
+Stop here
+next.rb:4
+b = 2
+# next
+next.rb:13
+b = 2
+# next
+next.rb:14
+b += 2
+# next
+next.rb:15
+puts "one"
+# next
+one
+next.rb:16
+c = 4
+# next
+next.rb:17
+puts "two"
+# next
+two

data/test/data/noquit.right

@@ -0,0 +1 @@
+The program has finished and will be restarted.

data/test/data/output.cmd

@@ -0,0 +1,6 @@
+# ********************************************************
+# This tests the "starting" annotation
+# ********************************************************
+step
+step
+quit

data/test/data/output.right

@@ -0,0 +1,31 @@
+starting
+stopped
+breakpoints
+No breakpoints.
+
+stack
+--> #0 at line ./output.rb:1
+
+variables
+self = main
+
+source ./output.rb:1
+puts "one"
+# # ********************************************************
+# # This tests the "starting" annotation
+# # ********************************************************
+# step
+starting
+one
+stopped
+stack
+--> #0 at line ./output.rb:2
+
+variables
+self = main
+
+source ./output.rb:2
+puts "two"
+# step
+starting
+two

data/test/data/pm-bug.cmd

@@ -0,0 +1,7 @@
+# ********************************************************
+# This tests the edit command
+# ********************************************************
+set debuggertesting on
+# Tracker #22118
+i v 
+quit

data/test/data/pm-bug.right

@@ -0,0 +1,12 @@
+pm-bug.rb:1
+a = 1
+# # ********************************************************
+# # This tests the edit command
+# # ********************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# # Tracker #22118
+# i v 
+a = nil
+self = main
+# quit

data/test/data/post-mortem-next.cmd

@@ -0,0 +1,8 @@
+# ******************************************************
+# This tests running "next" over code that post-mortems
+# ******************************************************
+set debuggertesting on
+next 2
+next
+quit
+

data/test/data/post-mortem-next.right

@@ -0,0 +1,14 @@
+pm.rb:3
+def zero_div
+# # ******************************************************
+# # This tests running "next" over code that post-mortems
+# # ******************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# next 2
+pm.rb:8
+zero_div
+# next
+pm.rb:5
+1/0
+# quit

data/test/data/post-mortem-osx.right

@@ -0,0 +1,31 @@
+pm.rb:3
+def zero_div
+# # ***************************************************
+# # This tests post-mortem handling.
+# # ***************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# continue
+pm.rb:5
+1/0
+# # Should have got a divide by 0 error
+# info program
+The program crashed.
+Exception: #<ZeroDivisionError: divided by 0>
+# where
+--> #0 / at line pm.rb:5
+    #1 at line pm.rb:8
+# up
+#1 at line pm.rb:8
+# p x
+2
+# help
+Type 'help <command-name>' for help on a specific command
+
+Available commands:
+backtrace  delete   edit    frame  list    ps      restart  source  undisplay
+break      disable  enable  help   method  putl    save     thread  up       
+catch      display  eval    info   p       quit    set      tmate   var      
+condition  down     exit    irb    pp      reload  show     trace   where    
+
+# quit

data/test/data/post-mortem.cmd

@@ -0,0 +1,13 @@
+# ***************************************************
+# This tests post-mortem handling.
+# ***************************************************
+set debuggertesting on
+continue
+# Should have got a divide by 0 error
+info program
+where
+up
+p x
+help
+quit
+

data/test/data/post-mortem.right

@@ -0,0 +1,32 @@
+pm.rb:3
+def zero_div
+# # ***************************************************
+# # This tests post-mortem handling.
+# # ***************************************************
+# set debuggertesting on
+Currently testing the debugger is on.
+# continue
+pm.rb:5
+1/0
+# # Should have got a divide by 0 error
+# info program
+The program crashed.
+Exception: #<ZeroDivisionError: divided by 0>
+# where
+--> #0 / at line pm.rb:5
+    #1 at line pm.rb:8
+# up
+#1 at line pm.rb:8
+# p x
+2
+# help
+Type 'help <command-name>' for help on a specific command
+
+Available commands:
+backtrace  delete   enable  info    p     reload   source     var  
+break      disable  eval    irb     pp    restart  thread     where
+catch      display  exit    kill    ps    save     trace    
+condition  down     frame   list    putl  set      undisplay
+continue   edit     help    method  quit  show     up       
+
+# quit