mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-06-26 22:07:58 +08:00
* gas/hppa/more.parse/regpopbug.s: New test.
* gas/hppa/more.parse/parse.exp: Run it.
This commit is contained in:
@ -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)
|
Mon Feb 28 14:10:04 1994 Ken Raeburn (raeburn@cujo.cygnus.com)
|
||||||
|
|
||||||
* lib/gas-defs.exp (objdump): New proc.
|
* lib/gas-defs.exp (objdump): New proc.
|
||||||
|
@ -44,6 +44,7 @@ lselbug.s
|
|||||||
nosubspace.s
|
nosubspace.s
|
||||||
parse.exp
|
parse.exp
|
||||||
procbug.s
|
procbug.s
|
||||||
|
regpopbug.s
|
||||||
spacebug.s
|
spacebug.s
|
||||||
ssbug.s
|
ssbug.s
|
||||||
stdreg.s
|
stdreg.s
|
||||||
|
@ -209,5 +209,8 @@ if [istarget hppa*-*-*] then {
|
|||||||
# Make sure we give errors if a floating point format is specified
|
# Make sure we give errors if a floating point format is specified
|
||||||
# for an xmpyu instruction (integer multiple)
|
# for an xmpyu instruction (integer multiple)
|
||||||
gas_test_error "xmpyubug.s" "" "Check for error on bogus argument to .block"
|
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
14
gas/testsuite/gas/hppa/more.parse/regpopbug.s
Normal 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
|
@ -44,6 +44,7 @@ lselbug.s
|
|||||||
nosubspace.s
|
nosubspace.s
|
||||||
parse.exp
|
parse.exp
|
||||||
procbug.s
|
procbug.s
|
||||||
|
regpopbug.s
|
||||||
spacebug.s
|
spacebug.s
|
||||||
ssbug.s
|
ssbug.s
|
||||||
stdreg.s
|
stdreg.s
|
||||||
|
@ -209,5 +209,8 @@ if [istarget hppa*-*-*] then {
|
|||||||
# Make sure we give errors if a floating point format is specified
|
# Make sure we give errors if a floating point format is specified
|
||||||
# for an xmpyu instruction (integer multiple)
|
# for an xmpyu instruction (integer multiple)
|
||||||
gas_test_error "xmpyubug.s" "" "Check for error on bogus argument to .block"
|
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
14
gas/testsuite/gas/hppa/parse/regpopbug.s
Normal 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
|
Reference in New Issue
Block a user