(call): Force address into register in non-symbol case.

(call_value): Likewise.

From-SVN: r7380

diff --git a/gcc/config/pa/pa.md b/gcc/config/pa/pa.md
index 8d8c236b5f99bd2356c872b25bd943c27169b868..96dd1bb47ed48327e3ca5e6e5cf33ff39bd66793 100644 (file)
--- a/gcc/config/pa/pa.md
+++ b/gcc/config/pa/pa.md
@@ -3025,7 +3025,8 @@
   if (GET_CODE (op) == SYMBOL_REF)
     emit_call_insn (gen_call_internal_symref (op, operands[1]));
   else
-    emit_call_insn (gen_call_internal_reg (op, operands[1]));
+    emit_call_insn (gen_call_internal_reg (force_reg (SImode, op),
+                                          operands[1]));
 
   if (flag_pic)
     {
@@ -3091,7 +3092,9 @@
     emit_call_insn (gen_call_value_internal_symref (operands[0], op,
                                                    operands[2]));
   else
-    emit_call_insn (gen_call_value_internal_reg (operands[0], op, operands[2]));
+    emit_call_insn (gen_call_value_internal_reg (operands[0],
+                                                force_reg (SImode, op),
+                                                operands[2]));
 
   if (flag_pic)
     {