diff options
| author | Bob Manson <manson@cygnus> | 1997-02-20 23:45:23 +0000 |
|---|---|---|
| committer | Bob Manson <manson@cygnus> | 1997-02-20 23:45:23 +0000 |
| commit | 38ee47dc4a17cc4051d9574d97be33a0bcbd0706 (patch) | |
| tree | fb893715919a7d3db89c1c9cc430a9fbaacda6f9 | |
| parent | 42c254c9395e9f6832d9ccc3ad8fe073f1a46f78 (diff) | |
| download | gdb-38ee47dc4a17cc4051d9574d97be33a0bcbd0706.zip gdb-38ee47dc4a17cc4051d9574d97be33a0bcbd0706.tar.gz gdb-38ee47dc4a17cc4051d9574d97be33a0bcbd0706.tar.bz2 | |
* gdb.base/exprs.exp(test_expr): Make sure each test gets a unique
name.
| -rw-r--r-- | gdb/testsuite/ChangeLog | 3 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/exprs.exp | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 249e325..f434ad4 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,8 @@ Thu Feb 20 13:57:01 1997 Bob Manson <manson@charmed.cygnus.com> + * gdb.base/exprs.exp(test_expr): Make sure each test gets a unique + name. + * gdb.base/help.exp: Fix the syntax of a few gdb_test calls. * gdb.base/scope.exp: Use gdb_test. diff --git a/gdb/testsuite/gdb.base/exprs.exp b/gdb/testsuite/gdb.base/exprs.exp index b49e6d6..859c14d 100644 --- a/gdb/testsuite/gdb.base/exprs.exp +++ b/gdb/testsuite/gdb.base/exprs.exp @@ -65,7 +65,7 @@ proc test_expr { args } { return 1; } for {set x 1} {$x < $last_ent} {set x [expr $x + 2]} { - if [gdb_test [lindex $args $x] [lindex $args [expr $x + 1]] $testname] { + if [gdb_test [lindex $args $x] [lindex $args [expr $x + 1]] "$testname ([lindex $args $x])"] { return 1; } } @@ -176,7 +176,6 @@ test_expr "set variable v_unsigned_int=0x7FFF" "print v_unsigned_int < 0" "\\$\[ test_expr "set variable v_unsigned_int=0x7FFF" "print v_unsigned_int > 0" "\\$\[0-9\]* = 1" "print v_unsigned_int > 0x7FFF" "\\$\[0-9\]* = 0" "print unsigned int >" # make int a minus test_expr "set variable v_unsigned_int=~0" "print v_unsigned_int == 0" "\\$\[0-9\]* = 0" "print v_unsigned_int == ~0" "\\$\[0-9\]* = 1" "print v_unsigned_int == (unsigned int)~0" "\\$\[0-9\]* = 1" "print unsigned int == (~0)" -test_expr "\\$\[0-9\]* = 0" "print v_unsigned_int == (unsigned int)~0" "\\$\[0-9\]* = 1" "print unsigned int == (~0)" test_expr "set variable v_unsigned_int=~0" "print v_unsigned_int != 0" "\\$\[0-9\]* = 1" "print v_unsigned_int != (unsigned int)~0" "\\$\[0-9\]* = 0" "print unsigned int != (~0)" test_expr "set variable v_unsigned_int=~0" "print v_unsigned_int < 0" "\\$\[0-9\]* = 0" "print v_unsigned_int < 0x7FFF" "\\$\[0-9\]* = 0" "print unsigned int < (~0)" test_expr "set variable v_unsigned_int=~0" "print v_unsigned_int > 0" "\\$\[0-9\]* = 1" "print v_unsigned_int > 0x7FFF" "\\$\[0-9\]* = 1" "print unsigned int > (~0)" |