* gas/mn10300/basic.exp: Check bit patterns for a

couple more mov and cmp instructions.
This commit is contained in:
Jeff Law 1996-11-04 19:56:27 +00:00
parent 68328dc6bd
commit 9eb0125b6c
2 changed files with 80 additions and 75 deletions

View File

@ -1,3 +1,8 @@
Mon Nov 4 12:55:11 1996 Jeffrey A Law (law@cygnus.com)
* gas/mn10300/basic.exp: Check bit patterns for a
couple more mov and cmp instructions.
Tue Oct 29 17:05:43 1996 Ian Lance Taylor <ian@cygnus.com>
* gas/mips/*.d: Update for disassembler changes.
@ -36,7 +41,7 @@ Wed Oct 9 14:15:18 1996 Jeffrey A Law (law@cygnus.com)
Thu Oct 3 09:57:03 1996 Jeffrey A Law (law@cygnus.com)
* gas/mn10200, gas/mn10300: New directorys for Matsushita
* gas/mn10200, gas/mn10300: New directories for Matsushita
mn10200 and mn10300 tests.
Tue Oct 1 15:38:28 1996 Ian Lance Taylor <ian@cygnus.com>

View File

@ -34,14 +34,14 @@ proc do_add {} {
-re "^ +\[0-9\]+ 0001 F16B\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0003 F17E\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005 F159\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0007 \[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0009\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0007 2910\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0009 FAC20100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000d\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0015\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013 2110\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0015 FAD20100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0019\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001f\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0022\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001f F8FE10\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0022 FAFE0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0026\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c F146\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
@ -109,8 +109,8 @@ proc do_bit {} {
# of instructions (as these tests to).
while 1 {
expect {
-re "^ +\[0-9\]+ 0000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0003\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0000 F8ED40\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0003 FAEE2000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0007\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000d\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0011\[^\n\]*\n" { set x [expr $x+1] }
@ -149,11 +149,11 @@ proc do_cmp {} {
-re "^ +\[0-9\]+ 0001 F1AB\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0003 F19F\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005 BE\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0008\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006 AF10\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0008 FACA0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0014\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012 BF10\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0014 FADA0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0018\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
@ -249,17 +249,17 @@ proc do_logical {} {
while 1 {
expect {
-re "^ +\[0-9\]+ 0000 F206\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002 F8E27F\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005 FAE37FFF\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0009\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f FAFC7FFF\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013 F216\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0015\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0018\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0015 F8E67F\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0018 FAE77FFF\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0022\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0022 FAFD7FFF\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0026 F226\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0028\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0028 FAEB7FFF\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0032 F233\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
@ -334,11 +334,11 @@ proc do_mov1 {} {
-re "^ +\[0-9\]+ 000b F2E1\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000d F2FA\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f 76\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010 F80608\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013 FA060100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0017\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001d\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001f\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001d 5908\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001f FAB50100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0023 F2E7\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
@ -367,19 +367,19 @@ proc do_mov2 {} {
expect {
-re "^ +\[0-9\]+ 0000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0008\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0008 318000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000b\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0011 F006\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0016\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013 F82608\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0016 FA260100 \[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001a\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0020\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0022\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0020 5D08\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0022 FAB10100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0026\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002e FAA18000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0032\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0038\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0038 F8F120\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }
@ -406,20 +406,20 @@ proc do_mov3 {} {
while 1 {
expect {
-re "^ +\[0-9\]+ 0000 66\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0001\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0004\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0001 F81620\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0004 FA160100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0008\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000e 4620\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010 FA958000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0014\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001a\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c 050080\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001f\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0025 F016\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0027\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002a\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0027 F83620\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002a FA360100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0034\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0034 4720\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }
@ -445,17 +445,17 @@ proc do_mov4 {} {
# of instructions (as these tests to).
while 1 {
expect {
-re "^ +\[0-9\]+ 0000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0000 FA948000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0004\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000a\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000c FA840080\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0016\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0019\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001b\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0016 F8F520\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0019 8508\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001b 2D0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0024\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0026\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0024 9508\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0026 250100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0029\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
@ -483,24 +483,24 @@ proc do_movbu {} {
while 1 {
expect {
-re "^ +\[0-9\]+ 0000 F046\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002 F84608\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005 FA460100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0009\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f F8B908\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012 FAB90100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0016\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001e 358000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0021\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0027 F056\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0029\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0029 F85620\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c FA560100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0030\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0036\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0039\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0036 F89620\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0039 FA968000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 003d\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0043\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0045\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0045 060080\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0048\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
@ -528,24 +528,24 @@ proc do_movhu {} {
while 1 {
expect {
-re "^ +\[0-9\]+ 0000 F066\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002 F86608\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005 FA660100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0009\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f F8BD08\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012 FABD0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0016\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001e 398000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0021\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0027 F076\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0029\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0029 F87620\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 002c FA760100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0030\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0036\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0039\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0036 F89720\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0039 FA978000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 003d\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0043\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0045\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0045 070080\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0048\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
@ -572,10 +572,10 @@ proc do_movm {} {
# of instructions (as these tests to).
while 1 {
expect {
-re "^ +\[0-9\]+ 0000\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0004\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0000 CE00\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002 CE0B\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0004 CF00\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006 CF0B\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }
@ -635,12 +635,12 @@ proc do_other {} {
-re "^ +\[0-9\]+ 0002 49\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0003 53\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0004 F0F6\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0006 CC0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0009\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000e\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0013\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001a F0F2\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 001c FAFF0100\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0020\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0026\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0029\[^\n\]*\n" { set x [expr $x+1] }
@ -675,11 +675,11 @@ proc do_shift {} {
while 1 {
expect {
-re "^ +\[0-9\]+ 0000 F2B6\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0002 F8CA04\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0005 F2AB\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0007\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0007 F8C704\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000a F29E\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000c\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000c F8C204\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 000f 56\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010 F285\[^\n\]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0012 F282\[^\n\]*\n" { set x [expr $x+1] }