⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mn10200.exp

📁 gdb-6.0 linux 下的调试工具
💻 EXP
字号:
# OBSOLETE # OBSOLETE # Copyright 1997 Free Software Foundation, Inc.# OBSOLETE # OBSOLETE # This program is free software; you can redistribute it and/or modify# OBSOLETE # it under the terms of the GNU General Public License as published by# OBSOLETE # the Free Software Foundation; either version 2 of the License, or# OBSOLETE # (at your option) any later version.# OBSOLETE # # OBSOLETE # This program is distributed in the hope that it will be useful,# OBSOLETE # but WITHOUT ANY WARRANTY; without even the implied warranty of# OBSOLETE # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the# OBSOLETE # GNU General Public License for more details.# OBSOLETE # # OBSOLETE # You should have received a copy of the GNU General Public License# OBSOLETE # along with this program; if not, write to the Free Software# OBSOLETE # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  # OBSOLETE # OBSOLETE # Please email any bugs, comments, and/or additions to this file to:# OBSOLETE # bug-gdb@prep.ai.mit.edu# OBSOLETE # OBSOLETE # This file was written by Jeff Law. (law@cygnus.com)# OBSOLETE # OBSOLETE if $tracelevel then {# OBSOLETE 	strace $tracelevel# OBSOLETE }# OBSOLETE # OBSOLETE if ![istarget "mn10200*-*-*"] {# OBSOLETE     verbose "Tests ignored for all but mn10200 based targets."# OBSOLETE     return# OBSOLETE }# OBSOLETE # OBSOLETE global exec_output# OBSOLETE set prms_id 0# OBSOLETE set bug_id 0# OBSOLETE # OBSOLETE set testfile "mn10200"# OBSOLETE set srcfile ${srcdir}/${subdir}/${testfile}.s# OBSOLETE set binfile ${objdir}/${subdir}/${testfile}# OBSOLETE if  { [gdb_compile "${srcfile}" "${binfile}" executable ""] != "" } {# OBSOLETE      gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."# OBSOLETE }# OBSOLETE # OBSOLETE proc add_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/12i add_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*add	d1,d2.*# OBSOLETE .*add	d2,a3.*# OBSOLETE .*add	a2,d1.*# OBSOLETE .*add	a3,a2.*# OBSOLETE .*add	16,d1.*# OBSOLETE .*add	256,d2.*# OBSOLETE .*add	131071,d3.*# OBSOLETE .*add	16,a1.*# OBSOLETE .*add	256,a2.*# OBSOLETE .*add	131071,a3.*# OBSOLETE .*addc	d1,d2.*# OBSOLETE .*addnf	16,a2.*# OBSOLETE .*$gdb_prompt $" { pass "add tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "add tests" }# OBSOLETE 	timeout { fail "(timeout) add tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc bcc_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/15i bCC_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*beq	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bne	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bgt	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bge	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*ble	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*blt	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bhi	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bcc	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bls	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bcs	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bvc	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bvs	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bnc	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bns	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*bra	0x\[0-9a-f]+ <bCC_tests>.*# OBSOLETE .*$gdb_prompt $" { pass "bCC tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "bCC tests" }# OBSOLETE 	timeout { fail "(timeout) bCC tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc bccx_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/14i bCCx_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*beqx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bnex	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bgtx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bgex	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*blex	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bltx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bhix	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bccx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*blsx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bcsx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bvcx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bvsx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bncx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*bnsx	0x\[0-9a-f]+ <bCCx_tests>.*# OBSOLETE .*$gdb_prompt $" { pass "bCCx tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "bCCx tests" }# OBSOLETE 	timeout { fail "(timeout) bCCx tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc bit_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/4 bit_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*btst	64,d1.*# OBSOLETE .*btst	8192,d2.*# OBSOLETE .*bset	d1,\\(a2\\).*# OBSOLETE .*bclr	d1,\\(a2\\).*# OBSOLETE .*$gdb_prompt $" { pass "bit tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "bit tests" }# OBSOLETE 	timeout { fail "(timeout) bit tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc cmp_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/9i cmp_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*cmp	d1,d2.*# OBSOLETE .*cmp	d2,a3.*# OBSOLETE .*cmp	a3,d3.*# OBSOLETE .*cmp	a3,a2.*# OBSOLETE .*cmp	16,d3.*# OBSOLETE .*cmp	256,d2.*# OBSOLETE .*cmp	131071,d1.*# OBSOLETE .*cmp	256,a2.*# OBSOLETE .*cmp	131071,a1.*# OBSOLETE .*$gdb_prompt $" { pass "cmp tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "cmp tests" }# OBSOLETE 	timeout { fail "(timeout) cmp tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc extend_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/5i extend_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*ext	d1.*# OBSOLETE .*extx	d2.*# OBSOLETE .*extxu	d3.*# OBSOLETE .*extxb	d2.*# OBSOLETE .*extxbu	d1.*# OBSOLETE .*$gdb_prompt $" { pass "extend tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "extend tests" }# OBSOLETE 	timeout { fail "(timeout) extend tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc logical_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/11i logical_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*and	d1,d2.*# OBSOLETE .*and	127,d2.*# OBSOLETE .*and	32767,d3.*# OBSOLETE .*and	32767,psw.*# OBSOLETE .*or	d1,d2.*# OBSOLETE .*or	127,d2.*# OBSOLETE .*or	32767,d3.*# OBSOLETE .*or	32767,psw.*# OBSOLETE .*xor	d1,d2.*# OBSOLETE .*xor	32767,d3.*# OBSOLETE .*not	d3.*# OBSOLETE .*$gdb_prompt $" { pass "logical tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "logical tests" }# OBSOLETE 	timeout { fail "(timeout) logical tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc mov_tests_1 { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/12i mov_tests_1\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*mov	d1,a2.*# OBSOLETE .*mov	a2,d1.*# OBSOLETE .*mov	d1,d2.*# OBSOLETE .*mov	a2,a1.*# OBSOLETE .*mov	psw,d3.*# OBSOLETE .*mov	d2,psw.*# OBSOLETE .*mov	mdr,d1.*# OBSOLETE .*mov	d2,mdr.*# OBSOLETE .*mov	\\(a2\\),d1.*# OBSOLETE .*mov	\\(8,a2\\),d1.*# OBSOLETE .*mov	\\(256,a2\\),d1.*# OBSOLETE .*mov	\\(131071,a2\\),d1.*# OBSOLETE .*$gdb_prompt $" { pass "mov1 tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "mov1 tests" }# OBSOLETE 	timeout { fail "(timeout) mov1 tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc mov_tests_2 { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/9 mov_tests_2\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*mov	\\(d1,a1\\),d2.*# OBSOLETE .*mov	\\(0x8000.*\\),d1.*# OBSOLETE .*mov	\\(0x1ffff.*\\),d1.*# OBSOLETE .*mov	\\(8,a2\\),a1.*# OBSOLETE .*mov	\\(256,a2\\),a1.*# OBSOLETE .*mov	\\(131071,a2\\),a1.*# OBSOLETE .*mov	\\(d1,a1\\),a2.*# OBSOLETE .*mov	\\(0x8000.*\\),a1.*# OBSOLETE .*mov	\\(0x1ffff.*\\),a1.*# OBSOLETE .*$gdb_prompt $" { pass "mov2 tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "mov2 tests" }# OBSOLETE 	timeout { fail "(timeout) mov2 tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc mov_tests_3 { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/10 mov_tests_3\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*mov	d1,\\(a2\\).*# OBSOLETE .*mov	d1,\\(32,a2\\).*# OBSOLETE .*mov	d1,\\(256,a2\\).*# OBSOLETE .*mov	d1,\\(131071,a2\\).*# OBSOLETE .*mov	d1,\\(d2,a2\\).*# OBSOLETE .*mov	d1,\\(0x80.*\\).*# OBSOLETE .*mov	d1,\\(0x1ffff.*\\).*# OBSOLETE .*mov	a1,\\(32,a2\\).*# OBSOLETE .*mov	a1,\\(256,a2\\).*# OBSOLETE .*mov	a1,\\(131071,a2\\).*# OBSOLETE .*$gdb_prompt $" { pass "mov3 tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "mov3 tests" }# OBSOLETE 	timeout { fail "(timeout) mov3 tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc mov_tests_4 { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/8 mov_tests_4\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*mov	a1,\\(d2,a2\\).*# OBSOLETE .*mov	a1,\\(0x80.*\\).*# OBSOLETE .*mov	a1,\\(0x1ffff.*\\).*# OBSOLETE .*mov	8,d1.*# OBSOLETE .*mov	256,d1.*# OBSOLETE .*mov	131071,d1.*# OBSOLETE .*mov	256,a1.*# OBSOLETE .*mov	131071,a1.*# OBSOLETE .*$gdb_prompt $" { pass "mov4 tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "mov4 tests" }# OBSOLETE 	timeout { fail "(timeout) mov4 tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc movb_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/12 movb_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*movb	\\(8,a2\\),d1.*# OBSOLETE .*movb	\\(256,a2\\),d1.*# OBSOLETE .*movb	\\(131071,a2\\),d1.*# OBSOLETE .*movb	\\(d2,a2\\),d3.*# OBSOLETE .*movb	\\(0x1ffff.*\\),d2.*# OBSOLETE .*movb	d1,\\(a2\\).*# OBSOLETE .*movb	d1,\\(8,a2\\).*# OBSOLETE .*movb	d1,\\(256,a2\\).*# OBSOLETE .*movb	d1,\\(131071,a2\\).*# OBSOLETE .*movb	d1,\\(d2,a2\\).*# OBSOLETE .*movb	d1,\\(0x100.*\\).*# OBSOLETE .*movb	d1,\\(0x1ffff.*\\).*# OBSOLETE .*$gdb_prompt $" { pass "movb tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "movb tests" }# OBSOLETE 	timeout { fail "(timeout) movb tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc movbu_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/7 movbu_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*movbu	\\(a2\\),d1.*# OBSOLETE .*movbu	\\(8,a2\\),d1.*# OBSOLETE .*movbu	\\(256,a2\\),d1.*# OBSOLETE .*movbu	\\(131071,a2\\),d1.*# OBSOLETE .*movbu	\\(d1,a1\\),d2.*# OBSOLETE .*movbu	\\(0x8000.*\\),d1.*# OBSOLETE .*movbu	\\(0x1ffff.*\\),d1.*# OBSOLETE .*$gdb_prompt $" { pass "movbu tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "movbu tests" }# OBSOLETE 	timeout { fail "(timeout) movbu tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc movx_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/6 movx_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*movx	\\(8,a2\\),d1.*# OBSOLETE .*movx	\\(256,a2\\),d1.*# OBSOLETE .*movx	\\(131071,a2\\),d1.*# OBSOLETE .*movx	d1,\\(8,a2\\).*# OBSOLETE .*movx	d1,\\(256,a2\\).*# OBSOLETE .*movx	d1,\\(131071,a2\\).*# OBSOLETE .*$gdb_prompt $" { pass "movx tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "movx tests" }# OBSOLETE 	timeout { fail "(timeout) movx tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc muldiv_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/3 muldiv_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*mul	d1,d2.*# OBSOLETE .*mulu	d2,d3.*# OBSOLETE .*divu	d3,d2.*# OBSOLETE .*$gdb_prompt $" { pass "muldiv tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "muldiv tests" }# OBSOLETE 	timeout { fail "(timeout) muldiv tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc misc_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/9 misc_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*jmp	0x\[0-9a-f]+ <main>.*# OBSOLETE .*jmp	0x\[0-9a-f]+ <start>.*# OBSOLETE .*jmp	\\(a2\\).*# OBSOLETE .*jsr	0x\[0-9a-f]+ <main>.*# OBSOLETE .*jsr	0x\[0-9a-f]+ <start>.*# OBSOLETE .*jsr	\\(a2\\).*# OBSOLETE .*rts.*# OBSOLETE .*rti.*# OBSOLETE .*nop.*# OBSOLETE .*$gdb_prompt $" { pass "misc tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "misc tests" }# OBSOLETE 	timeout { fail "(timeout) misc tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc shift_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/4i shift_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*asr	d2.*# OBSOLETE .*lsr	d3.*# OBSOLETE .*ror	d1.*# OBSOLETE .*rol	d2.*# OBSOLETE .*$gdb_prompt $" { pass "shift tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "shift tests" }# OBSOLETE 	timeout { fail "(timeout) shift tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE proc sub_tests { } {# OBSOLETE     global gdb_prompt# OBSOLETE     global hex# OBSOLETE     global decimal# OBSOLETE # OBSOLETE     send_gdb "x/9i sub_tests\n"# OBSOLETE     gdb_expect {# OBSOLETE 	-re "# OBSOLETE .*sub	d1,d2.*# OBSOLETE .*sub	d2,a3.*# OBSOLETE .*sub	a3,d3.*# OBSOLETE .*sub	a3,a2.*# OBSOLETE .*sub	32767,d2.*# OBSOLETE .*sub	131071,d2.*# OBSOLETE .*sub	32767,a2.*# OBSOLETE .*sub	131071,a2.*# OBSOLETE .*subc	d1,d2.*# OBSOLETE .*$gdb_prompt $" { pass "sub tests" }# OBSOLETE 	-re "$gdb_prompt $" { fail "sub tests" }# OBSOLETE 	timeout { fail "(timeout) sub tests" }# OBSOLETE     }# OBSOLETE }# OBSOLETE # OBSOLETE # Start with a fresh gdb.# OBSOLETE # OBSOLETE gdb_exit# OBSOLETE gdb_start# OBSOLETE gdb_reinitialize_dir $srcdir/$subdir# OBSOLETE gdb_load $binfile# OBSOLETE # OBSOLETE add_tests# OBSOLETE bcc_tests# OBSOLETE bccx_tests# OBSOLETE bit_tests# OBSOLETE cmp_tests# OBSOLETE extend_tests# OBSOLETE logical_tests# OBSOLETE mov_tests_1# OBSOLETE mov_tests_2# OBSOLETE mov_tests_3# OBSOLETE mov_tests_4# OBSOLETE movb_tests# OBSOLETE movbu_tests# OBSOLETE movx_tests# OBSOLETE muldiv_tests# OBSOLETE misc_tests# OBSOLETE shift_tests# OBSOLETE sub_tests

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -