Index: gdb/testsuite/gdb.python/py-value.exp |
diff --git a/gdb/testsuite/gdb.python/py-value.exp b/gdb/testsuite/gdb.python/py-value.exp |
index 038361eb02d7b780855fcf87f89fd0cf777fcb71..87b0734a27e3e195c110f704cfad377ae530449d 100644 |
--- a/gdb/testsuite/gdb.python/py-value.exp |
+++ b/gdb/testsuite/gdb.python/py-value.exp |
@@ -16,15 +16,9 @@ |
# This file is part of the GDB testsuite. It tests the mechanism |
# exposing values to Python. |
-if $tracelevel then { |
- strace $tracelevel |
-} |
- |
load_lib gdb-python.exp |
-set testfile "py-value" |
-set srcfile ${testfile}.c |
-set binfile ${objdir}/${subdir}/${testfile} |
+standard_testfile |
# Build inferior to language specification. |
proc build_inferior {exefile lang} { |
@@ -106,8 +100,8 @@ proc test_value_numeric_ops {} { |
gdb_test "print (void *) 5" ".*" "" |
gdb_test_no_output "python b = gdb.history (0)" "" |
- gdb_test "python print 'result = ' + str(a+5)" " = 0x7" "add pointer value with python integer" |
- gdb_test "python print 'result = ' + str(b-2)" " = 0x3" "subtract python integer from pointer value" |
+ gdb_test "python print 'result = ' + str(a+5)" " = 0x7( <.*>)?" "add pointer value with python integer" |
+ gdb_test "python print 'result = ' + str(b-2)" " = 0x3( <.*>)?" "subtract python integer from pointer value" |
gdb_test "python print 'result = ' + str(b-a)" " = 3" "subtract two pointer values" |
# Test some invalid operations. |