diff options
| author | Yufeng Zhang <yufeng.zhang@arm.com> | 2013-10-02 18:09:26 +0000 |
|---|---|---|
| committer | Yufeng Zhang <yufeng.zhang@arm.com> | 2013-10-02 18:09:26 +0000 |
| commit | 3f983d475ae51820e37978b443c327b13650faaa (patch) | |
| tree | b52ff885d0ec05618861719d7086ac596dc18b66 /gdb/testsuite | |
| parent | 901461f8eb407af99c049a381fc985baefce179c (diff) | |
| download | gdb-3f983d475ae51820e37978b443c327b13650faaa.zip gdb-3f983d475ae51820e37978b443c327b13650faaa.tar.gz gdb-3f983d475ae51820e37978b443c327b13650faaa.tar.bz2 | |
gdb/testsuite/
* gdb.trace/entry-values.exp: Modify regular expression to scan for
'bl' instruction instead of 'call' for ARM and AArch64 targets.
Diffstat (limited to 'gdb/testsuite')
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.trace/entry-values.exp | 8 |
2 files changed, 12 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 1eef530..991e677 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2013-10-02 Vidya Praveen <vidyapraveen@arm.com> + + * gdb.trace/entry-values.exp: Modify regular expression to scan for + 'bl' instruction instead of 'call' for ARM and AArch64 targets. + 2013-10-02 Pedro Alves <palves@redhat.com> * gdb.dwarf2/dw2-reg-undefined.exp <pattern_rax_rbx_rcx_print, diff --git a/gdb/testsuite/gdb.trace/entry-values.exp b/gdb/testsuite/gdb.trace/entry-values.exp index 85306ad..b36a4e4 100644 --- a/gdb/testsuite/gdb.trace/entry-values.exp +++ b/gdb/testsuite/gdb.trace/entry-values.exp @@ -75,10 +75,16 @@ gdb_test_multiple $test $test { set bar_length "" set bar_call_foo "" +if { [istarget "arm*-*-*"] || [istarget "aarch64*-*-*"] } { + set call_insn "bl" +} else { + set call_insn "call" +} + # Calculate the offset of the last instruction from the beginning. set test "disassemble bar" gdb_test_multiple $test $test { - -re ".*$hex <\\+$decimal>:\[ \t\]+call\[^\r\n\]+\r\n\[ \]+$hex <\\+($decimal)>:" { + -re ".*$hex <\\+$decimal>:\[ \t\]+$call_insn\[^\r\n\]+\r\n\[ \]+$hex <\\+($decimal)>:" { set bar_call_foo $expect_out(1,string) exp_continue } |