mirrors/binutils-gdb
0
0
Fork 0
mirror of https://sourceware.org/git/binutils-gdb.git synced 2025-01-20 15:03:31 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

* gas/hppa/more.parse/regpopbug.s: New test.

Browse Source 
* gas/hppa/more.parse/parse.exp: Run it.
This commit is contained in:
Jeff Law 1994-03-16 19:58:31 +00:00
parent 6d244da7a1
commit 2573e71c0e
7 changed files with 41 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gas/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
Wed Mar 16 11:57:07 1994 Jeffrey A. Law (law@snake.cs.utah.edu)
* gas/hppa/more.parse/regpopbug.s: New test.
* gas/hppa/more.parse/parse.exp: Run it.
Mon Feb 28 14:10:04 1994 Ken Raeburn (raeburn@cujo.cygnus.com)
* lib/gas-defs.exp (objdump): New proc.

1
gas/testsuite/gas/hppa/more.parse/.Sanitize
View File

@ -44,6 +44,7 @@ lselbug.s
nosubspace.s
parse.exp
procbug.s
regpopbug.s
spacebug.s
ssbug.s
stdreg.s

3
gas/testsuite/gas/hppa/more.parse/parse.exp
View File

@ -209,5 +209,8 @@ if [istarget hppa*-*-*] then {
# Make sure we give errors if a floating point format is specified
# for an xmpyu instruction (integer multiple)
gas_test_error "xmpyubug.s" "" "Check for error on bogus argument to .block"
# Make sure gas handles various kinds of .reg pseudo-ops
gas_test "regpopbug.s" "" "" "Test for bugs in .reg pseudo-op"
}

14
gas/testsuite/gas/hppa/more.parse/regpopbug.s Normal file
View File

@ -0,0 +1,14 @@
.SPACE $PRIVATE$
.SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
.SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
.SPACE $TEXT$
.SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
.SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
.SPACE $TEXT$
.SUBSPA $CODE$
r0 .reg %r0
shift .reg %sar
fpreg10 .reg %fr10
shift2 .reg shift

1
gas/testsuite/gas/hppa/parse/.Sanitize
View File

@ -44,6 +44,7 @@ lselbug.s
nosubspace.s
parse.exp
procbug.s
regpopbug.s
spacebug.s
ssbug.s
stdreg.s

3
gas/testsuite/gas/hppa/parse/parse.exp
View File

@ -209,5 +209,8 @@ if [istarget hppa*-*-*] then {
# Make sure we give errors if a floating point format is specified
# for an xmpyu instruction (integer multiple)
gas_test_error "xmpyubug.s" "" "Check for error on bogus argument to .block"
# Make sure gas handles various kinds of .reg pseudo-ops
gas_test "regpopbug.s" "" "" "Test for bugs in .reg pseudo-op"
}

14
gas/testsuite/gas/hppa/parse/regpopbug.s Normal file
View File

@ -0,0 +1,14 @@
.SPACE $PRIVATE$
.SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
.SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
.SPACE $TEXT$
.SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
.SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
.SPACE $TEXT$
.SUBSPA $CODE$
r0 .reg %r0
shift .reg %sar
fpreg10 .reg %fr10
shift2 .reg shift