* gas/v850/basic.exp (logical_tests): Test instruction bit patterns.
Update addresses. * gas/v850/logical.s: Tweak constants for better testing.
This commit is contained in:
parent
38c7a4504d
commit
1fa751362b
|
@ -1,6 +1,10 @@
|
|||
start-sanitize-v850
|
||||
Fri Aug 23 11:02:55 1996 Jeffrey A Law (law@cygnus.com)
|
||||
|
||||
* gas/v850/basic.exp (logical_tests): Test instruction bit patterns.
|
||||
Update addresses.
|
||||
* gas/v850/logical.s: Tweak constants for better testing.
|
||||
|
||||
* gas/v850/basic.exp (jump_tests): Test instruction bit patterns,
|
||||
but not displacements (yet).
|
||||
|
||||
|
|
|
@ -226,13 +226,13 @@ proc do_logical {} {
|
|||
# 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\]+ 0006\[^\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\]+ 0010\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0012\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0000 4531\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0002 C5360700\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0006 2530\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0008 0531\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 000a 85360700\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 000e 2531\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0010 A5360700\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "\[^\n\]*\n" { }
|
||||
timeout { perror "timeout\n"; break }
|
||||
eof { break }
|
||||
|
|
Loading…
Reference in New Issue