diff options
| author | Jeff Law <law@redhat.com> | 1996-08-23 19:35:05 +0000 |
|---|---|---|
| committer | Jeff Law <law@redhat.com> | 1996-08-23 19:35:05 +0000 |
| commit | 8289ed0b657405ed9095093e513ae7766fba9828 (patch) | |
| tree | 5481c6ae6c151fada93f7bc4f75a4362f515df3e | |
| parent | fb6da8680e8d15b3132e19e5b55f8cebbaa3b726 (diff) | |
| download | gdb-8289ed0b657405ed9095093e513ae7766fba9828.zip gdb-8289ed0b657405ed9095093e513ae7766fba9828.tar.gz gdb-8289ed0b657405ed9095093e513ae7766fba9828.tar.bz2 | |
* gas/v850/basic.exp (mem_tests): Test instruction bit patterns.
xfail sst and sld tests.
(mov_tests): Remove bogus xfail.
* gas/v850/mem.s: sst and sld instructions can only index from
"ep" register.
| -rw-r--r-- | gas/testsuite/ChangeLog | 6 | ||||
| -rwxr-xr-x | gas/testsuite/gas/v850/basic.exp | 20 | ||||
| -rw-r--r-- | gas/testsuite/gas/v850/mem.s | 12 |
3 files changed, 25 insertions, 13 deletions
diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog index 19f2783..2e22f15 100644 --- a/gas/testsuite/ChangeLog +++ b/gas/testsuite/ChangeLog @@ -1,6 +1,12 @@ start-sanitize-v850 Fri Aug 23 11:02:55 1996 Jeffrey A Law (law@cygnus.com) + * gas/v850/basic.exp (mem_tests): Test instruction bit patterns. + xfail sst and sld tests. + (mov_tests): Remove bogus xfail. + * gas/v850/mem.s: sst and sld instructions can only index from + "ep" register. + * gas/v850/basic.exp (logical_tests): Test instruction bit patterns. Update addresses. * gas/v850/logical.s: Tweak constants for better testing. diff --git a/gas/testsuite/gas/v850/basic.exp b/gas/testsuite/gas/v850/basic.exp index d883fc7..cf6e866 100755 --- a/gas/testsuite/gas/v850/basic.exp +++ b/gas/testsuite/gas/v850/basic.exp @@ -258,15 +258,15 @@ proc do_mem {} { # of instructions (as these tests to). while 1 { expect { - -re "^ +\[0-9\]+ 0000\[^\n\]*\n" { set x [expr $x+1] } - -re "^ +\[0-9\]+ 0004\[^\n\]*\n" { set x [expr $x+1] } - -re "^ +\[0-9\]+ 0008\[^\n\]*\n" { set x [expr $x+1] } + -re "^ +\[0-9\]+ 0000 05370500\[^\n\]*\n" { set x [expr $x+1] } + -re "^ +\[0-9\]+ 0004 25370400\[^\n\]*\n" { set x [expr $x+1] } + -re "^ +\[0-9\]+ 0008 25370500\[^\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\]+ 0016\[^\n\]*\n" { set x [expr $x+1] } - -re "^ +\[0-9\]+ 001a\[^\n\]*\n" { set x [expr $x+1] } + -re "^ +\[0-9\]+ 0012 462F0500\[^\n\]*\n" { set x [expr $x+1] } + -re "^ +\[0-9\]+ 0016 662F0400\[^\n\]*\n" { set x [expr $x+1] } + -re "^ +\[0-9\]+ 001a 662F0500\[^\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] } @@ -282,6 +282,12 @@ proc do_mem {} { # Did we find what we were looking for? If not, flunk it. if [expr $x==12] then { pass $testname } else { fail $testname } + + setup_xfail v850*-*-* + fail "sld and sst instructions improperly assembled." + + setup_xfail v850*-*-* + fail "sld and sst instructions did not catch improper index assembled." } proc do_misc {} { @@ -344,7 +350,7 @@ proc do_move {} { gas_finish # Did we find what we were looking for? If not, flunk it. - if [expr $x==4] then { pass $testname } else { setup_xfail "*-*-*" ; fail $testname } + if [expr $x==4] then { pass $testname } else { fail $testname } } if [istarget v850*-*-*] then { diff --git a/gas/testsuite/gas/v850/mem.s b/gas/testsuite/gas/v850/mem.s index a87ff55..00e8952 100644 --- a/gas/testsuite/gas/v850/mem.s +++ b/gas/testsuite/gas/v850/mem.s @@ -5,12 +5,12 @@ memory: ld.b 5[r5],r6 ld.h 4[r5],r6 ld.w 4[r5],r6 - sld.b -64[r5],r6 - sld.h 128[r5],r6 - sld.w 128[r5],r6 + sld.b -64[ep],r6 + sld.h 128[ep],r6 + sld.w 128[ep],r6 st.b r5,5[r6] st.h r5,4[r6] st.w r5,4[r6] - sst.b r5,63[r6] - sst.h r5,128[r6] - sst.w r5,128[r6] + sst.b r5,63[ep] + sst.h r5,128[ep] + sst.w r5,128[ep] |