This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
[PING RFA] test tweaks for h8300s disasm
- From: Michael Snyder <msnyder at redhat dot com>
- To: gdb-patches at sources dot redhat dot com, kazu at cs dot umass dot edu, dvenkat at noida dot hcltech dot com
- Date: Wed, 04 Jun 2003 13:57:52 -0700
- Subject: [PING RFA] test tweaks for h8300s disasm
- Organization: Red Hat, Inc.
As noted in change log entries:
2003-04-21 Michael Snyder <msnyder@redhat.com>
* gdb.disasm/h8300s.exp (all_inc_dec_adds_subs_tests): Accept ".b".
(all_tas_mac_tests): Plus sign must be quoted.
(all_sha_shl_tests): Accept ".b", ".w", ".l".
(all_rot_rotx_tests): Ditto.
(all_branch_tests): Accept non-symbolic disassembly.
Some parens must be quoted.
* gdb.disasm/h8300s.s (all_branch_test): No "@" for bsr.
Index: h8300s.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.disasm/h8300s.exp,v
retrieving revision 1.1
diff -p -r1.1 h8300s.exp
*** h8300s.exp 2001/07/13 23:56:12 1.1
--- h8300s.exp 2003/04/21 22:18:16
*************** proc all_inc_dec_adds_subs_tests { } {
*** 189,195 ****
send_gdb "x/16i inc_dec_adds_subs_tests\n"
gdb_expect {
-re "
! .*inc.b\tr0l.*
.*inc.w\t#0x1,r4.*
.*inc.w\t#0x2,r3.*
.*inc.l\t#0x1,er2.*
--- 189,195 ----
send_gdb "x/16i inc_dec_adds_subs_tests\n"
gdb_expect {
-re "
! .*inc(.b|)\tr0l.*
.*inc.w\t#0x1,r4.*
.*inc.w\t#0x2,r3.*
.*inc.l\t#0x1,er2.*
*************** proc all_tas_mac_tests { } {
*** 313,319 ****
gdb_expect {
-re "
.*tas\t@er0.*
! .*mac\t@er1+,@er2+.*
.*clrmac.*
.*ldmac\ter4,mach.*
.*ldmac\ter5,macl.*
--- 313,319 ----
gdb_expect {
-re "
.*tas\t@er0.*
! .*mac\t@er1\\+,@er2\\+.*
.*clrmac.*
.*ldmac\ter4,mach.*
.*ldmac\ter5,macl.*
*************** proc all_sha_shl_tests { } {
*** 368,385 ****
send_gdb "x/12i sha_shl_tests\n"
gdb_expect {
-re "
! .*shal\tr0l.*
! .*shal\tr1.*
! .*shal\ter2.*
! .*shar\tr3l.*
! .*shar\tr4.*
! .*shar\ter5.*
! .*shll\tr0l.*
! .*shll\tr1.*
! .*shll\ter2.*
! .*shlr\tr3l.*
! .*shlr\tr4.*
! .*shlr\ter5.*
.*$gdb_prompt $" { pass "sha_shl_tests" }
-re "$gdb_prompt $" { fail "sha_shl_tests" }
timeout { fail "(timeout) sha_shl_tests" }
--- 368,385 ----
send_gdb "x/12i sha_shl_tests\n"
gdb_expect {
-re "
! .*shal(.b|)\tr0l.*
! .*shal(.w|)\tr1.*
! .*shal(.l|)\ter2.*
! .*shar(.b|)\tr3l.*
! .*shar(.w|)\tr4.*
! .*shar(.l|)\ter5.*
! .*shll(.b|)\tr0l.*
! .*shll(.w|)\tr1.*
! .*shll(.l|)\ter2.*
! .*shlr(.b|)\tr3l.*
! .*shlr(.w|)\tr4.*
! .*shlr(.l|)\ter5.*
.*$gdb_prompt $" { pass "sha_shl_tests" }
-re "$gdb_prompt $" { fail "sha_shl_tests" }
timeout { fail "(timeout) sha_shl_tests" }
*************** proc all_rot_rotx_tests { } {
*** 394,411 ****
send_gdb "x/12i rot_rotx_tests\n"
gdb_expect {
-re "
! .*rotl\tr0l.*
! .*rotl\tr1.*
! .*rotl\ter2.*
! .*rotr\tr3l.*
! .*rotr\tr4.*
! .*rotr\ter5.*
! .*rotxl\tr0l.*
! .*rotxl\tr1.*
! .*rotxl\ter2.*
! .*rotxr\tr3l.*
! .*rotxr\tr4.*
! .*rotxr\ter5.*
.*$gdb_prompt $" { pass "rot_rotx_tests" }
-re "$gdb_prompt $" { fail "rot_rotx_tests" }
timeout { fail "(timeout) rot_rotx_tests" }
--- 394,411 ----
send_gdb "x/12i rot_rotx_tests\n"
gdb_expect {
-re "
! .*rotl(.b|)\tr0l.*
! .*rotl(.w|)\tr1.*
! .*rotl(.l|)\ter2.*
! .*rotr(.b|)\tr3l.*
! .*rotr(.w|)\tr4.*
! .*rotr(.l|)\ter5.*
! .*rotxl(.b|)\tr0l.*
! .*rotxl(.w|)\tr1.*
! .*rotxl(.l|)\ter2.*
! .*rotxr(.b|)\tr3l.*
! .*rotxr(.w|)\tr4.*
! .*rotxr(.l|)\ter5.*
.*$gdb_prompt $" { pass "rot_rotx_tests" }
-re "$gdb_prompt $" { fail "rot_rotx_tests" }
timeout { fail "(timeout) rot_rotx_tests" }
*************** proc all_branch_tests { } {
*** 551,583 ****
send_gdb "x/25i branch_tests\n"
gdb_expect {
-re "
! .*bra\tbranch_tests.*
! .*brn\tbranch_tests.*
! .*bhi\tbranch_tests.*
! .*bls\tbranch_tests.*
! .*bcc\tbranch_tests.*
! .*bcs\tbranch_tests.*
! .*bne\tbranch_tests.*
! .*beq\tbranch_tests.*
! .*bvc\tbranch_tests.*
! .*bvs\tbranch_tests.*
! .*bpl\tbranch_tests.*
! .*bmi\tbranch_tests.*
! .*bge\tbranch_tests.*
! .*blt\tbranch_tests.*
! .*bgt\tbranch_tests.*
! .*ble\tbranch_tests.*
.*jmp\t@er0.*
! .*jmp\t@branch_tests.*
! .*jmp\t@@0 (0).*
! .*bsr\tbranch_tests.*
! .*bsr\tbranch_tests.*
.*jsr\t@er0.*
! .*jsr\t@branch_tests.*
! .*jsr\t@@0 (0).*
.*rts.*
.*$gdb_prompt $" { pass "branch_tests" }
! -re "$gdb_prompt $" { fail "branch_tests" }
timeout { fail "(timeout) branch_tests" }
}
}
--- 551,584 ----
send_gdb "x/25i branch_tests\n"
gdb_expect {
-re "
! .*bra\t(branch_tests|.-2).*
! .*brn\t(branch_tests|.-4).*
! .*bhi\t(branch_tests|.-6).*
! .*bls\t(branch_tests|.-8).*
! .*bcc\t(branch_tests|.-10).*
! .*bcs\t(branch_tests|.-12).*
! .*bne\t(branch_tests|.-14).*
! .*beq\t(branch_tests|.-16).*
! .*bvc\t(branch_tests|.-18).*
! .*bvs\t(branch_tests|.-20).*
! .*bpl\t(branch_tests|.-22).*
! .*bmi\t(branch_tests|.-24).*
! .*bge\t(branch_tests|.-26).*
! .*blt\t(branch_tests|.-28).*
! .*bgt\t(branch_tests|.-30).*
! .*ble\t(branch_tests|.-32).*
.*jmp\t@er0.*
! .*jmp\t@(branch_tests|${hex}:${decimal}).*
! .*jmp\t@@0 \\(0\\).*
! .*bsr\t(branch_tests|.-42).*
! .*bsr\t(branch_tests|.-44).*
.*jsr\t@er0.*
! .*jsr\t@(branch_tests|$hex:$decimal).*
! .*jsr\t@@0 \\(0\\).*
.*rts.*
.*$gdb_prompt $" { pass "branch_tests" }
! $gdb_prompt $" { pass "branch_tests" }
! -re "$gdb_prompt $" { fail "branch_tests" }
timeout { fail "(timeout) branch_tests" }
}
}
*************** all_system_control_tests
*** 696,698 ****
--- 697,700 ----
# Block data transfer
all_block_data_transfer_tests
+