diff options
| author | Rob Savoye <rob@cygnus> | 1994-01-20 23:10:41 +0000 |
|---|---|---|
| committer | Rob Savoye <rob@cygnus> | 1994-01-20 23:10:41 +0000 |
| commit | 6caa29338bb1c5d3d456847d70f2c379a6377bb2 (patch) | |
| tree | 20b39a61f7deda40a19852016a91593b5d3dcac0 /gas | |
| parent | d4a0983ab06c518f0bd43b99b5208236e18759c9 (diff) | |
| download | gdb-6caa29338bb1c5d3d456847d70f2c379a6377bb2.zip gdb-6caa29338bb1c5d3d456847d70f2c379a6377bb2.tar.gz gdb-6caa29338bb1c5d3d456847d70f2c379a6377bb2.tar.bz2 | |
Tweaked to run under either version of expect.
Diffstat (limited to 'gas')
| -rw-r--r-- | gas/testsuite/gas/sun4/addend.exp | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/gas/testsuite/gas/sun4/addend.exp b/gas/testsuite/gas/sun4/addend.exp new file mode 100644 index 0000000..a8d1a48 --- /dev/null +++ b/gas/testsuite/gas/sun4/addend.exp @@ -0,0 +1,36 @@ +# +# SunOS4 on SPARC tests +# + +if [istarget sparc-*-sunos4*] then { + set x1 0 + set x2 0 + set x3 0 + set x4 0 + set x5 0 + set x6 0 + set testname "addends (part 2)" + if [gas_test_old "addend.s" "" "addends (part 1)"] then { + objdump_start_no_subdir "a.out" "-r" + while 1 { + # These are what we get using the SunOS assembler. + expect { + -re "08 WDISP22 +foo1\[+\]+0xf+fc\r\n" { incr x1 } + -re "0c WDISP22 +foo1\[+\]+0xf+f8\r\n" { incr x2 } + -re "10 WDISP22 +foo1\[+\]+0xf+f0\r\n" { incr x3 } + -re "14 WDISP22 +foo1\[+\]+0xf+ec\r\n" { incr x4 } + -re "1c 32 +foo1\r\n" { incr x5 } + -re "20 32 +foo1\[+\]+0x0*04\r\n" { incr x6 } + -re "\[^\n\]*\n" { } + timeout { error "timeout\n"; break } + eof { break } + } + } + objdump_finish + if [all_ones $x1 $x2 $x3 $x4 $x5 $x6] then { + pass $testname + } else { + fail $testname + } + } +} |