t01_mov.exp

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

	-re ".* 390 09f6 78336BA2" { set x [expr $x+1]; exp_continue; }
	-re ".* 390      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 391 09fe 6B821234" { set x [expr $x+1]; exp_continue; }
	-re ".* 392 0a02 6BA21234" { set x [expr $x+1]; exp_continue; }
	-re ".* 392      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 393              " {
	    if [expr $x == 24] then {
		pass "$testname: mov.w r2, ..."
	    } else {
		fail "$testname: mov.w r2, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w r2, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 394 0a08 6921" { set x [expr $x+1]; exp_continue; }
	-re ".* 395 0a0a 01516921" { set x [expr $x+1]; exp_continue; }
	-re ".* 396 0a0e 6D21" { set x [expr $x+1]; exp_continue; }
	-re ".* 397 0a10 01536D21" { set x [expr $x+1]; exp_continue; }
	-re ".* 398 0a14 01516D21" { set x [expr $x+1]; exp_continue; }
	-re ".* 399 0a18 01526D21" { set x [expr $x+1]; exp_continue; }
	-re ".* 400 0a1c 6F111234" { set x [expr $x+1]; exp_continue; }
	-re ".* 401 0a20 78106B21" { set x [expr $x+1]; exp_continue; }
	-re ".* 401      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 402 0a28 01516F31" { set x [expr $x+1]; exp_continue; }
	-re ".* 402      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 403 0a2e 01526F31" { set x [expr $x+1]; exp_continue; }
	-re ".* 403      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 404 0a34 01536F31" { set x [expr $x+1]; exp_continue; }
	-re ".* 404      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 405 0a3a 78316B21" { set x [expr $x+1]; exp_continue; }
	-re ".* 405      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 406 0a42 78326B21" { set x [expr $x+1]; exp_continue; }
	-re ".* 406      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 407 0a4a 78336B21" { set x [expr $x+1]; exp_continue; }
	-re ".* 407      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 408 0a52 6B011234" { set x [expr $x+1]; exp_continue; }
	-re ".* 409 0a56 6B211234" { set x [expr $x+1]; exp_continue; }
	-re ".* 409      5678" { set x [expr $x+1]; exp_continue; }
	-re ".* 410              " {
	    if [expr $x == 24] then {
		pass "$testname: mov.w ..., r1"
	    } else {
		fail "$testname: mov.w ..., r1 ($x)"
	    }
	}
        default	{ fail "$testname: mov.w ..., r1 ($x)" }
    }

    set x 0
    expect {
	-re ".* 411 0a5c 01580201" { set x [expr $x+1]; exp_continue; }
	-re ".* 412 0a60 01580211" { set x [expr $x+1]; exp_continue; }
	-re ".* 413 0a64 01580281" { set x [expr $x+1]; exp_continue; }
	-re ".* 414 0a68 015802B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 415 0a6c 01580291" { set x [expr $x+1]; exp_continue; }
	-re ".* 416 0a70 015802A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 417 0a74 015802C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 417      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 418 0a7a 015802C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 418      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 419 0a82 015802D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 419      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 420 0a88 015802E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 420      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 421 0a8e 015802F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 421      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 422 0a94 015802DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 422      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 423 0a9c 015802EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 423      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 424 0aa4 015802FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 424      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 425 0aac 01580240" { set x [expr $x+1]; exp_continue; }
	-re ".* 425      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 426 0ab2 01580248" { set x [expr $x+1]; exp_continue; }
	-re ".* 426      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 427              " {
	    if [expr $x == 26] then {
		pass "$testname: mov.w @er2, ..."
	    } else {
		fail "$testname: mov.w @er2, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w @er2, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 428 0aba 01581201" { set x [expr $x+1]; exp_continue; }
	-re ".* 429 0abe 01581211" { set x [expr $x+1]; exp_continue; }
	-re ".* 430 0ac2 01581281" { set x [expr $x+1]; exp_continue; }
	-re ".* 431 0ac6 015812B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 432 0aca 01581291" { set x [expr $x+1]; exp_continue; }
	-re ".* 433 0ace 015812A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 434 0ad2 015812C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 434      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 435 0ad8 015812C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 435      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 436 0ae0 015812D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 436      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 437 0ae6 015812E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 437      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 438 0aec 015812F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 438      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 439 0af2 015812DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 439      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 440 0afa 015812EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 440      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 441 0b02 015812FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 441      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 442 0b0a 01581240" { set x [expr $x+1]; exp_continue; }
	-re ".* 442      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 443 0b10 01581248" { set x [expr $x+1]; exp_continue; }
	-re ".* 443      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 444              " {
	    if [expr $x == 26] then {
		pass "$testname: mov.w @(0x2:2,er2), ..."
	    } else {
		fail "$testname: mov.w @(0x2:2,er2), ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w @(0x2:2,er2), ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 445 0b18 0158B201" { set x [expr $x+1]; exp_continue; }
	-re ".* 446 0b1c 0158B211" { set x [expr $x+1]; exp_continue; }
	-re ".* 447 0b20 0158B281" { set x [expr $x+1]; exp_continue; }
	-re ".* 448 0b24 0158B2B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 449 0b28 0158B291" { set x [expr $x+1]; exp_continue; }
	-re ".* 450 0b2c 0158B2A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 451 0b30 0158B2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 451      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 452 0b36 0158B2C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 452      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 453 0b3e 0158B2D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 453      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 454 0b44 0158B2E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 454      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 455 0b4a 0158B2F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 455      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 456 0b50 0158B2DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 456      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 457 0b58 0158B2EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 457      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 458 0b60 0158B2FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 458      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 459 0b68 0158B240" { set x [expr $x+1]; exp_continue; }
	-re ".* 459      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 460 0b6e 0158B248" { set x [expr $x+1]; exp_continue; }
	-re ".* 460      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 461              " {
	    if [expr $x == 26] then {
		pass "$testname: mov.w @-er2, ..."
	    } else {
		fail "$testname: mov.w @-er2, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w @-er2, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 462 0b76 01588201" { set x [expr $x+1]; exp_continue; }
	-re ".* 463 0b7a 01588211" { set x [expr $x+1]; exp_continue; }
	-re ".* 464 0b7e 01588281" { set x [expr $x+1]; exp_continue; }
	-re ".* 465 0b82 015882B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 466 0b86 01588291" { set x [expr $x+1]; exp_continue; }
	-re ".* 467 0b8a 015882A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 468 0b8e 015882C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 468      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 469 0b94 015882C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 469      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 470 0b9c 015882D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 470      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 471 0ba2 015882E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 471      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 472 0ba8 015882F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 472      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 473 0bae 015882DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 473      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 474 0bb6 015882EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 474      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 475 0bbe 015882FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 475      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 476 0bc6 01588240" { set x [expr $x+1]; exp_continue; }
	-re ".* 476      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 477 0bcc 01588248" { set x [expr $x+1]; exp_continue; }
	-re ".* 477      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 478              " {
	    if [expr $x == 26] then {
		pass "$testname: mov.w @er2+, ..."
	    } else {
		fail "$testname: mov.w @er2+, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w @er2+, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 479 0bd4 0158A201" { set x [expr $x+1]; exp_continue; }
	-re ".* 480 0bd8 0158A211" { set x [expr $x+1]; exp_continue; }
	-re ".* 481 0bdc 0158A281" { set x [expr $x+1]; exp_continue; }
	-re ".* 482 0be0 0158A2B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 483 0be4 0158A291" { set x [expr $x+1]; exp_continue; }
	-re ".* 484 0be8 0158A2A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 485 0bec 0158A2C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 485      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 486 0bf2 0158A2C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 486      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 487 0bfa 0158A2D3" { set x [expr $x+1]; exp_continue; }
	-re ".* 487      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 488 0c00 0158A2E3" { set x [expr $x+1]; exp_continue; }
	-re ".* 488      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 489 0c06 0158A2F3" { set x [expr $x+1]; exp_continue; }
	-re ".* 489      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 490 0c0c 0158A2DB" { set x [expr $x+1]; exp_continue; }
	-re ".* 490      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 491 0c14 0158A2EB" { set x [expr $x+1]; exp_continue; }
	-re ".* 491      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 492 0c1c 0158A2FB" { set x [expr $x+1]; exp_continue; }
	-re ".* 492      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 493 0c24 0158A240" { set x [expr $x+1]; exp_continue; }
	-re ".* 493      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 494 0c2a 0158A248" { set x [expr $x+1]; exp_continue; }
	-re ".* 494      12345678" { set x [expr $x+1]; exp_continue; }
	-re ".* 495              " {
	    if [expr $x == 26] then {
		pass "$testname: mov.w @er2-, ..."
	    } else {
		fail "$testname: mov.w @er2-, ... ($x)"
	    }
	}
        default	{ fail "$testname: mov.w @er2-, ... ($x)" }
    }

    set x 0
    expect {
	-re ".* 496 0c32 01589201" { set x [expr $x+1]; exp_continue; }
	-re ".* 497 0c36 01589211" { set x [expr $x+1]; exp_continue; }
	-re ".* 498 0c3a 01589281" { set x [expr $x+1]; exp_continue; }
	-re ".* 499 0c3e 015892B1" { set x [expr $x+1]; exp_continue; }
	-re ".* 500 0c42 01589291" { set x [expr $x+1]; exp_continue; }
	-re ".* 501 0c46 015892A1" { set x [expr $x+1]; exp_continue; }
	-re ".* 502 0c4a 015892C1" { set x [expr $x+1]; exp_continue; }
	-re ".* 502      1234" { set x [expr $x+1]; exp_continue; }
	-re ".* 503 0c50 015892C9" { set x [expr $x+1]; exp_continue; }
	-re ".* 503      12345678" { set x [expr $x+1]; exp_c