This is the mail archive of the gdb-patches@sources.redhat.com mailing list for the GDB project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

[RFA] gdb.base/commands.exp: make all test names unique


This patch changes gdb.base/commands.exp to make all test names unique.

Testing: I tested this on native Red Hat Linux 7 and native Solaris 2.8.

OK to apply?

Michael

===

2001-05-19  Michael Chastain  <chastain@redhat.com>

	* gdb.base/commands.exp: Make all test names unique.

Index: gdb/testsuite/gdb.base/commands.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/commands.exp,v
retrieving revision 1.8
diff -c -3 -p -r1.8 commands.exp
*** gdb/testsuite/gdb.base/commands.exp	2001/03/06 08:21:50	1.8
--- gdb/testsuite/gdb.base/commands.exp	2001/05/20 05:54:01
*************** proc infrun_breakpoint_command_test {} {
*** 184,190 ****
          return
      }
  
!     gdb_test "set args 6" "" "set args in progvar_simple_while_test"
      if { ![runto factorial] } then { gdb_suppress_tests }
      # Don't depend upon argument passing, since most simulators don't
      # currently support it.  Bash value variable to be what we want.
--- 184,190 ----
          return
      }
  
!     gdb_test "set args 6" "" "set args in infrun_breakpoint_command_test"
      if { ![runto factorial] } then { gdb_suppress_tests }
      # Don't depend upon argument passing, since most simulators don't
      # currently support it.  Bash value variable to be what we want.
*************** proc watchpoint_command_test {} {
*** 326,333 ****
      }
      send_gdb "end\n"
      gdb_expect {
! 	-re "$gdb_prompt $"   {pass "begin commands on watch"}
! 	timeout               {fail "(timeout) begin commands on watch"}
      }
      send_gdb "continue\n"
      gdb_expect {
--- 326,333 ----
      }
      send_gdb "end\n"
      gdb_expect {
! 	-re "$gdb_prompt $"   {pass "end commands on watch"}
! 	timeout               {fail "(timeout) end commands on watch"}
      }
      send_gdb "continue\n"
      gdb_expect {
*************** proc test_command_prompt_position {} {
*** 351,357 ****
      # Don't depend upon argument passing, since most simulators don't
      # currently support it.  Bash value variable to be what we want.
      delete_breakpoints
!     gdb_test "break factorial" "Breakpoint.*at.*" "break factorial #2"
      gdb_test "p value=5" "" "set value to 5 in test_command_prompt_position"
      # All this test should do is print 0xdeadbeef once.
      gdb_test "if value == 1\np/x 0xfeedface\nelse\np/x 0xdeadbeef\nend" \
--- 351,357 ----
      # Don't depend upon argument passing, since most simulators don't
      # currently support it.  Bash value variable to be what we want.
      delete_breakpoints
!     gdb_test "break factorial" "Breakpoint.*at.*" "break factorial #3"
      gdb_test "p value=5" "" "set value to 5 in test_command_prompt_position"
      # All this test should do is print 0xdeadbeef once.
      gdb_test "if value == 1\np/x 0xfeedface\nelse\np/x 0xdeadbeef\nend" \
*************** proc test_command_prompt_position {} {
*** 406,439 ****
  
  proc deprecated_command_test {} {
      gdb_test "maintenance deprecate blah" "Can't find command.*" \
!           "tried to deprecate non-existsing command"
  
!     gdb_test "maintenance deprecate p \"new_p\"" ""
      gdb_test "p 5" \
  	    "Warning: 'p', an alias for the command 'print' is deprecated.*Use 'new_p'.*" \
  	    "p deprecated warning, with replacement"
!     gdb_test "p 5" ".\[0-9\]* = 5.*" "Deprecated warning goes away"
  
!     gdb_test "maintenance deprecate p \"new_p\"" ""
      gdb_test "maintenance deprecate print \"new_print\"" ""
      gdb_test "p 5" \
  	    "Warning: command 'print' \\(p\\) is deprecated.*Use 'new_print'.*" \
  	    "both alias and command are deprecated"
!     gdb_test "p 5" ".\[0-9\]* = 5.*" "Deprecated warning goes away"
  
      gdb_test "maintenance deprecate set remote memory-read-packet-size \"srm\" " \
  	    "" \
! 	    "deprecate long comamnd"
      gdb_test "set remote memory-read-packet-size" \
  	    "Warning: command 'set remote memory-read-packet-size' is deprecated.*Use 'srm'.*" \
! 	    "long command deprecated"
  
      gdb_test "maintenance deprecate set remote memory-read-packet-size" \
  	    "" \
! 	    "deprecate long comamnd"
      gdb_test "set remote memory-read-packet-size" \
  	    "Warning: command 'set remote memory-read-packet-size' is deprecated.*No alternative known.*" \
! 	    "long command deprecated with no alternative."
  
      gdb_test "maintenance deprecate" \
  	    "\"maintenance deprecate\".*" \
--- 406,439 ----
  
  proc deprecated_command_test {} {
      gdb_test "maintenance deprecate blah" "Can't find command.*" \
!           "tried to deprecate non-existing command"
  
!     gdb_test "maintenance deprecate p \"new_p\"" "" "maintenance deprecate p \"new_p\" /1/"
      gdb_test "p 5" \
  	    "Warning: 'p', an alias for the command 'print' is deprecated.*Use 'new_p'.*" \
  	    "p deprecated warning, with replacement"
!     gdb_test "p 5" ".\[0-9\]* = 5.*" "Deprecated warning goes away /1/"
  
!     gdb_test "maintenance deprecate p \"new_p\"" "" "maintenance deprecate p \"new_p\" /2/"
      gdb_test "maintenance deprecate print \"new_print\"" ""
      gdb_test "p 5" \
  	    "Warning: command 'print' \\(p\\) is deprecated.*Use 'new_print'.*" \
  	    "both alias and command are deprecated"
!     gdb_test "p 5" ".\[0-9\]* = 5.*" "Deprecated warning goes away /2/"
  
      gdb_test "maintenance deprecate set remote memory-read-packet-size \"srm\" " \
  	    "" \
! 	    "deprecate long command /1/"
      gdb_test "set remote memory-read-packet-size" \
  	    "Warning: command 'set remote memory-read-packet-size' is deprecated.*Use 'srm'.*" \
! 	    "long command deprecated /1/"
  
      gdb_test "maintenance deprecate set remote memory-read-packet-size" \
  	    "" \
! 	    "deprecate long command /2/"
      gdb_test "set remote memory-read-packet-size" \
  	    "Warning: command 'set remote memory-read-packet-size' is deprecated.*No alternative known.*" \
! 	    "long command deprecated with no alternative /2/"
  
      gdb_test "maintenance deprecate" \
  	    "\"maintenance deprecate\".*" \


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]