darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix minor goofs in previous delta.

Browse source
This commit is contained in:
Jeff Law 1999-08-28 08:02:52 +00:00
parent b7d6d48509
commit 3d756caf33
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gas/testsuite/gas/hppa/basic/basic.exp
View file

@ -2072,7 +2072,7 @@ proc do_fp_fcmp {} {
} }
proc do_media {} { proc do_media {} {
set testname "media.s: purge tests" set testname "media.s: media tests"
set x 0 set x 0
gas_start "media.s" "-al" gas_start "media.s" "-al"
@ -2092,7 +2092,7 @@ proc do_media {} {
-re "^ +\[0-9\]+ 000c 096707CC\[^\n]*\n" { set x [expr $x+1] } -re "^ +\[0-9\]+ 000c 096707CC\[^\n]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0010 0967054C\[^\n]*\n" { set x [expr $x+1] } -re "^ +\[0-9\]+ 0010 0967054C\[^\n]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0014 0967058C\[^\n]*\n" { set x [expr $x+1] } -re "^ +\[0-9\]+ 0014 0967058C\[^\n]*\n" { set x [expr $x+1] }
-re "^ +\[0-9\]+ 0014 096705CC\[^\n]*\n" { set x [expr $x+1] } -re "^ +\[0-9\]+ 0018 096705CC\[^\n]*\n" { set x [expr $x+1] }
-re "\[^\n\]*\n" { } -re "\[^\n\]*\n" { }
timeout { perror "timeout\n"; break } timeout { perror "timeout\n"; break }
eof { break } eof { break }
@ -2104,7 +2104,7 @@ proc do_media {} {
gas_finish gas_finish
# Did we find what we were looking for? If not, flunk it. # Did we find what we were looking for? If not, flunk it.
if [expr $x==18] then { pass $testname } else { fail $testname } if [expr $x==7] then { pass $testname } else { fail $testname }
} }
proc do_special {} { proc do_special {} {