diff options
author | Jeff Law <law@redhat.com> | 1999-08-28 06:26:22 +0000 |
---|---|---|
committer | Jeff Law <law@redhat.com> | 1999-08-28 06:26:22 +0000 |
commit | 40a825c3105b48b6517d8db7d35cec09ef57faf2 (patch) | |
tree | 104b9fc9e8cbf11717dafea5e98f39d1e19d25a3 | |
parent | 0791df6ce389671fa80ddbac24c539a9c7b0aa95 (diff) | |
download | gdb-40a825c3105b48b6517d8db7d35cec09ef57faf2.zip gdb-40a825c3105b48b6517d8db7d35cec09ef57faf2.tar.gz gdb-40a825c3105b48b6517d8db7d35cec09ef57faf2.tar.bz2 |
* binutils-all/hppa/freg.s: New file.
* binutils-all/hppa/objdump.exp: Add freg.s test.
-rw-r--r-- | binutils/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | binutils/testsuite/binutils-all/hppa/freg.s | 23 | ||||
-rw-r--r-- | binutils/testsuite/binutils-all/hppa/objdump.exp | 26 |
3 files changed, 54 insertions, 0 deletions
diff --git a/binutils/testsuite/ChangeLog b/binutils/testsuite/ChangeLog index be156b1..8230d60 100644 --- a/binutils/testsuite/ChangeLog +++ b/binutils/testsuite/ChangeLog @@ -1,3 +1,8 @@ +Sat Aug 28 00:24:27 1999 Jerry Quinn <jquinn@nortelnetworks.com> + + * binutils-all/hppa/freg.s: New file. + * binutils-all/hppa/objdump.exp: Add freg.s test. + 1999-08-09 Ian Lance Taylor <ian@zembu.com> * binutils-all/objcopy.exp: Add setup_xfail for simple copy test diff --git a/binutils/testsuite/binutils-all/hppa/freg.s b/binutils/testsuite/binutils-all/hppa/freg.s new file mode 100644 index 0000000..501e10f --- /dev/null +++ b/binutils/testsuite/binutils-all/hppa/freg.s @@ -0,0 +1,23 @@ + .LEVEL 2.0 + .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 + .IMPORT $global$,DATA + .IMPORT $$dyncall,MILLICODE +; gcc_compiled.: + .SPACE $TEXT$ + .SUBSPA $CODE$ + + .align 4 + .NSUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY + .EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR +main + .PROC + .CALLINFO FRAME=64,CALLS,SAVE_RP + .ENTRY + fmpyfadd,sgl %fr4L,%fr4R,%fr5R,%fr5L + .EXIT + .PROCEND diff --git a/binutils/testsuite/binutils-all/hppa/objdump.exp b/binutils/testsuite/binutils-all/hppa/objdump.exp index a46b289..da0be67 100644 --- a/binutils/testsuite/binutils-all/hppa/objdump.exp +++ b/binutils/testsuite/binutils-all/hppa/objdump.exp @@ -57,3 +57,29 @@ if [regexp $want $got] then { } else { fail "addendbug test" } + +########################### +# Set up the test of freg.s +########################### + +if {![binutils_assemble $srcdir/$subdir/freg.s tmpdir/freg.o]} then { + return +} + +if [is_remote host] { + set objfile [remote_download host tmpdir/freg.o] +} else { + set objfile tmpdir/freg.o +} + +# Make sure that we get R float regs like we're supposed to + +set got [binutils_run $OBJDUMP "$OBJDUMPFLAGS --disassemble $objfile"] + +set want "fmpyfadd,sgl fr4,fr4R,fr5R,fr5" + +if [regexp $want $got] then { + pass "freg test" +} else { + fail "freg test" +} |