t09_xor.exp

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

	-re ".* 101 0232 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 101      8150" { set x [expr $x+1]; exp_continue; }
	-re ".* 102 0238 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 102      A150" { set x [expr $x+1]; exp_continue; }
	-re ".* 103 023e 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 103      9150" { set x [expr $x+1]; exp_continue; }
	-re ".* 104 0244 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 104      C1509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 105 024c 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 105      C9509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 105      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 106 0256 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 106      D2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 107 025e 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 107      E2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 108 0266 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 108      F2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 109 026e 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 109      DA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 109      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 110 0278 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 110      EA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 110      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 111 0282 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 111      FA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 111      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 112 028c 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 112      40509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 113 0294 01746C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 113      48509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 113      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 114              " {
	    if [expr $x == 37] then {
		pass "$testname: xor.b @er3+, ..."
	    } else {
		fail "$testname: xor.b @er3+, ... ($x)"
	    }
	}
        default	{ fail "$testname: xor.b @er3+, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 115 029e 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 115      0150" { set x [expr $x+1]; exp_continue; }
	-re ".* 116 02a4 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 116      3150" { set x [expr $x+1]; exp_continue; }
	-re ".* 117 02aa 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 117      B150" { set x [expr $x+1]; exp_continue; }
	-re ".* 118 02b0 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 118      8150" { set x [expr $x+1]; exp_continue; }
	-re ".* 119 02b6 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 119      A150" { set x [expr $x+1]; exp_continue; }
	-re ".* 120 02bc 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 120      9150" { set x [expr $x+1]; exp_continue; }
	-re ".* 121 02c2 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 121      C1509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 122 02ca 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 122      C9509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 122      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 123 02d4 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 123      D2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 124 02dc 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 124      E2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 125 02e4 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 125      F2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 126 02ec 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 126      DA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 126      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 127 02f6 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 127      EA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 127      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 128 0300 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 128      FA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 128      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 129 030a 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 129      40509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 130 0312 01766C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 130      48509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 130      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 131              " {
	    if [expr $x == 37] then {
		pass "$testname: xor.b @er3-, ..."
	    } else {
		fail "$testname: xor.b @er3-, ... ($x)"
	    }
	}
        default	{ fail "$testname: xor.b @er3-, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 132 031c 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 132      0150" { set x [expr $x+1]; exp_continue; }
	-re ".* 133 0322 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 133      3150" { set x [expr $x+1]; exp_continue; }
	-re ".* 134 0328 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 134      B150" { set x [expr $x+1]; exp_continue; }
	-re ".* 135 032e 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 135      8150" { set x [expr $x+1]; exp_continue; }
	-re ".* 136 0334 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 136      A150" { set x [expr $x+1]; exp_continue; }
	-re ".* 137 033a 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 137      9150" { set x [expr $x+1]; exp_continue; }
	-re ".* 138 0340 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 138      C1509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 139 0348 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 139      C9509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 139      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 140 0352 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 140      D2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 141 035a 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 141      E2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 142 0362 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 142      F2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 143 036a 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 143      DA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 143      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 144 0374 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 144      EA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 144      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 145 037e 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 145      FA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 145      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 146 0388 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 146      40509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 147 0390 01756C3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 147      48509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 147      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 148              " {
	    if [expr $x == 37] then {
		pass "$testname: xor.b @+er3, ..."
	    } else {
		fail "$testname: xor.b @+er3, ... ($x)"
	    }
	}
        default	{ fail "$testname: xor.b @+er3, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 149 039a 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 149      12340150" { set x [expr $x+1]; exp_continue; }
	-re ".* 150 03a2 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 150      12343150" { set x [expr $x+1]; exp_continue; }
	-re ".* 151 03aa 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 151      1234B150" { set x [expr $x+1]; exp_continue; }
	-re ".* 152 03b2 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 152      12348150" { set x [expr $x+1]; exp_continue; }
	-re ".* 153 03ba 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 153      1234A150" { set x [expr $x+1]; exp_continue; }
	-re ".* 154 03c2 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 154      12349150" { set x [expr $x+1]; exp_continue; }
	-re ".* 155 03ca 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 155      1234C150" { set x [expr $x+1]; exp_continue; }
	-re ".* 155      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 156 03d4 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 156      1234C950" { set x [expr $x+1]; exp_continue; }
	-re ".* 156      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 157 03e0 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 157      1234D250" { set x [expr $x+1]; exp_continue; }
	-re ".* 157      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 158 03ea 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 158      1234E250" { set x [expr $x+1]; exp_continue; }
	-re ".* 158      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 159 03f4 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 159      1234F250" { set x [expr $x+1]; exp_continue; }
	-re ".* 159      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 160 03fe 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 160      1234DA50" { set x [expr $x+1]; exp_continue; }
	-re ".* 160      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 161 040a 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 161      1234EA50" { set x [expr $x+1]; exp_continue; }
	-re ".* 161      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 162 0416 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 162      1234FA50" { set x [expr $x+1]; exp_continue; }
	-re ".* 162      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 163 0422 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 163      12344050" { set x [expr $x+1]; exp_continue; }
	-re ".* 163      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 164 042c 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 164      12344850" { set x [expr $x+1]; exp_continue; }
	-re ".* 164      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 165              " {
	    if [expr $x == 42] then {
		pass "$testname: xor.b @(0x1234:16,er3), ..."
	    } else {
		fail "$testname: xor.b @(0x1234:16,er3), ... ($x)"
	    }
	}
        default	{ fail "$testname: xor.b @(0x1234:16,er3), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 166 0438 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 166      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 166      0150" { set x [expr $x+1]; exp_continue; }
	-re ".* 167 0442 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 167      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 167      3150" { set x [expr $x+1]; exp_continue; }
	-re ".* 168 044c 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 168      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 168      B150" { set x [expr $x+1]; exp_continue; }
	-re ".* 169 0456 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 169      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 169      8150" { set x [expr $x+1]; exp_continue; }
	-re ".* 170 0460 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 170      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 170      A150" { set x [expr $x+1]; exp_continue; }
	-re ".* 171 046a 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 171      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 171      9150" { set x [expr $x+1]; exp_continue; }
	-re ".* 172 0474 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 172      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 172      C1509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 173 0480 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 173      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 173      C9509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 173      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 174 048e 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 174      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 174      D2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 175 049a 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 175      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 175      E2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 176 04a6 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 176      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 176      F2509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 177 04b2 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 177      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 177      DA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 177      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 178 04c0 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 178      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 178      EA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 178      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 179 04ce 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 179      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 179      FA509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 179      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 180 04dc 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 180      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 180      40509ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 181 04e8 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 181      12345678" { set x [expr $x+1]; exp_continue; }