diff options
author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2016-01-11 22:12:16 +0100 |
---|---|---|
committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2016-01-11 22:12:16 +0100 |
commit | c0ecb95f3dc0c3e8d1545f0a37c0c3e537e1ea96 (patch) | |
tree | 72686402952a13042e8e50ea6e58834c0a4d5255 /gdb/testsuite/gdb.guile | |
parent | b835bb5265d614fd8a4759f284b987b365292c36 (diff) | |
download | gdb-c0ecb95f3dc0c3e8d1545f0a37c0c3e537e1ea96.zip gdb-c0ecb95f3dc0c3e8d1545f0a37c0c3e537e1ea96.tar.gz gdb-c0ecb95f3dc0c3e8d1545f0a37c0c3e537e1ea96.tar.bz2 |
testsuite: Fix false FAILs on too long base directory
I was getting
gu (print arg0)^M
= 0x7fffffffdafb
"/unsafebuild-x86_64-redhat-linux-gnu/gdb/testsuite.unix.-m64/outputs/gdb.guile/scm-value/scm-"...^M
(gdb) FAIL: gdb.guile/scm-value.exp: verify dereferenced value
python print (arg0)^M
0x7fffffffdafd
"/unsafebuild-x86_64-redhat-linux-gnu/gdb/testsuite.unix.-m64/outputs/gdb.python/py-value/py-v"...^M
(gdb) FAIL: gdb.python/py-value.exp: verify dereferenced value
and also:
(gdb) p argv[0]^M
$2 = 0x7fffffffd832 "/home/jkratoch/redhat/gdb-test-", 'x' <repeats 169
times>...^M
(gdb) FAIL: gdb.guile/scm-value.exp: argv[0] should be available on this
target
gdb/testsuite/ChangeLog
2016-01-11 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.guile/scm-value.exp (test_value_in_inferior): Set print elements
and repeats to unlimited.
* gdb.python/py-value.exp: Likewise.
* lib/gdb.exp (gdb_has_argv0): Save and temporarily set print elements
and repeats to unlimited.
Diffstat (limited to 'gdb/testsuite/gdb.guile')
-rw-r--r-- | gdb/testsuite/gdb.guile/scm-value.exp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.guile/scm-value.exp b/gdb/testsuite/gdb.guile/scm-value.exp index 8c858d5..1d07c9f 100644 --- a/gdb/testsuite/gdb.guile/scm-value.exp +++ b/gdb/testsuite/gdb.guile/scm-value.exp @@ -91,6 +91,8 @@ proc test_value_in_inferior {} { global has_argv0 set test "verify dereferenced value" if { $has_argv0 } { + gdb_test_no_output "set print elements unlimited" "" + gdb_test_no_output "set print repeats unlimited" "" gdb_test "gu (print arg0)" "0x.*$testfile\"" $test } else { unsupported $test |