From f24d52e1abf8c975974da9965d422a1e608d78b0 Mon Sep 17 00:00:00 2001 From: Jeffrey A Law Date: Tue, 13 Apr 1999 11:31:35 +0000 Subject: [PATCH] pa.c: Use a register name, not a raw immediate in "bv" instructions. * pa.c: Use a register name, not a raw immediate in "bv" instructions. * pa.md, pa.h, ee.asm, ee_fp.asm, lib2funcs.asm: Likewise. From-SVN: r26403 --- gcc/ChangeLog | 3 +++ gcc/config/pa/ee.asm | 4 ++-- gcc/config/pa/ee_fp.asm | 4 ++-- gcc/config/pa/lib1funcs.asm | 28 ++++++++++++++-------------- gcc/config/pa/pa.c | 9 +++++---- gcc/config/pa/pa.h | 2 +- gcc/config/pa/pa.md | 16 ++++++++-------- 7 files changed, 35 insertions(+), 31 deletions(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 0dd765009a0..13d98a708cf 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -10,6 +10,9 @@ Tue Apr 13 05:04:59 1999 Richard Earnshaw (rearnsha@arm.com) Tue Apr 13 02:11:11 1999 Jeffrey A Law (law@cygnus.com) + * pa.c: Use a register name, not a raw immediate in "bv" instructions. + * pa.md, pa.h, ee.asm, ee_fp.asm, lib2funcs.asm: Likewise. + * pa.c: Remove space register specification in memory addresses, except where it is actually needed. * pa.md, pa.h, ee.asm, ee_fp.asm, lib2funcs.asm: Likewise. diff --git a/gcc/config/pa/ee.asm b/gcc/config/pa/ee.asm index 757632b066b..f707aa43455 100644 --- a/gcc/config/pa/ee.asm +++ b/gcc/config/pa/ee.asm @@ -150,7 +150,7 @@ L$0000 nop L$0001 ; Return - bv,n 0(%r31) + bv,n %r0(%r31) .EXIT .PROCEND @@ -255,7 +255,7 @@ L$0004 nop L$0005 ; Return and deallocate our frame. - bv 0(%r31) + bv %r0(%r31) sub %r30,%r21,%r30 .EXIT .PROCEND diff --git a/gcc/config/pa/ee_fp.asm b/gcc/config/pa/ee_fp.asm index 18a7fbbaad1..ad08acb686b 100644 --- a/gcc/config/pa/ee_fp.asm +++ b/gcc/config/pa/ee_fp.asm @@ -154,7 +154,7 @@ L$0002 nop L$0003 ; Return, setting up a frame pointer in the delay slot - bv 0(%r31) + bv %r0(%r31) sub %r30,%r21,%r3 .EXIT .PROCEND @@ -266,7 +266,7 @@ L$0006 nop L$0007 ; Return and deallocate our frame. - bv 0(%r31) + bv %r0(%r31) copy %r21,%r30 .EXIT .PROCEND diff --git a/gcc/config/pa/lib1funcs.asm b/gcc/config/pa/lib1funcs.asm index 95eb75e1398..03bb8434341 100644 --- a/gcc/config/pa/lib1funcs.asm +++ b/gcc/config/pa/lib1funcs.asm @@ -282,12 +282,12 @@ $$divU ds %r1,divisor,%r1 addc dividend,dividend,quotient ds %r1,divisor,%r1 - bv 0(ret) + bv %r0(ret) addc quotient,quotient,quotient L$largedivisor comclr,<< dividend,divisor,quotient ldi 1,quotient - bv,n 0(ret) + bv,n %r0(ret) .exit .procend #endif @@ -376,12 +376,12 @@ $$remU ds %r1,divisor,%r1 comclr,>= %r1,%r0,%r0 addl %r1,divisor,%r1 - bv 0(ret) + bv %r0(ret) copy %r1,quotient L$largedivisor sub,>>= dividend,divisor,quotient copy dividend,quotient - bv,n 0(ret) + bv,n %r0(ret) .exit .procend #endif @@ -479,12 +479,12 @@ $$divI addl %r1,divisor,%r1 comclr,>= quotient,%r0,%r0 ; skip of no need to negate sub %r0,dividend,dividend - bv 0(ret) + bv %r0(ret) copy dividend,quotient L$largedivisor comclr,<< dividend,divisor,quotient ldi 1,quotient - bv,n 0(ret) + bv,n %r0(ret) .exit .procend #endif @@ -582,12 +582,12 @@ $$remI addl %r1,divisor,%r1 comclr,>= quotient,%r0,%r0 ; skip of no need to negate sub %r0,%r1,%r1 - bv 0(ret) + bv %r0(ret) copy %r1,quotient L$largedivisor sub,>>= dividend,divisor,quotient copy dividend,quotient - bv,n 0(ret) + bv,n %r0(ret) .exit .procend #endif @@ -630,7 +630,7 @@ $$divU_3 sh1add %r29,%r26,%r0 ; r0 = lo(10 x r) + dividend shd %r1,%r29,31,%r29 ; r29 = hi(10 x r) addc %r29,%r0,%r29 - bv 0(ret) + bv %r0(ret) extru %r29,30,31,result .exit .procend @@ -674,7 +674,7 @@ $$divU_5 sh2add %r29,%r26,%r0 ; r0 = lo(1000 x r) + dividend shd %r1,%r29,30,%r29 ; r29 = hi(1000 x r) addc %r29,%r0,%r29 - bv 0(ret) + bv %r0(ret) extru %r29,29,30,result .exit .procend @@ -718,7 +718,7 @@ $$divU_6 sh1add %r29,%r26,%r0 ; r0 = lo(10 x r) + dividend shd %r1,%r29,31,%r29 ; r29 = hi(10 x r) addc %r29,%r0,%r29 - bv 0(ret) + bv %r0(ret) extru %r29,29,30,result .exit .procend @@ -762,7 +762,7 @@ $$divU_9 sh3add %r29,%r26,%r0 shd %r1,%r29,29,%r29 addc %r29,0,%r29 /* 111000111000111000111000111001 */ - bv 0(ret) + bv %r0(ret) extru %r29,30,31,result .exit .procend @@ -806,7 +806,7 @@ $$divU_10 sh2add %r29,%r26,%r0 ; r0 = lo(1000 x r) + dividend shd %r1,%r29,30,%r29 ; r29 = hi(1000 x r) addc %r29,%r0,%r29 - bv 0(ret) + bv %r0(ret) extru %r29,28,29,result .exit .procend @@ -850,7 +850,7 @@ $$divU_12 sh1add %r29,%r26,%r0 ; r0 = lo(10 x r) + dividend shd %r1,%r29,31,%r29 ; r29 = hi(10 x r) addc %r29,%r0,%r29 - bv 0(ret) + bv %r0(ret) extru %r29,28,29,result .exit .procend diff --git a/gcc/config/pa/pa.c b/gcc/config/pa/pa.c index 92f98ac3f7f..0d7527bd956 100644 --- a/gcc/config/pa/pa.c +++ b/gcc/config/pa/pa.c @@ -4580,7 +4580,8 @@ output_cbranch (operands, nullify, length, negated, insn) output_asm_insn ("bl .+8,%%r1\n\taddil L'%l0-%l4,%%r1", xoperands); ASM_OUTPUT_INTERNAL_LABEL (asm_out_file, "L", CODE_LABEL_NUMBER (xoperands[4])); - output_asm_insn ("ldo R'%l0-%l4(%%r1),%%r1\n\tbv 0(%%r1)", xoperands); + output_asm_insn ("ldo R'%l0-%l4(%%r1),%%r1\n\tbv %%r0(%%r1)", + xoperands); } /* Now restore the value of %r1 in the delay slot. We're not @@ -5159,7 +5160,7 @@ output_millicode_call (insn, call_dest) output_asm_insn ("blr 0,%%r31", xoperands); /* Jump to our target address in %r29. */ - output_asm_insn ("bv,n 0(%%r29)", xoperands); + output_asm_insn ("bv,n %%r0(%%r29)", xoperands); /* Empty delay slot. Note this insn gets fetched twice and executed once. To be safe we use a nop. */ @@ -5184,7 +5185,7 @@ output_millicode_call (insn, call_dest) output_asm_insn ("blr 0,%%r31", xoperands); /* Branch to our target which is in %r1. */ - output_asm_insn ("bv,n 0(%%r1)", xoperands); + output_asm_insn ("bv,n %%r0(%%r1)", xoperands); /* Empty delay slot. Note this insn gets fetched twice and executed once. To be safe we use a nop. */ @@ -5417,7 +5418,7 @@ output_call (insn, call_dest) output_asm_insn ("blr 0,%%r31", xoperands); /* Branch to our target which is in %r1. */ - output_asm_insn ("bv 0(%%r1)", xoperands); + output_asm_insn ("bv %%r0(%%r1)", xoperands); /* Copy the return address into %r2 also. */ output_asm_insn ("copy %%r31,%%r2", xoperands); diff --git a/gcc/config/pa/pa.h b/gcc/config/pa/pa.h index eeabab61c7b..e186516ada4 100644 --- a/gcc/config/pa/pa.h +++ b/gcc/config/pa/pa.h @@ -2342,7 +2342,7 @@ DTORS_SECTION_FUNCTION #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, BODY, VALUE, REL) \ if (TARGET_BIG_SWITCH) \ - fprintf (FILE, "\tstw %%r1,-16(%%r30)\n\tldw T'L$%04d(%%r19),%%r1\n\tbv 0(%%r1)\n\tldw -16(%%r30),%%r1\n", VALUE); \ + fprintf (FILE, "\tstw %%r1,-16(%%r30)\n\tldw T'L$%04d(%%r19),%%r1\n\tbv %%r0(%%r1)\n\tldw -16(%%r30),%%r1\n", VALUE); \ else \ fprintf (FILE, "\tb L$%04d\n\tnop\n", VALUE) diff --git a/gcc/config/pa/pa.md b/gcc/config/pa/pa.md index 38ef038ba40..6dce773cf21 100644 --- a/gcc/config/pa/pa.md +++ b/gcc/config/pa/pa.md @@ -3975,7 +3975,7 @@ (define_insn "return" [(return)] "hppa_can_use_return_insn_p ()" - "bv%* 0(%%r2)" + "bv%* %%r0(%%r2)" [(set_attr "type" "branch") (set_attr "length" "4")]) @@ -3985,7 +3985,7 @@ [(use (reg:SI 2)) (return)] "" - "bv%* 0(%%r2)" + "bv%* %%r0(%%r2)" [(set_attr "type" "branch") (set_attr "length" "4")]) @@ -4079,7 +4079,7 @@ output_asm_insn (\"bl .+8,%%r1\\n\\taddil L'%l0-%l1,%%r1\", xoperands); ASM_OUTPUT_INTERNAL_LABEL (asm_out_file, \"L\", CODE_LABEL_NUMBER (xoperands[1])); - output_asm_insn (\"ldo R'%l0-%l1(%%r1),%%r1\\n\\tbv 0(%%r1)\", + output_asm_insn (\"ldo R'%l0-%l1(%%r1),%%r1\\n\\tbv %%r0(%%r1)\", xoperands); } else @@ -4276,7 +4276,7 @@ /* Long millicode call for portable runtime. */ if (get_attr_length (insn) == 20) - return \"ldil L%%$$dyncall,%%r31\;ldo R%%$$dyncall(%%r31),%%r31\;blr 0,%%r2\;bv,n 0(%%r31)\;nop\"; + return \"ldil L%%$$dyncall,%%r31\;ldo R%%$$dyncall(%%r31),%%r31\;blr 0,%%r2\;bv,n %%r0(%%r31)\;nop\"; /* If we're generating PIC code. */ xoperands[0] = operands[0]; @@ -4287,7 +4287,7 @@ CODE_LABEL_NUMBER (xoperands[1])); output_asm_insn (\"ldo R%%$$dyncall-%1(%%r1),%%r1\", xoperands); output_asm_insn (\"blr 0,%%r2\", xoperands); - output_asm_insn (\"bv,n 0(%%r1)\\n\\tnop\", xoperands); + output_asm_insn (\"bv,n %%r0(%%r1)\\n\\tnop\", xoperands); return \"\"; }" [(set_attr "type" "dyncall") @@ -4436,7 +4436,7 @@ /* Long millicode call for portable runtime. */ if (get_attr_length (insn) == 20) - return \"ldil L%%$$dyncall,%%r31\;ldo R%%$$dyncall(%%r31),%%r31\;blr 0,%%r2\;bv,n 0(%%r31)\;nop\"; + return \"ldil L%%$$dyncall,%%r31\;ldo R%%$$dyncall(%%r31),%%r31\;blr 0,%%r2\;bv,n %%r0(%%r31)\;nop\"; /* If we're generating PIC code. */ xoperands[0] = operands[1]; @@ -4447,7 +4447,7 @@ CODE_LABEL_NUMBER (xoperands[1])); output_asm_insn (\"ldo R%%$$dyncall-%1(%%r1),%%r1\", xoperands); output_asm_insn (\"blr 0,%%r2\", xoperands); - output_asm_insn (\"bv,n 0(%%r1)\\n\\tnop\", xoperands); + output_asm_insn (\"bv,n %%r0(%%r1)\\n\\tnop\", xoperands); return \"\"; }" [(set_attr "type" "dyncall") @@ -4548,7 +4548,7 @@ (define_insn "indirect_jump" [(set (pc) (match_operand:SI 0 "register_operand" "r"))] "" - "bv%* 0(%0)" + "bv%* %%r0(%0)" [(set_attr "type" "branch") (set_attr "length" "4")]) -- 2.30.2