t01_mov.exp

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

	-re ".* 299 0794 0178FB40" { set x [expr $x+1]; exp_continue; }
	-re ".* 299      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 299      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 300 079e 0178FB48" { set x [expr $x+1]; exp_continue; }
	-re ".* 300      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 300      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 301              " {
	    if [expr $x == 42] then {
		pass "$testname: mov.b @(0x12345678:32,er3.l), ..."
	    } else {
		fail "$testname: mov.b @(0x12345678:32,er3.l), ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.b @(0x12345678:32,er3.l), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 302 07aa 01784001" { set x [expr $x+1]; exp_continue; }
	-re ".* 302      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 303 07b0 01784011" { set x [expr $x+1]; exp_continue; }
	-re ".* 303      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 304 07b6 01784081" { set x [expr $x+1]; exp_continue; }
	-re ".* 304      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 305 07bc 017840B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 305      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 306 07c2 01784091" { set x [expr $x+1]; exp_continue; }
	-re ".* 306      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 307 07c8 017840A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 307      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 308 07ce 017840C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 308      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 309 07d6 017840C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 309      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 309      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 310 07e0 017840D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 310      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 311 07e8 017840E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 311      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 312 07f0 017840F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 312      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 313 07f8 017840DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 313      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 313      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 314 0802 017840EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 314      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 314      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 315 080c 017840FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 315      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 315      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 316 0816 01784040" { set x [expr $x+1]; exp_continue; }
	-re ".* 316      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 317 081e 01784048" { set x [expr $x+1]; exp_continue; }
	-re ".* 317      12349ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 317      DEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 318              " {
	    if [expr $x == 37] then {
		pass "$testname: mov.b @0x1234:16, ..."
	    } else {
		fail "$testname: mov.b @0x1234:16, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.b @0x1234:16, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 319 0828 01784801" { set x [expr $x+1]; exp_continue; }
	-re ".* 319      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 320 0830 01784811" { set x [expr $x+1]; exp_continue; }
	-re ".* 320      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 321 0838 01784881" { set x [expr $x+1]; exp_continue; }
	-re ".* 321      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 322 0840 017848B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 322      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 323 0848 01784891" { set x [expr $x+1]; exp_continue; }
	-re ".* 323      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 324 0850 017848A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 324      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 325 0858 017848C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 325      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 325      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 326 0862 017848C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 326      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 326      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 327 086e 017848D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 327      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 327      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 328 0878 017848E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 328      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 328      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 329 0882 017848F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 329      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 329      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 330 088c 017848DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 330      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 330      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 331 0898 017848EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 331      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 331      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 332 08a4 017848FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 332      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 332      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 333 08b0 01784840" { set x [expr $x+1]; exp_continue; }
	-re ".* 333      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 333      9ABC" { set x [expr $x+1]; exp_continue; }
	-re ".* 334 08ba 01784848" { set x [expr $x+1]; exp_continue; }
	-re ".* 334      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 334      9ABCDEF0" { set x [expr $x+1]; exp_continue; }
	-re ".* 335              " {
	    if [expr $x == 42] then {
		pass "$testname: mov.b @0x12345678:32, ..."
	    } else {
		fail "$testname: mov.b @0x12345678:32, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.b @0x12345678:32, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 336 08c6 79011234" { set x [expr $x+1]; exp_continue; }
	-re ".* 337 08ca 0F13" { set x [expr $x+1]; exp_continue; }
	-re ".* 338 08cc 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 338      0100" { set x [expr $x+1]; exp_continue; }
	-re ".* 339 08d2 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 339      1100" { set x [expr $x+1]; exp_continue; }
	-re ".* 340 08d8 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 340      8100" { set x [expr $x+1]; exp_continue; }
	-re ".* 341 08de 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 341      B100" { set x [expr $x+1]; exp_continue; }
	-re ".* 342 08e4 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 342      9100" { set x [expr $x+1]; exp_continue; }
	-re ".* 343 08ea 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 343      A100" { set x [expr $x+1]; exp_continue; }
	-re ".* 344 08f0 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 344      C1001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 345 08f8 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 345      C9001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 345      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 346 0902 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 346      D3001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 347 090a 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 347      E3001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 348 0912 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 348      F3001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 349 091a 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 349      DB001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 349      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 350 0924 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 350      EB001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 350      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 351 092e 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 351      FB001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 351      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 352 0938 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 352      40001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 353 0940 79741234" { set x [expr $x+1]; exp_continue; }
	-re ".* 353      48001234" { set x [expr $x+1]; exp_continue; }
	-re ".* 353      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 354              " {
	    if [expr $x == 39] then {
		pass "$testname: mov.w #0x1234:16, ..."
	    } else {
		fail "$testname: mov.w #0x1234:16, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w #0x1234:16, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 355 094a 015D0112" { set x [expr $x+1]; exp_continue; }
	-re ".* 356 094e 015D1112" { set x [expr $x+1]; exp_continue; }
	-re ".* 357 0952 015D8112" { set x [expr $x+1]; exp_continue; }
	-re ".* 358 0956 015DB112" { set x [expr $x+1]; exp_continue; }
	-re ".* 359 095a 015D9112" { set x [expr $x+1]; exp_continue; }
	-re ".* 360 095e 015DA112" { set x [expr $x+1]; exp_continue; }
	-re ".* 361 0962 015DC112" { set x [expr $x+1]; exp_continue; }
	-re ".* 361      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 362 0968 015DC912" { set x [expr $x+1]; exp_continue; }
	-re ".* 362      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 363 0970 015DD312" { set x [expr $x+1]; exp_continue; }
	-re ".* 363      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 364 0976 015DE312" { set x [expr $x+1]; exp_continue; }
	-re ".* 364      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 365 097c 015DF312" { set x [expr $x+1]; exp_continue; }
	-re ".* 365      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 366 0982 015DDB12" { set x [expr $x+1]; exp_continue; }
	-re ".* 366      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 367 098a 015DEB12" { set x [expr $x+1]; exp_continue; }
	-re ".* 367      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 368 0992 015DFB12" { set x [expr $x+1]; exp_continue; }
	-re ".* 368      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 369 099a 015D4012" { set x [expr $x+1]; exp_continue; }
	-re ".* 369      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 370 09a0 015D4812" { set x [expr $x+1]; exp_continue; }
	-re ".* 370      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 371              " {
	    if [expr $x == 26] then {
		pass "$testname: mov.w #0x12:8, ..."
	    } else {
		fail "$testname: mov.w #0x12:8, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w #0x12:8, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 372 09a8 6BD11234" { set x [expr $x+1]; exp_continue; }
	-re ".* 373 09ac 6BF11234" { set x [expr $x+1]; exp_continue; }
	-re ".* 373      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 374              " {
	    if [expr $x == 3] then {
		pass "$testname: mov.w #0x1:4, ..."
	    } else {
		fail "$testname: mov.w #0x1:4, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w #0x1:4, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 375 09b2 0D21" { set x [expr $x+1]; exp_continue; }
	-re ".* 376              " {
	    if [expr $x == 1] then {
		pass "$testname: mov.w r2, r1"
	    } else {
		fail "$testname: mov.w r2, r1 ($x)"
	    }
	}
        default	{ fail "$testname: mov.w r2, r1 ($x)" }
    }

    set x 0
    expect {
	-re ".* 377 09b4 6992" { set x [expr $x+1]; exp_continue; }
	-re ".* 378 09b6 01516992" { set x [expr $x+1]; exp_continue; }
	-re ".* 379 09ba 01536D92" { set x [expr $x+1]; exp_continue; }
	-re ".* 380 09be 6D92" { set x [expr $x+1]; exp_continue; }
	-re ".* 381 09c0 01526D92" { set x [expr $x+1]; exp_continue; }
	-re ".* 382 09c4 01516D92" { set x [expr $x+1]; exp_continue; }
	-re ".* 383 09c8 6F921234" { set x [expr $x+1]; exp_continue; }
	-re ".* 384 09cc 78106BA2" { set x [expr $x+1]; exp_continue; }
	-re ".* 384      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 385 09d4 01516FB2" { set x [expr $x+1]; exp_continue; }
	-re ".* 385      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 386 09da 01526FB2" { set x [expr $x+1]; exp_continue; }
	-re ".* 386      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 387 09e0 01536FB2" { set x [expr $x+1]; exp_continue; }
	-re ".* 387      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 388 09e6 78316BA2" { set x [expr $x+1]; exp_continue; }
	-re ".* 388      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 389 09ee 78326BA2" { set x [expr $x+1]; exp_continue; }
	-re ".* 389      12345678" { set x [expr $x+1]; exp_continue; }