* gdb.base/exprs.exp(test_expr): Make sure each test gets a unique
name.
This commit is contained in:
parent
42c254c939
commit
38ee47dc4a
|
@ -1,5 +1,8 @@
|
||||||
Thu Feb 20 13:57:01 1997 Bob Manson <manson@charmed.cygnus.com>
|
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/help.exp: Fix the syntax of a few gdb_test calls.
|
||||||
|
|
||||||
* gdb.base/scope.exp: Use gdb_test.
|
* gdb.base/scope.exp: Use gdb_test.
|
||||||
|
|
|
@ -65,7 +65,7 @@ proc test_expr { args } {
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
for {set x 1} {$x < $last_ent} {set x [expr $x + 2]} {
|
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;
|
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 >"
|
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
|
# 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 "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\]* = 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\]* = 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)"
|
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)"
|
||||||
|
|
Loading…
Reference in New Issue