* gas/v850/hilo.s: New testfile.
* gas/v850/basic.exp: Run hilo tests.
This commit is contained in:
parent
3cb6bf7818
commit
1f17971dee
4 changed files with 45 additions and 1 deletions
|
@ -1,3 +1,10 @@
|
|||
start-sanitize-v850
|
||||
Fri Aug 30 00:37:55 1996 Jeffrey A Law (law@cygnus.com)
|
||||
|
||||
* gas/v850/hilo.s: New testfile.
|
||||
* gas/v850/basic.exp: Run hilo tests.
|
||||
|
||||
end-sanitize-v850
|
||||
Thu Aug 29 11:32:23 1996 James G. Smith <jsmith@cygnus.co.uk>
|
||||
|
||||
* gas/arm/arm7t.d: Explicitly force little-endian assembly.
|
||||
|
|
|
@ -30,6 +30,7 @@ basic.exp
|
|||
bit.s
|
||||
branch.s
|
||||
compare.s
|
||||
hilo.s
|
||||
jumps.s
|
||||
logical.s
|
||||
mem.s
|
||||
|
|
|
@ -261,7 +261,7 @@ proc do_mem {} {
|
|||
-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\]+ 000c 4033\[^\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 462F0500\[^\n\]*\n" { set x [expr $x+1] }
|
||||
|
@ -353,6 +353,34 @@ proc do_move {} {
|
|||
if [expr $x==4] then { pass $testname } else { fail $testname }
|
||||
}
|
||||
|
||||
proc do_hilo {} {
|
||||
set testname "hilo.s: hilo tests"
|
||||
set x 0
|
||||
|
||||
gas_start "hilo.s" "-al"
|
||||
|
||||
# Instead of having a variable for each match string just increment the
|
||||
# total number of matches seen. That's simpler when testing large numbers
|
||||
# of instructions (as these tests to).
|
||||
while 1 {
|
||||
expect {
|
||||
-re "^ +\[0-9\]+ 0000 200EEFBE\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0004 410EAEDE\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "^ +\[0-9\]+ 0008 410EADDE\[^\n\]*\n" { set x [expr $x+1] }
|
||||
-re "\[^\n\]*\n" { }
|
||||
timeout { perror "timeout\n"; break }
|
||||
eof { break }
|
||||
}
|
||||
}
|
||||
|
||||
# This was intended to do any cleanup necessary. It kinda looks like it
|
||||
# isn't needed, but just in case, please keep it in for now.
|
||||
gas_finish
|
||||
|
||||
# Did we find what we were looking for? If not, flunk it.
|
||||
if [expr $x==3] then { pass $testname } else { fail $testname }
|
||||
}
|
||||
|
||||
if [istarget v850*-*-*] then {
|
||||
# Test the basic instruction parser.
|
||||
do_arith
|
||||
|
@ -364,4 +392,7 @@ if [istarget v850*-*-*] then {
|
|||
do_mem
|
||||
do_misc
|
||||
do_move
|
||||
|
||||
# Make sure we handle lo() hi() and hi0() correctly.
|
||||
do_hilo
|
||||
}
|
||||
|
|
5
gas/testsuite/gas/v850/hilo.s
Normal file
5
gas/testsuite/gas/v850/hilo.s
Normal file
|
@ -0,0 +1,5 @@
|
|||
|
||||
.text
|
||||
movea lo(0xdeadbeef),r0,r1
|
||||
movhi hi(0xdeadbeef),r1,r1
|
||||
movhi hi0(0xdeadbeef),r1,r1
|
Loading…
Reference in a new issue