t05_cmp.exp

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

    expect {
	-re ".*  92 0256 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  92      12340120" { set x [expr $x+1]; exp_continue; }
	-re ".*  93 025e 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  93      12343120" { set x [expr $x+1]; exp_continue; }
	-re ".*  94 0266 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  94      1234B120" { set x [expr $x+1]; exp_continue; }
	-re ".*  95 026e 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  95      12348120" { set x [expr $x+1]; exp_continue; }
	-re ".*  96 0276 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  96      1234A120" { set x [expr $x+1]; exp_continue; }
	-re ".*  97 027e 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  97      12349120" { set x [expr $x+1]; exp_continue; }
	-re ".*  98 0286 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  98      1234C120" { set x [expr $x+1]; exp_continue; }
	-re ".*  98      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".*  99 0290 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".*  99      1234C920" { set x [expr $x+1]; exp_continue; }
	-re ".*  99      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 100 029c 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 100      1234D220" { set x [expr $x+1]; exp_continue; }
	-re ".* 100      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 101 02a6 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 101      1234E220" { set x [expr $x+1]; exp_continue; }
	-re ".* 101      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 102 02b0 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 102      1234F220" { set x [expr $x+1]; exp_continue; }
	-re ".* 102      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 103 02ba 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 103      1234DA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 103      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 104 02c6 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 104      1234EA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 104      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 105 02d2 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 105      1234FA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 105      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 106 02de 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 106      12344020" { set x [expr $x+1]; exp_continue; }
	-re ".* 106      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 107 02e8 01746E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 107      12344820" { set x [expr $x+1]; exp_continue; }
	-re ".* 107      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 108              " {
	    if [expr $x == 42] then {
		pass "$testname: cmp.b @(0x1234:16,er3), ..."
	    } else {
		fail "$testname: cmp.b @(0x1234:16,er3), ... ($x)"
	    }
	}
        default	{ fail "$testname: cmp.b @(0x1234:16,er3), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 109 02f4 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 109      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 109      0120" { set x [expr $x+1]; exp_continue; }
	-re ".* 110 02fe 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 110      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 110      3120" { set x [expr $x+1]; exp_continue; }
	-re ".* 111 0308 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 111      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 111      B120" { set x [expr $x+1]; exp_continue; }
	-re ".* 112 0312 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 112      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 112      8120" { set x [expr $x+1]; exp_continue; }
	-re ".* 113 031c 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 113      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 113      A120" { set x [expr $x+1]; exp_continue; }
	-re ".* 114 0326 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 114      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 114      9120" { set x [expr $x+1]; exp_continue; }
	-re ".* 115 0330 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 115      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 115      C1209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 116 033c 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 116      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 116      C9209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 116      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 117 034a 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 117      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 117      D2209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 118 0356 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 118      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 118      E2209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 119 0362 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 119      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 119      F2209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 120 036e 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 120      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 120      DA209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 120      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 121 037c 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 121      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 121      EA209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 121      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 122 038a 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 122      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 122      FA209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 122      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 123 0398 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 123      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 123      40209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 124 03a4 78346A2C" { set x [expr $x+1]; exp_continue; }
	-re ".* 124      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 124      48209ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 124      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 125              " {
	    if [expr $x == 53] then {
		pass "$testname: cmp.b @(0x12345678:32,er3), ..."
	    } else {
		fail "$testname: cmp.b @(0x12345678:32,er3), ... ($x)"
	    }
	}
        default	{ fail "$testname: cmp.b @(0x12345678:32,er3), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 126 03b2 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 126      12340120" { set x [expr $x+1]; exp_continue; }
	-re ".* 127 03ba 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 127      12343120" { set x [expr $x+1]; exp_continue; }
	-re ".* 128 03c2 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 128      1234B120" { set x [expr $x+1]; exp_continue; }
	-re ".* 129 03ca 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 129      12348120" { set x [expr $x+1]; exp_continue; }
	-re ".* 130 03d2 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 130      1234A120" { set x [expr $x+1]; exp_continue; }
	-re ".* 131 03da 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 131      12349120" { set x [expr $x+1]; exp_continue; }
	-re ".* 132 03e2 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 132      1234C120" { set x [expr $x+1]; exp_continue; }
	-re ".* 132      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 133 03ec 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 133      1234C920" { set x [expr $x+1]; exp_continue; }
	-re ".* 133      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 134 03f8 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 134      1234D220" { set x [expr $x+1]; exp_continue; }
	-re ".* 134      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 135 0402 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 135      1234E220" { set x [expr $x+1]; exp_continue; }
	-re ".* 135      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 136 040c 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 136      1234F220" { set x [expr $x+1]; exp_continue; }
	-re ".* 136      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 137 0416 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 137      1234DA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 137      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 138 0422 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 138      1234EA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 138      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 139 042e 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 139      1234FA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 139      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 140 043a 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 140      12344020" { set x [expr $x+1]; exp_continue; }
	-re ".* 140      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 141 0444 01756E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 141      12344820" { set x [expr $x+1]; exp_continue; }
	-re ".* 141      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 142              " {
	    if [expr $x == 42] then {
		pass "$testname: cmp.b @(0x1234:16,r3l.b), ..."
	    } else {
		fail "$testname: cmp.b @(0x1234:16,r3l.b), ... ($x)"
	    }
	}
        default	{ fail "$testname: cmp.b @(0x1234:16,r3l.b), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 143 0450 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 143      12340120" { set x [expr $x+1]; exp_continue; }
	-re ".* 144 0458 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 144      12343120" { set x [expr $x+1]; exp_continue; }
	-re ".* 145 0460 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 145      1234B120" { set x [expr $x+1]; exp_continue; }
	-re ".* 146 0468 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 146      12348120" { set x [expr $x+1]; exp_continue; }
	-re ".* 147 0470 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 147      1234A120" { set x [expr $x+1]; exp_continue; }
	-re ".* 148 0478 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 148      12349120" { set x [expr $x+1]; exp_continue; }
	-re ".* 149 0480 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 149      1234C120" { set x [expr $x+1]; exp_continue; }
	-re ".* 149      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 150 048a 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 150      1234C920" { set x [expr $x+1]; exp_continue; }
	-re ".* 150      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 151 0496 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 151      1234D220" { set x [expr $x+1]; exp_continue; }
	-re ".* 151      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 152 04a0 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 152      1234E220" { set x [expr $x+1]; exp_continue; }
	-re ".* 152      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 153 04aa 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 153      1234F220" { set x [expr $x+1]; exp_continue; }
	-re ".* 153      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 154 04b4 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 154      1234DA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 154      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 155 04c0 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 155      1234EA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 155      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 156 04cc 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 156      1234FA20" { set x [expr $x+1]; exp_continue; }
	-re ".* 156      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 157 04d8 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 157      12344020" { set x [expr $x+1]; exp_continue; }
	-re ".* 157      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 158 04e2 01766E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 158      12344820" { set x [expr $x+1]; exp_continue; }
	-re ".* 158      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 159              " {
	    if [expr $x == 42] then {
		pass "$testname: cmp.b @(0x1234:16,r3.w), ..."
	    } else {
		fail "$testname: cmp.b @(0x1234:16,r3.w), ... ($x)"
	    }
	}
        default	{ fail "$testname: cmp.b @(0x1234:16,r3.w), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 160 04ee 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 160      12340120" { set x [expr $x+1]; exp_continue; }
	-re ".* 161 04f6 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 161      12343120" { set x [expr $x+1]; exp_continue; }
	-re ".* 162 04fe 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 162      1234B120" { set x [expr $x+1]; exp_continue; }
	-re ".* 163 0506 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 163      12348120" { set x [expr $x+1]; exp_continue; }
	-re ".* 164 050e 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 164      1234A120" { set x [expr $x+1]; exp_continue; }
	-re ".* 165 0516 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 165      12349120" { set x [expr $x+1]; exp_continue; }
	-re ".* 166 051e 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 166      1234C120" { set x [expr $x+1]; exp_continue; }
	-re ".* 166      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 167 0528 01776E3C" { set x [expr $x+1]; exp_continue; }
	-re ".* 167      1234C920" { set x [expr $x+1]; exp_continue; }
	-re ".* 167      9ABCDEF0" { set x [expr $x+1]; exp_continue; }