This is the mail archive of the
gdb-patches@sourceware.org
mailing list for the GDB project.
Re: RFA: add C++ alternate punctuators
On Mon, 22 Dec 2008 15:21:16 +0100, Tom Tromey wrote:
> I checked it in. Thanks.
Getting:
Running ../.././gdb/testsuite/gdb.cp/punctuator.exp ...
PASS: gdb.cp/punctuator.exp: set lang c++
PASS: gdb.cp/punctuator.exp: print (0x5a5a bitand 0xaaaa) == (0x5a5a & 0xaaaa)
PASS: gdb.cp/punctuator.exp: print (0x5a5a bitor 0xaaaa) == (0x5a5a | 0xaaaa)
PASS: gdb.cp/punctuator.exp: print (0x5a5a xor 0xaaaa) == (0x5a5a ^ 0xaaaa)
PASS: gdb.cp/punctuator.exp: print (0x5a5a and 0xaaaa) == (0x5a5a && 0xaaaa)
PASS: gdb.cp/punctuator.exp: print (0x5a5a or 0xaaaa) == (0x5a5a || 0xaaaa)
PASS: gdb.cp/punctuator.exp: print (not not 0xaaaa) == (!!0xaaaa)
PASS: gdb.cp/punctuator.exp: print (compl 0xaaaa) == (~0xaaaa)
ERROR: tcl error sourcing ../.././gdb/testsuite/gdb.cp/punctuator.exp.
ERROR: can't read "u": no such variable
while executing
"gdb_test "set $u = 0x5a5a" """
(file "../.././gdb/testsuite/gdb.cp/punctuator.exp" line 38)
invoked from within
"source ../.././gdb/testsuite/gdb.cp/punctuator.exp"
("uplevel" body line 1)
invoked from within
"uplevel #0 source ../.././gdb/testsuite/gdb.cp/punctuator.exp"
invoked from within
"catch "uplevel #0 source $test_file_name""
on dejagnu-1.4.4-13.fc10.noarch, I do not understand where it could work.
OK to check in?
Regards,
Jan
gdb/testsuite/
2008-12-23 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.cp/punctuator.exp: Backslash the '$' signs.
--- gdb/testsuite/gdb.cp/punctuator.exp 22 Dec 2008 14:21:01 -0000 1.1
+++ gdb/testsuite/gdb.cp/punctuator.exp 23 Dec 2008 09:58:46 -0000
@@ -35,18 +35,18 @@ gdb_test "print (0x5a5a or 0xaaaa) == (0
gdb_test "print (not not 0xaaaa) == (!!0xaaaa)" " = true"
gdb_test "print (compl 0xaaaa) == (~0xaaaa)" " = true"
-gdb_test "set $u = 0x5a5a" ""
-gdb_test "set $v = 0x5a5a" ""
-gdb_test "print ($u not_eq 0xaaaa) == ($v != 0xaaaa)" "= true"
-gdb_test "print ($u and_eq 0xaaaa) == ($v &= 0xaaaa)" "= true"
+gdb_test "set \$u = 0x5a5a" ""
+gdb_test "set \$v = 0x5a5a" ""
+gdb_test "print (\$u not_eq 0xaaaa) == (\$v != 0xaaaa)" "= true"
+gdb_test "print (\$u and_eq 0xaaaa) == (\$v &= 0xaaaa)" "= true"
-gdb_test "set $u = 0x5a5a" ""
-gdb_test "set $v = 0x5a5a" ""
-gdb_test "print ($u or_eq 0xaaaa) == ($v |= 0xaaaa)" "= true"
+gdb_test "set \$u = 0x5a5a" ""
+gdb_test "set \$v = 0x5a5a" ""
+gdb_test "print (\$u or_eq 0xaaaa) == (\$v |= 0xaaaa)" "= true"
-gdb_test "set $u = 0x5a5a" ""
-gdb_test "set $v = 0x5a5a" ""
-gdb_test "print ($u xor_eq 0xaaaa) == ($v ^= 0xaaaa)" "= true"
+gdb_test "set \$u = 0x5a5a" ""
+gdb_test "set \$v = 0x5a5a" ""
+gdb_test "print (\$u xor_eq 0xaaaa) == (\$v ^= 0xaaaa)" "= true"
gdb_exit
return 0