t02_mova.exp

GNU binutils是GNU交叉工具链中的一个源码包

	-re ".*  87      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  88 023a 015F92B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  88      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  89 0240 015FA2B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  89      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  90 0246 015FC2B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  90      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".*  91 024e 015FCAB1" { set x [expr $x+1]; exp_continue; }
	-re ".*  91      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".*  91      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  92 0258 015FD2B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  92      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".*  93 0260 015FE2B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  93      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".*  94 0268 015FF2B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  94      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".*  95 0270 015FDAB1" { set x [expr $x+1]; exp_continue; }
	-re ".*  95      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".*  95      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  96 027a 015FEAB1" { set x [expr $x+1]; exp_continue; }
	-re ".*  96      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".*  96      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  97 0284 015FFAB1" { set x [expr $x+1]; exp_continue; }
	-re ".*  97      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".*  97      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".*  98 028e 015F40B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  98      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".*  99 0296 015F48B1" { set x [expr $x+1]; exp_continue; }
	-re ".*  99      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".*  99      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 100              " {
	    if [expr $x == 37] then {
		pass "$testname: f"
	    } else {
		fail "$testname: f ($x)"
	    }
	}
        default	{ fail "$testname: f ($x)" }
    }

    set x 0
    expect {
	-re ".* 101 02a0 017F02C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 101      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 102 02a6 017F12C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 102      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 103 02ac 017F82C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 103      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 104 02b2 017FB2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 104      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 105 02b8 017F92C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 105      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 106 02be 017FA2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 106      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 107 02c4 017FC2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 107      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 108 02cc 017FCAC1" { set x [expr $x+1]; exp_continue; }
	-re ".* 108      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 108      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 109 02d6 017FD2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 109      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 110 02de 017FE2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 110      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 111 02e6 017FF2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 111      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 112 02ee 017FDAC1" { set x [expr $x+1]; exp_continue; }
	-re ".* 112      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 112      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 113 02f8 017FEAC1" { set x [expr $x+1]; exp_continue; }
	-re ".* 113      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 113      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 114 0302 017FFAC1" { set x [expr $x+1]; exp_continue; }
	-re ".* 114      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 114      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 115 030c 017F40C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 115      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 116 0314 017F48C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 116      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 116      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 117              " {
	    if [expr $x == 37] then {
		pass "$testname: g"
	    } else {
		fail "$testname: g ($x)"
	    }
	}
        default	{ fail "$testname: g ($x)" }
    }

    set x 0
    expect {
	-re ".* 118 031e 015F02D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 118      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 119 0324 015F12D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 119      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 120 032a 015F82D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 120      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 121 0330 015FB2D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 121      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 122 0336 015F92D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 122      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 123 033c 015FA2D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 123      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 124 0342 015FC2D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 124      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 125 034a 015FCAD1" { set x [expr $x+1]; exp_continue; }
	-re ".* 125      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 125      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 126 0354 015FD2D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 126      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 127 035c 015FE2D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 127      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 128 0364 015FF2D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 128      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 129 036c 015FDAD1" { set x [expr $x+1]; exp_continue; }
	-re ".* 129      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 129      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 130 0376 015FEAD1" { set x [expr $x+1]; exp_continue; }
	-re ".* 130      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 130      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 131 0380 015FFAD1" { set x [expr $x+1]; exp_continue; }
	-re ".* 131      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 131      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 132 038a 015F40D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 132      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 133 0392 015F48D1" { set x [expr $x+1]; exp_continue; }
	-re ".* 133      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 133      1234"     { set x [expr $x+1]; exp_continue; }
	-re ".* 134              " {
	    if [expr $x == 37] then {
		pass "$testname: h"
	    } else {
		fail "$testname: h ($x)"
	    }
	}
        default	{ fail "$testname: h ($x)" }
    }

    set x 0
    expect {
	-re ".* 135 039c 017F0289" { set x [expr $x+1]; exp_continue; }
	-re ".* 135      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 136 03a4 017F1289" { set x [expr $x+1]; exp_continue; }
	-re ".* 136      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 137 03ac 017F8289" { set x [expr $x+1]; exp_continue; }
	-re ".* 137      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 138 03b4 017FB289" { set x [expr $x+1]; exp_continue; }
	-re ".* 138      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 139 03bc 017F9289" { set x [expr $x+1]; exp_continue; }
	-re ".* 139      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 140 03c4 017FA289" { set x [expr $x+1]; exp_continue; }
	-re ".* 140      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 141 03cc 017FC289" { set x [expr $x+1]; exp_continue; }
	-re ".* 141      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 141      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 142 03d6 017FCA89" { set x [expr $x+1]; exp_continue; }
	-re ".* 142      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 142      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 143 03e2 017FD289" { set x [expr $x+1]; exp_continue; }
	-re ".* 143      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 143      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 144 03ec 017FE289" { set x [expr $x+1]; exp_continue; }
	-re ".* 144      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 144      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 145 03f6 017FF289" { set x [expr $x+1]; exp_continue; }
	-re ".* 145      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 145      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 146 0400 017FDA89" { set x [expr $x+1]; exp_continue; }
	-re ".* 146      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 146      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 147 040c 017FEA89" { set x [expr $x+1]; exp_continue; }
	-re ".* 147      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 147      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 148 0418 017FFA89" { set x [expr $x+1]; exp_continue; }
	-re ".* 148      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 148      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 149 0424 017F4089" { set x [expr $x+1]; exp_continue; }
	-re ".* 149      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 149      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 150 042e 017F4889" { set x [expr $x+1]; exp_continue; }
	-re ".* 150      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 150      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 151              " {
	    if [expr $x == 42] then {
		pass "$testname: i"
	    } else {
		fail "$testname: i ($x)"
	    }
	}
        default	{ fail "$testname: i ($x)" }
    }

    set x 0
    expect {
	-re ".* 152 043a 015F0299" { set x [expr $x+1]; exp_continue; }
	-re ".* 152      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 153 0442 015F1299" { set x [expr $x+1]; exp_continue; }
	-re ".* 153      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 154 044a 015F8299" { set x [expr $x+1]; exp_continue; }
	-re ".* 154      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 155 0452 015FB299" { set x [expr $x+1]; exp_continue; }
	-re ".* 155      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 156 045a 015F9299" { set x [expr $x+1]; exp_continue; }
	-re ".* 156      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 157 0462 015FA299" { set x [expr $x+1]; exp_continue; }
	-re ".* 157      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 158 046a 015FC299" { set x [expr $x+1]; exp_continue; }
	-re ".* 158      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 158      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 159 0474 015FCA99" { set x [expr $x+1]; exp_continue; }
	-re ".* 159      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 159      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 160 0480 015FD299" { set x [expr $x+1]; exp_continue; }
	-re ".* 160      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 160      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 161 048a 015FE299" { set x [expr $x+1]; exp_continue; }
	-re ".* 161      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 161      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 162 0494 015FF299" { set x [expr $x+1]; exp_continue; }
	-re ".* 162      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 162      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 163 049e 015FDA99" { set x [expr $x+1]; exp_continue; }
	-re ".* 163      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 163      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 164 04aa 015FEA99" { set x [expr $x+1]; exp_continue; }
	-re ".* 164      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 164      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 165 04b6 015FFA99" { set x [expr $x+1]; exp_continue; }
	-re ".* 165      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 165      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 166 04c2 015F4099" { set x [expr $x+1]; exp_continue; }
	-re ".* 166      9ABC1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 166      5678"     { set x [expr $x+1]; exp_continue; }
	-re ".* 167 04cc 015F4899" { set x [expr $x+1]; exp_continue; }
	-re ".* 167      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 167      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 168              " {
	    if [expr $x == 42] then {
		pass "$testname: j"