m68k.c (output_scc_di): Fix coding style.
authorRoman Zippel <zippel@linux-m68k.org>
Sat, 24 Jul 2004 11:12:29 +0000 (11:12 +0000)
committerAndreas Schwab <schwab@gcc.gnu.org>
Sat, 24 Jul 2004 11:12:29 +0000 (11:12 +0000)
2004-07-24  Roman Zippel  <zippel@linux-m68k.org>

* config/m68k/m68k.c (output_scc_di): Fix coding style.
(symbolic_operand): Fix prototype.
* config/m68k/m68k.h (PREDICATE_CODES): Add symbolic_operand.
* config/m68k/m68k.md: Add constants for registers a0 and sp and
use them, change from the "{...}" syntax to the simpler {...}
syntax.
(*cfv4_extendqisi2): Fix destination predicate.
* config/m68k/m68k-protos.h: Remove various declarations also
generated via PREDICATE_CODES.

From-SVN: r85115

gcc/ChangeLog
gcc/config/m68k/m68k-protos.h
gcc/config/m68k/m68k.c
gcc/config/m68k/m68k.h
gcc/config/m68k/m68k.md

index 0c8219d00d08d3e437dd6c9e4439db3a4efc3b4a..c4010d46d18c65d39d770bbf87ccdd720743f7c3 100644 (file)
@@ -1,3 +1,15 @@
+2004-07-24  Roman Zippel  <zippel@linux-m68k.org>
+
+       * config/m68k/m68k.c (output_scc_di): Fix coding style.
+       (symbolic_operand): Fix prototype.
+       * config/m68k/m68k.h (PREDICATE_CODES): Add symbolic_operand.
+       * config/m68k/m68k.md: Add constants for registers a0 and sp and
+       use them, change from the "{...}" syntax to the simpler {...}
+       syntax.
+       (*cfv4_extendqisi2): Fix destination predicate.
+       * config/m68k/m68k-protos.h: Remove various declarations also
+       generated via PREDICATE_CODES.
+
 2004-07-23  Mike Stump  <mrs@apple.com>
 
        * c-typeck.c (convert_for_assignment): Tightened up pointer converstions
index 73810d72f82934e40fc94890372e327a6e1e9bab..8538b8e0d28887c311dcdedccea4e173ea17518e 100644 (file)
@@ -41,24 +41,14 @@ extern const char *output_iorsi3 (rtx *);
 extern const char *output_xorsi3 (rtx *);
 extern void m68k_output_pic_call (rtx dest);
 extern void output_dbcc_and_branch (rtx *);
-extern int const_uint32_operand (rtx, enum machine_mode);
-extern int const_sint32_operand (rtx, enum machine_mode);
 extern int floating_exact_log2 (rtx);
-extern int not_sp_operand (rtx, enum machine_mode);
-extern int valid_dbcc_comparison_p (rtx, enum machine_mode);
-extern int extend_operator (rtx, enum machine_mode);
 extern bool strict_low_part_peephole_ok (enum machine_mode mode, rtx first_insn, rtx target);
 
 /* Functions from m68k.c used in macros.  */
-extern bool symbolic_operand (rtx, enum machine_mode);
 extern int standard_68881_constant_p (rtx);
 extern void print_operand_address (FILE *, rtx);
 extern void print_operand (FILE *, rtx, int);
 extern void notice_update_cc (rtx, rtx);
-extern int general_src_operand (rtx, enum machine_mode);
-extern int nonimmediate_src_operand (rtx, enum machine_mode);
-extern int memory_src_operand (rtx, enum machine_mode);
-extern int pcrel_address (rtx, enum machine_mode);
 extern rtx legitimize_pic_address (rtx, enum machine_mode, rtx);
 #endif /* RTX_CODE */
 
index 174c3a6a33533a0215f8dd66617c2b5c023551c1..4f2b71e06f9dc37507089b04e7c931dfb7e0b8fe 100644 (file)
@@ -1118,7 +1118,7 @@ output_scc_di(rtx op, rtx operand1, rtx operand2, rtx dest)
       else
        loperands[3] = adjust_address (operand2, SImode, 4);
     }
-  loperands[4] = gen_label_rtx();
+  loperands[4] = gen_label_rtx ();
   if (operand2 != const0_rtx)
     {
       output_asm_insn (MOTOROLA ?
@@ -1160,7 +1160,7 @@ output_scc_di(rtx op, rtx operand1, rtx operand2, rtx dest)
         break;
 
       case GT:
-        loperands[6] = gen_label_rtx();
+        loperands[6] = gen_label_rtx ();
         output_asm_insn (MOTOROLA ?
                           "shi %5\n\tjbra %l6" :
                           "shi %5\n\tjra %l6",
@@ -1179,7 +1179,7 @@ output_scc_di(rtx op, rtx operand1, rtx operand2, rtx dest)
         break;
 
       case LT:
-        loperands[6] = gen_label_rtx();
+        loperands[6] = gen_label_rtx ();
         output_asm_insn (MOTOROLA ?
                           "scs %5\n\tjbra %l6" :
                           "scs %5\n\tjra %l6",
@@ -1198,7 +1198,7 @@ output_scc_di(rtx op, rtx operand1, rtx operand2, rtx dest)
         break;
 
       case GE:
-        loperands[6] = gen_label_rtx();
+        loperands[6] = gen_label_rtx ();
         output_asm_insn (MOTOROLA ?
                           "scc %5\n\tjbra %l6" :
                           "scc %5\n\tjra %l6",
@@ -1217,7 +1217,7 @@ output_scc_di(rtx op, rtx operand1, rtx operand2, rtx dest)
         break;
 
       case LE:
-        loperands[6] = gen_label_rtx();
+        loperands[6] = gen_label_rtx ();
         output_asm_insn (MOTOROLA ?
                           "sls %5\n\tjbra %l6" :
                           "sls %5\n\tjra %l6",
@@ -1283,7 +1283,7 @@ output_btst (rtx *operands, rtx countop, rtx dataop, rtx insn, int signpos)
 /* Returns true if OP is either a symbol reference or a sum of a symbol
    reference and a constant.  */
 
-bool
+int
 symbolic_operand (rtx op, enum machine_mode mode ATTRIBUTE_UNUSED)
 {
   switch (GET_CODE (op))
index bcfa68ebd8e745a6277af5e84e5779d4b4f83719..62f839af566cf614eb726db50c20ea10cadfddb1 100644 (file)
@@ -1270,4 +1270,5 @@ extern int m68k_last_compare_had_fp_operands;
   {"const_sint32_operand", {CONST_INT}},                               \
   {"valid_dbcc_comparison_p", {EQ, NE, GTU, LTU, GEU, LEU,             \
                               GT, LT, GE, LE}},                        \
-  {"extend_operator", {SIGN_EXTEND, ZERO_EXTEND}},
+  {"extend_operator", {SIGN_EXTEND, ZERO_EXTEND}},                     \
+  {"symbolic_operand", {SYMBOL_REF, LABEL_REF, CONST}},
index fa3a39524c1964ae5346f6521038afc594ffb48c..cc69553683c138b173ad1999cc49b9191c9e713f 100644 (file)
 (define_constants
   [(UNSPECV_BLOCKAGE   0)
   ])
+
+;; Registers by name.
+(define_constants
+  [(A0_REG             8)
+   (SP_REG             15)
+  ])
 \f
 (define_insn ""
   [(set (match_operand:DF 0 "push_operand" "=m")
   [(set (cc0)
        (match_operand:SF 0 "general_operand" ""))]
   "TARGET_68881"
-  "
 {
   m68k_last_compare_had_fp_operands = 1;
-}")
+})
 
 (define_insn ""
   [(set (cc0)
   [(set (cc0)
        (match_operand:DF 0 "general_operand" ""))]
   "TARGET_68881"
-  "
 {
   m68k_last_compare_had_fp_operands = 1;
-}")
+})
 
 (define_insn ""
   [(set (cc0)
        (compare (match_operand:SI 0 "nonimmediate_operand" "")
                 (match_operand:SI 1 "general_operand" "")))]
   ""
-  "
 {
   m68k_last_compare_had_fp_operands = 0;
   if (flag_pic && !TARGET_PCREL && symbolic_operand (operands[1], SImode))
       rtx temp = reload_in_progress ? operands[0] : gen_reg_rtx (Pmode);
       operands[1] = legitimize_pic_address (operands[1], SImode, temp);
     }
-}")
+})
 
 ;; A composite of the cmp, cmpa, cmpi & cmpm m68000 op codes.
 (define_insn ""
        (compare (match_operand:DF 0 "general_operand" "")
                 (match_operand:DF 1 "general_operand" "")))]
   "TARGET_68881"
-  "
 {
   m68k_last_compare_had_fp_operands = 1;
-}")
+})
 
 (define_insn ""
   [(set (cc0)
        (compare (match_operand:SF 0 "general_operand" "")
                (match_operand:SF 1 "general_operand" "")))]
  "TARGET_68881"
- "
 {
   m68k_last_compare_had_fp_operands = 1;
-}")
+})
 
 (define_insn ""
   [(set (cc0)
   [(set (match_operand:SI 0 "nonimmediate_operand" "")
        (match_operand:SI 1 "general_operand" ""))]
   ""
-  "
 {
   if (flag_pic && !TARGET_PCREL && symbolic_operand (operands[1], SImode))
     {
        operands[0] = gen_rtx_MEM (SImode,
                               force_reg (SImode, XEXP (operands[0], 0)));
     }
-}")
+})
 
 ;; General case of fullword move.  The register constraints
 ;; force integer constants in range for a moveq to be reloaded
   "* return output_move_strictqi (operands);")
 
 (define_expand "pushqi1"
-  [(set (reg:SI 15) (plus:SI (reg:SI 15) (const_int -2)))
-   (set (mem:QI (plus:SI (reg:SI 15) (const_int 1)))
+  [(set (reg:SI SP_REG) (plus:SI (reg:SI SP_REG) (const_int -2)))
+   (set (mem:QI (plus:SI (reg:SI SP_REG) (const_int 1)))
        (match_operand:QI 0 "general_operand" ""))]
   "!TARGET_COLDFIRE"
   "")
   [(set (match_operand:XF 0 "nonimmediate_operand" "")
        (match_operand:XF 1 "general_operand" ""))]
   ""
-  "
 {
   /* We can't rewrite operands during reload.  */
   if (! reload_in_progress)
                                   force_reg (SImode, XEXP (operands[0], 0)));
        }
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:XF 0 "nonimmediate_operand" "=f,m,f,!r,!f,!r")
   "")
 
 (define_insn "*cfv4_extendqisi2"
-  [(set (match_operand:SI 0 "general_operand" "=d")
+  [(set (match_operand:SI 0 "nonimmediate_operand" "=d")
        (sign_extend:SI (match_operand:QI 1 "nonimmediate_operand" "rms")))]
   "TARGET_CFV4"
   "mvs%.b %1,%0")
            (const_int 32))))
      (clobber (match_dup 3))])]
   "TARGET_68020 && !TARGET_68060 && !TARGET_COLDFIRE"
-  "
 {
   operands[3] = gen_reg_rtx (SImode);
 
                                             operands[1], operands[2]));
       DONE;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:SI 0 "register_operand" "=d")
            (const_int 32))))
      (clobber (match_dup 3))])]
   "TARGET_68020 && !TARGET_68060 && !TARGET_COLDFIRE"
-  "
 {
   operands[3] = gen_reg_rtx (SImode);
   if (GET_CODE (operands[2]) == CONST_INT)
                                             operands[1], operands[2]));
       DONE;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:SI 0 "register_operand" "=d")
       && GET_CODE (operands[2]) == CONST_INT)
     {
       if (INTVAL (operands[2]) == 0x000000ff)
-        return \"mvz%.b %0,%0\";
+        return "mvz%.b %0,%0";
       else if (INTVAL (operands[2]) == 0x0000ffff)
-        return \"mvz%.w %0,%0\";
+        return "mvz%.w %0,%0";
     }
   return output_andsi3 (operands);
 })
   [(set (match_operand:DI 0 "nonimmediate_operand" "")
        (neg:DI (match_operand:DI 1 "general_operand" "")))]
   ""
-  "
 {
   if (TARGET_COLDFIRE)
     emit_insn (gen_negdi2_5200 (operands[0], operands[1]));
   else
     emit_insn (gen_negdi2_internal (operands[0], operands[1]));
   DONE;
-}")
+})
 
 (define_insn "negdi2_internal"
   [(set (match_operand:DI 0 "nonimmediate_operand" "=<,do,!*a")
   [(set (match_operand:SI 0 "nonimmediate_operand" "")
        (neg:SI (match_operand:SI 1 "general_operand" "")))]
   ""
-  "
 {
   if (TARGET_COLDFIRE)
     emit_insn (gen_negsi2_5200 (operands[0], operands[1]));
   else
     emit_insn (gen_negsi2_internal (operands[0], operands[1]));
   DONE;
-}")
+})
 
 (define_insn "negsi2_internal"
   [(set (match_operand:SI 0 "nonimmediate_operand" "=dm")
   [(set (match_operand:SF 0 "nonimmediate_operand" "")
        (neg:SF (match_operand:SF 1 "general_operand" "")))]
   ""
-  "
 {
   if (!TARGET_68881)
     {
       emit_move_insn (operands[0], operands[0]);
       DONE;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:SF 0 "nonimmediate_operand" "=f,d")
   [(set (match_operand:DF 0 "nonimmediate_operand" "")
        (neg:DF (match_operand:DF 1 "general_operand" "")))]
   ""
-  "
 {
   if (!TARGET_68881)
     {
       emit_no_conflict_block (insns, operands[0], operands[1], 0, 0);
       DONE;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:DF 0 "nonimmediate_operand" "=f,d")
   [(set (match_operand:SF 0 "nonimmediate_operand" "")
        (abs:SF (match_operand:SF 1 "general_operand" "")))]
   ""
-  "
 {
   if (!TARGET_68881)
     {
       emit_move_insn (operands[0], operands[0]);
       DONE;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:SF 0 "nonimmediate_operand" "=f")
   [(set (match_operand:DF 0 "nonimmediate_operand" "")
        (abs:DF (match_operand:DF 1 "general_operand" "")))]
   ""
-  "
 {
   if (!TARGET_68881)
     {
       emit_no_conflict_block (insns, operands[0], operands[1], 0, 0);
       DONE;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:DF 0 "nonimmediate_operand" "=f")
   [(set (match_operand:SI 0 "nonimmediate_operand" "")
        (not:SI (match_operand:SI 1 "general_operand" "")))]
   ""
-  "
 {
   if (TARGET_COLDFIRE)
     emit_insn (gen_one_cmplsi2_5200 (operands[0], operands[1]));
   else
     emit_insn (gen_one_cmplsi2_internal (operands[0], operands[1]));
   DONE;
-}")
+})
 
 (define_insn "one_cmplsi2_internal"
   [(set (match_operand:SI 0 "nonimmediate_operand" "=dm")
   [(set (match_operand:QI 0 "register_operand" "")
        (eq:QI (cc0) (const_int 0)))]
   ""
-  "
 {
   if (TARGET_68060 && m68k_last_compare_had_fp_operands)
     {
       m68k_last_compare_had_fp_operands = 0;
       FAIL;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:QI 0 "register_operand" "=d")
   [(set (match_operand:QI 0 "register_operand" "")
        (ne:QI (cc0) (const_int 0)))]
   ""
-  "
 {
   if (TARGET_68060 && m68k_last_compare_had_fp_operands)
     {
       m68k_last_compare_had_fp_operands = 0;
       FAIL;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:QI 0 "register_operand" "=d")
   [(set (match_operand:QI 0 "register_operand" "")
        (gt:QI (cc0) (const_int 0)))]
   ""
-  "
 {
   if (TARGET_68060 && m68k_last_compare_had_fp_operands)
     {
       m68k_last_compare_had_fp_operands = 0;
       FAIL;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:QI 0 "register_operand" "=d")
   [(set (match_operand:QI 0 "register_operand" "")
        (lt:QI (cc0) (const_int 0)))]
   ""
-  "
 {
   if (TARGET_68060 && m68k_last_compare_had_fp_operands)
     {
       m68k_last_compare_had_fp_operands = 0;
       FAIL;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:QI 0 "register_operand" "=d")
   [(set (match_operand:QI 0 "register_operand" "")
        (ge:QI (cc0) (const_int 0)))]
   ""
-  "
 {
   if (TARGET_68060 && m68k_last_compare_had_fp_operands)
     {
       m68k_last_compare_had_fp_operands = 0;
       FAIL;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:QI 0 "register_operand" "=d")
   [(set (match_operand:QI 0 "register_operand" "")
        (le:QI (cc0) (const_int 0)))]
   ""
-  "
 {
   if (TARGET_68060 && m68k_last_compare_had_fp_operands)
     {
       m68k_last_compare_had_fp_operands = 0;
       FAIL;
     }
-}")
+})
 
 (define_insn ""
   [(set (match_operand:QI 0 "register_operand" "=d")
   [(parallel [(set (pc) (match_operand 0 "" ""))
              (use (label_ref (match_operand 1 "" "")))])]
   ""
-  "
 {
 #ifdef CASE_VECTOR_PC_RELATIVE
     operands[0] = gen_rtx_PLUS (SImode, pc_rtx,
                                gen_rtx_SIGN_EXTEND (SImode, operands[0]));
 #endif
-}")
+})
 
 ;; Jump to variable address from dispatch table of absolute addresses.
 (define_insn ""
   ;; Operand 1 not really used on the m68000.
 
   ""
-  "
 {
   if (flag_pic && GET_CODE (XEXP (operands[0], 0)) == SYMBOL_REF)
     SYMBOL_REF_FLAG (XEXP (operands[0], 0)) = 1;
-}")
+})
 
 ;; This is a normal call sequence.
 (define_insn ""
      (match_operand:SI 2 "general_operand" "")))]
   ;; Operand 2 not really used on the m68000.
   ""
-  "
 {
   if (flag_pic && GET_CODE (XEXP (operands[1], 0)) == SYMBOL_REF)
     SYMBOL_REF_FLAG (XEXP (operands[1], 0)) = 1;
-}")
+})
 
 ;; This is a normal call_value
 (define_insn ""
              (match_operand 1 "" "")
              (match_operand 2 "" "")])]
   "NEEDS_UNTYPED_CALL"
-  "
 {
   int i;
 
   emit_insn (gen_blockage ());
 
   DONE;
-}")
+})
 
 ;; UNSPEC_VOLATILE is considered to use and clobber all hard registers and
 ;; all of memory.  This blocks insns from being moved across this point.
 ;; But it is mainly intended to test the support for these optimizations.
 
 (define_peephole
-  [(set (reg:SI 15) (plus:SI (reg:SI 15) (const_int 4)))
+  [(set (reg:SI SP_REG) (plus:SI (reg:SI SP_REG) (const_int 4)))
    (set (match_operand:DF 0 "register_operand" "=f")
        (match_operand:DF 1 "register_operand" "ad"))]
   "FP_REG_P (operands[0]) && ! FP_REG_P (operands[1])"
 ;; when there are consecutive library calls.
 
 (define_peephole
-  [(set (reg:SI 15) (plus:SI (reg:SI 15)
-                            (match_operand:SI 0 "const_int_operand" "n")))
+  [(set (reg:SI SP_REG) (plus:SI (reg:SI SP_REG)
+                                (match_operand:SI 0 "const_int_operand" "n")))
    (set (match_operand:SF 1 "push_operand" "=m")
        (match_operand:SF 2 "general_operand" "rmfF"))]
   "INTVAL (operands[0]) >= 4
 ;; Speed up stack adjust followed by a fullword fixedpoint push.
 
 (define_peephole
-  [(set (reg:SI 15) (plus:SI (reg:SI 15)
-                            (match_operand:SI 0 "const_int_operand" "n")))
+  [(set (reg:SI SP_REG) (plus:SI (reg:SI SP_REG)
+                                (match_operand:SI 0 "const_int_operand" "n")))
    (set (match_operand:SI 1 "push_operand" "=m")
        (match_operand:SI 2 "general_operand" "g"))]
   "INTVAL (operands[0]) >= 4
 ;; Speed up pushing a single byte but leaving four bytes of space.
 
 (define_peephole
-  [(set (mem:QI (pre_dec:SI (reg:SI 15)))
+  [(set (mem:QI (pre_dec:SI (reg:SI SP_REG)))
        (match_operand:QI 1 "general_operand" "dami"))
-   (set (reg:SI 15) (minus:SI (reg:SI 15) (const_int 2)))]
+   (set (reg:SI SP_REG) (minus:SI (reg:SI SP_REG) (const_int 2)))]
   "! reg_mentioned_p (stack_pointer_rtx, operands[1])"
 {
   rtx xoperands[4];
   [(set (match_operand:XF 0 "nonimmediate_operand" "")
        (neg:XF (match_operand:XF 1 "nonimmediate_operand" "")))]
   ""
-  "
 {
   if (!TARGET_68881)
     {
       emit_no_conflict_block (insns, operands[0], operands[1], 0, 0);
       DONE;
     }
-}")
+})
 
 (define_insn "negxf2_68881"
   [(set (match_operand:XF 0 "nonimmediate_operand" "=f")
   [(set (match_operand:XF 0 "nonimmediate_operand" "")
        (abs:XF (match_operand:XF 1 "nonimmediate_operand" "")))]
   ""
-  "
 {
   if (!TARGET_68881)
     {
       emit_no_conflict_block (insns, operands[0], operands[1], 0, 0);
       DONE;
     }
-}")
+})
 
 (define_insn "absxf2_68881"
   [(set (match_operand:XF 0 "nonimmediate_operand" "=f")