# 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\]+ 0008\[^\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\]+ 000e\[^\n\]*\n" { set x [expr $x+1] }
- -re "^ +\[0-9\]+ 0010\[^\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\]+ 0016\[^\n\]*\n" { set x [expr $x+1] }
- -re "^ +\[0-9\]+ 0018\[^\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\]+ 001e\[^\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\]+ 0024\[^\n\]*\n" { set x [expr $x+1] }
- -re "^ +\[0-9\]+ 0026\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0000 8F05\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0002 8E05\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0004 8605\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0006 8705\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0008 8B05\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 000a 8905\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 000c 8105\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 000e 8305\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0010 8205\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0012 8A05\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0014 8005\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0016 8805\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0018 8405\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 001a 8C05\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 001c 8105\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 001e 8905\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0020 8205\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0022 8A05\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0024 8505\[^\n\]*\n" { set x [expr $x+1] }
+ -re "^ +\[0-9\]+ 0026 8D05\[^\n\]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break }
eof { break }