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.multi/base.exp | |
| 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.multi/base.exp')
| -rw-r--r-- | gdb/testsuite/gdb.multi/base.exp | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/gdb/testsuite/gdb.multi/base.exp b/gdb/testsuite/gdb.multi/base.exp index 6f0bc63..e02f95f 100644 --- a/gdb/testsuite/gdb.multi/base.exp +++ b/gdb/testsuite/gdb.multi/base.exp @@ -59,7 +59,7 @@ gdb_test "add-inferior -exec ${binfile3}" \ # Check that we have multiple inferiors. gdb_test "info inferiors" \ - "Executable.*${exec1}.*${exec2}.*${exec3}.*" + "Executable.*${exec3}.*${exec2}.*${exec1}.*" # Test info inferiors with args @@ -68,16 +68,16 @@ set see2 0 set see3 0 gdb_test_multiple "info inferior 2 3" "info inferior 2 3" { - -re ". 1 \[^\r\n\]*${exec1}" { - set see1 1 + -re ". 3 \[^\r\n\]*${exec3}" { + set see3 1 exp_continue } -re ". 2 \[^\r\n\]*${exec2}" { set see2 1 exp_continue } - -re ". 3 \[^\r\n\]*${exec3}" { - set see3 1 + -re ". 1 \[^\r\n\]*${exec1}" { + set see1 1 exp_continue } -re "$gdb_prompt $" { @@ -94,16 +94,16 @@ set see2 0 set see3 0 gdb_test_multiple "info inferior 1-2" "info inferior 1-2" { - -re ". 1 \[^\r\n\]*${exec1}" { - set see1 1 + -re ". 3 \[^\r\n\]*${exec3}" { + set see3 1 exp_continue } -re ". 2 \[^\r\n\]*${exec2}" { set see2 1 exp_continue } - -re ". 3 \[^\r\n\]*${exec3}" { - set see3 1 + -re ". 1 \[^\r\n\]*${exec1}" { + set see1 1 exp_continue } -re "$gdb_prompt $" { |