URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [config/] [rx/] [predicates.md] - Blame information for rev 724

Go to most recent revision | Details | Compare with Previous | View Log


;; Predicate definitions for Renesas RX.
;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc.
;; Contributed by Red Hat.
;;
;; This file is part of GCC.
;;
;; GCC is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 3, or (at your option)
;; any later version.
;;
;; GCC is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with GCC; see the file COPYING3.  If not see
;; .
 
 
 
;; Check that the operand is suitable for a call insn.
;; Only registers and symbol refs are allowed.
 
(define_predicate "rx_call_operand"
  (match_code "symbol_ref,reg")
)
 
;; For sibcall operations we can only use a symbolic address.
 
(define_predicate "rx_symbolic_call_operand"
  (match_code "symbol_ref")
)
 
;; Check that the operand is suitable for a shift insn
;; Only small integers or a value in a register are permitted.
 
(define_predicate "rx_shift_operand"
  (ior (match_operand 0 "register_operand")
       (and (match_code "const_int")
            (match_test "IN_RANGE (INTVAL (op), 0, 31)")))
)
 
(define_predicate "rx_constshift_operand"
  (and (match_code "const_int")
       (match_test "IN_RANGE (INTVAL (op), 0, 31)"))
)
 
(define_predicate "rx_restricted_mem_operand"
  (and (match_code "mem")
       (match_test "rx_is_restricted_memory_address (XEXP (op, 0), mode)"))
)
 
;; Check that the operand is suitable as the source operand
;; for a logic or arithmeitc instruction.  Registers, integers
;; and a restricted subset of memory addresses are allowed.
 
(define_predicate "rx_source_operand"
  (ior (match_operand 0 "register_operand")
       (match_operand 0 "immediate_operand")
       (match_operand 0 "rx_restricted_mem_operand"))
)
 
;; Check that the operand is suitable as the source operand
;; for a comparison instruction.  This is the same as
;; rx_source_operand except that SUBREGs are allowed but
;; CONST_INTs are not.
 
(define_predicate "rx_compare_operand"
  (ior (match_operand 0 "register_operand")
       (match_operand 0 "rx_restricted_mem_operand"))
)
 
;; Check that the operand is suitable as the source operand
;; for a min/max instruction.  This is the same as
;; rx_source_operand except that CONST_INTs are allowed but
;; REGs and SUBREGs are not.
 
(define_predicate "rx_minmaxex_operand"
  (ior (match_operand 0 "immediate_operand")
       (match_operand 0 "rx_restricted_mem_operand"))
)
 
;; Return true if OP is a store multiple operation.  This looks like:
;;
;;   [(set (SP) (MINUS (SP) (INT)))
;;    (set (MEM (SP)) (REG))
;;    (set (MEM (MINUS (SP) (INT))) (REG)) {optionally repeated}
;;   ]
 
(define_special_predicate "rx_store_multiple_vector"
  (match_code "parallel")
{
  int count = XVECLEN (op, 0);
  unsigned int src_regno;
  rtx element;
  int i;
 
  /* Perform a quick check so we don't blow up below.  */
  if (count <= 2)
    return false;
 
  /* Check that the first element of the vector is the stack adjust.  */
  element = XVECEXP (op, 0, 0);
  if (   ! SET_P (element)
      || ! REG_P (SET_DEST (element))
      ||   REGNO (SET_DEST (element)) != SP_REG
      ||   GET_CODE (SET_SRC (element)) != MINUS
      || ! REG_P (XEXP (SET_SRC (element), 0))
      ||   REGNO (XEXP (SET_SRC (element), 0)) != SP_REG
      || ! CONST_INT_P (XEXP (SET_SRC (element), 1)))
    return false;
 
  /* Check that the next element is the first push.  */
  element = XVECEXP (op, 0, 1);
  if (   ! SET_P (element)
      || ! REG_P (SET_SRC (element))
      || GET_MODE (SET_SRC (element)) != SImode
      || ! MEM_P (SET_DEST (element))
      || GET_MODE (SET_DEST (element)) != SImode
      || GET_CODE (XEXP (SET_DEST (element), 0)) != MINUS
      || ! REG_P (XEXP (XEXP (SET_DEST (element), 0), 0))
      ||   REGNO (XEXP (XEXP (SET_DEST (element), 0), 0)) != SP_REG
      || ! CONST_INT_P (XEXP (XEXP (SET_DEST (element), 0), 1))
      || INTVAL (XEXP (XEXP (SET_DEST (element), 0), 1))
        != GET_MODE_SIZE (SImode))
    return false;
 
  src_regno = REGNO (SET_SRC (element));
 
  /* Check that the remaining elements use SP-
     addressing and decreasing register numbers.  */
  for (i = 2; i < count; i++)
    {
      element = XVECEXP (op, 0, i);
 
      if (   ! SET_P (element)
          || ! REG_P (SET_SRC (element))
          || GET_MODE (SET_SRC (element)) != SImode
          || REGNO (SET_SRC (element)) != src_regno - (i - 1)
          || ! MEM_P (SET_DEST (element))
          || GET_MODE (SET_DEST (element)) != SImode
          || GET_CODE (XEXP (SET_DEST (element), 0)) != MINUS
          || ! REG_P (XEXP (XEXP (SET_DEST (element), 0), 0))
          ||   REGNO (XEXP (XEXP (SET_DEST (element), 0), 0)) != SP_REG
          || ! CONST_INT_P (XEXP (XEXP (SET_DEST (element), 0), 1))
          || INTVAL (XEXP (XEXP (SET_DEST (element), 0), 1))
             != i * GET_MODE_SIZE (SImode))
        return false;
    }
  return true;
})
 
;; Return true if OP is a load multiple operation.
;; This looks like:
;;  [(set (SP) (PLUS (SP) (INT)))
;;   (set (REG) (MEM (SP)))
;;   (set (REG) (MEM (PLUS (SP) (INT)))) {optionally repeated}
;;  ]
 
(define_special_predicate "rx_load_multiple_vector"
  (match_code "parallel")
{
  int count = XVECLEN (op, 0);
  unsigned int dest_regno;
  rtx element;
  int i;
 
  /* Perform a quick check so we don't blow up below.  */
  if (count <= 2)
    return false;
 
  /* Check that the first element of the vector is the stack adjust.  */
  element = XVECEXP (op, 0, 0);
  if (   ! SET_P (element)
      || ! REG_P (SET_DEST (element))
      ||   REGNO (SET_DEST (element)) != SP_REG
      ||   GET_CODE (SET_SRC (element)) != PLUS
      || ! REG_P (XEXP (SET_SRC (element), 0))
      ||   REGNO (XEXP (SET_SRC (element), 0)) != SP_REG
      || ! CONST_INT_P (XEXP (SET_SRC (element), 1)))
    return false;
 
  /* Check that the next element is the first push.  */
  element = XVECEXP (op, 0, 1);
  if (   ! SET_P (element)
      || ! REG_P (SET_DEST (element))
      || ! MEM_P (SET_SRC (element))
      || ! REG_P (XEXP (SET_SRC (element), 0))
      ||   REGNO (XEXP (SET_SRC (element), 0)) != SP_REG)
    return false;
 
  dest_regno = REGNO (SET_DEST (element));
 
  /* Check that the remaining elements use SP+
     addressing and incremental register numbers.  */
  for (i = 2; i < count; i++)
    {
      element = XVECEXP (op, 0, i);
 
      if (   ! SET_P (element)
          || ! REG_P (SET_DEST (element))
          || GET_MODE (SET_DEST (element)) != SImode
          || REGNO (SET_DEST (element)) != dest_regno + (i - 1)
          || ! MEM_P (SET_SRC (element))
          || GET_MODE (SET_SRC (element)) != SImode
          || GET_CODE (XEXP (SET_SRC (element), 0)) != PLUS
          || ! REG_P (XEXP (XEXP (SET_SRC (element), 0), 0))
          ||   REGNO (XEXP (XEXP (SET_SRC (element), 0), 0)) != SP_REG
          || ! CONST_INT_P (XEXP (XEXP (SET_SRC (element), 0), 1))
          || INTVAL (XEXP (XEXP (SET_SRC (element), 0), 1))
             != (i - 1) * GET_MODE_SIZE (SImode))
        return false;
    }
  return true;
})
 
;; Return true if OP is a pop-and-return load multiple operation.
;; This looks like:
;;  [(set (SP) (PLUS (SP) (INT)))
;;   (set (REG) (MEM (SP)))
;;   (set (REG) (MEM (PLUS (SP) (INT)))) {optional and possibly repeated}
;;   (return)
;;  ]
 
(define_special_predicate "rx_rtsd_vector"
  (match_code "parallel")
{
  int count = XVECLEN (op, 0);
  unsigned int dest_regno;
  rtx element;
  int i;
 
  /* Perform a quick check so we don't blow up below.  */
  if (count <= 2)
    return false;
 
  /* Check that the first element of the vector is the stack adjust.  */
  element = XVECEXP (op, 0, 0);
  if (   ! SET_P (element)
      || ! REG_P (SET_DEST (element))
      ||   REGNO (SET_DEST (element)) != SP_REG
      ||   GET_CODE (SET_SRC (element)) != PLUS
      || ! REG_P (XEXP (SET_SRC (element), 0))
      ||   REGNO (XEXP (SET_SRC (element), 0)) != SP_REG
      || ! CONST_INT_P (XEXP (SET_SRC (element), 1)))
    return false;
 
  /* Check that the next element is the first push.  */
  element = XVECEXP (op, 0, 1);
  if (   ! SET_P (element)
      || ! REG_P (SET_DEST (element))
      || ! MEM_P (SET_SRC (element))
      || ! REG_P (XEXP (SET_SRC (element), 0))
      ||   REGNO (XEXP (SET_SRC (element), 0)) != SP_REG)
    return false;
 
  dest_regno = REGNO (SET_DEST (element));
 
  /* Check that the remaining elements, if any, and except
     for the last one, use SP+ addressing and incremental
     register numbers.  */
  for (i = 2; i < count - 1; i++)
    {
      element = XVECEXP (op, 0, i);
 
      if (   ! SET_P (element)
          || ! REG_P (SET_DEST (element))
          || GET_MODE (SET_DEST (element)) != SImode
          || REGNO (SET_DEST (element)) != dest_regno + (i - 1)
          || ! MEM_P (SET_SRC (element))
          || GET_MODE (SET_SRC (element)) != SImode
          || GET_CODE (XEXP (SET_SRC (element), 0)) != PLUS
          || ! REG_P (XEXP (XEXP (SET_SRC (element), 0), 0))
          ||   REGNO (XEXP (XEXP (SET_SRC (element), 0), 0)) != SP_REG
          || ! CONST_INT_P (XEXP (XEXP (SET_SRC (element), 0), 1))
          || INTVAL (XEXP (XEXP (SET_SRC (element), 0), 1))
             != (i - 1) * GET_MODE_SIZE (SImode))
        return false;
    }
 
  /* The last element must be a RETURN.  */
  element = XVECEXP (op, 0, count - 1);
  return GET_CODE (element) == RETURN;
})
 
(define_predicate "label_ref_operand"
  (match_code "label_ref")
)
 
(define_predicate "rx_z_comparison_operator"
  (match_code "eq,ne")
)
 
(define_predicate "rx_zs_comparison_operator"
  (match_code "eq,ne,lt,ge")
)
 
;; GT and LE omitted due to operand swap required.
(define_predicate "rx_fp_comparison_operator"
  (match_code "eq,ne,lt,ge,ordered,unordered")
)
 
(define_predicate "rshift_operator"
  (match_code "ashiftrt,lshiftrt")
)

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [config/] [rx/] [predicates.md] - Blame information for rev 724

Line No.	Rev	Author	Line
1	709	jeremybenn	`;; Predicate definitions for Renesas RX.`
2			`;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc.`
3			`;; Contributed by Red Hat.`
4			`;;`
5			`;; This file is part of GCC.`
6			`;;`
7			`;; GCC is free software; you can redistribute it and/or modify`
8			`;; it under the terms of the GNU General Public License as published by`
9			`;; the Free Software Foundation; either version 3, or (at your option)`
10			`;; any later version.`
11			`;;`
12			`;; GCC is distributed in the hope that it will be useful,`
13			`;; but WITHOUT ANY WARRANTY; without even the implied warranty of`
14			`;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the`
15			`;; GNU General Public License for more details.`
16			`;;`
17			`;; You should have received a copy of the GNU General Public License`
18			`;; along with GCC; see the file COPYING3. If not see`
19			`;; .`
20
21
22
23			`;; Check that the operand is suitable for a call insn.`
24			`;; Only registers and symbol refs are allowed.`
25
26			`(define_predicate "rx_call_operand"`
27			`(match_code "symbol_ref,reg")`
28			`)`
29
30			`;; For sibcall operations we can only use a symbolic address.`
31
32			`(define_predicate "rx_symbolic_call_operand"`
33			`(match_code "symbol_ref")`
34			`)`
35
36			`;; Check that the operand is suitable for a shift insn`
37			`;; Only small integers or a value in a register are permitted.`
38
39			`(define_predicate "rx_shift_operand"`
40			`(ior (match_operand 0 "register_operand")`
41			`(and (match_code "const_int")`
42			`(match_test "IN_RANGE (INTVAL (op), 0, 31)")))`
43			`)`
44
45			`(define_predicate "rx_constshift_operand"`
46			`(and (match_code "const_int")`
47			`(match_test "IN_RANGE (INTVAL (op), 0, 31)"))`
48			`)`
49
50			`(define_predicate "rx_restricted_mem_operand"`
51			`(and (match_code "mem")`
52			`(match_test "rx_is_restricted_memory_address (XEXP (op, 0), mode)"))`
53			`)`
54
55			`;; Check that the operand is suitable as the source operand`
56			`;; for a logic or arithmeitc instruction. Registers, integers`
57			`;; and a restricted subset of memory addresses are allowed.`
58
59			`(define_predicate "rx_source_operand"`
60			`(ior (match_operand 0 "register_operand")`
61			`(match_operand 0 "immediate_operand")`
62			`(match_operand 0 "rx_restricted_mem_operand"))`
63			`)`
64
65			`;; Check that the operand is suitable as the source operand`
66			`;; for a comparison instruction. This is the same as`
67			`;; rx_source_operand except that SUBREGs are allowed but`
68			`;; CONST_INTs are not.`
69
70			`(define_predicate "rx_compare_operand"`
71			`(ior (match_operand 0 "register_operand")`
72			`(match_operand 0 "rx_restricted_mem_operand"))`
73			`)`
74
75			`;; Check that the operand is suitable as the source operand`
76			`;; for a min/max instruction. This is the same as`
77			`;; rx_source_operand except that CONST_INTs are allowed but`
78			`;; REGs and SUBREGs are not.`
79
80			`(define_predicate "rx_minmaxex_operand"`
81			`(ior (match_operand 0 "immediate_operand")`
82			`(match_operand 0 "rx_restricted_mem_operand"))`
83			`)`
84
85			`;; Return true if OP is a store multiple operation. This looks like:`
86			`;;`
87			`;; [(set (SP) (MINUS (SP) (INT)))`
88			`;; (set (MEM (SP)) (REG))`
89			`;; (set (MEM (MINUS (SP) (INT))) (REG)) {optionally repeated}`
90			`;; ]`
91
92			`(define_special_predicate "rx_store_multiple_vector"`
93			`(match_code "parallel")`
94			`{`
95			`int count = XVECLEN (op, 0);`
96			`unsigned int src_regno;`
97			`rtx element;`
98			`int i;`
99
100			`/* Perform a quick check so we don't blow up below. */`
101			`if (count <= 2)`
102			`return false;`
103
104			`/* Check that the first element of the vector is the stack adjust. */`
105			`element = XVECEXP (op, 0, 0);`
106			`if ( ! SET_P (element)`
107			`\|\| ! REG_P (SET_DEST (element))`
108			`\|\| REGNO (SET_DEST (element)) != SP_REG`
109			`\|\| GET_CODE (SET_SRC (element)) != MINUS`
110			`\|\| ! REG_P (XEXP (SET_SRC (element), 0))`
111			`\|\| REGNO (XEXP (SET_SRC (element), 0)) != SP_REG`
112			`\|\| ! CONST_INT_P (XEXP (SET_SRC (element), 1)))`
113			`return false;`
114
115			`/* Check that the next element is the first push. */`
116			`element = XVECEXP (op, 0, 1);`
117			`if ( ! SET_P (element)`
118			`\|\| ! REG_P (SET_SRC (element))`
119			`\|\| GET_MODE (SET_SRC (element)) != SImode`
120			`\|\| ! MEM_P (SET_DEST (element))`
121			`\|\| GET_MODE (SET_DEST (element)) != SImode`
122			`\|\| GET_CODE (XEXP (SET_DEST (element), 0)) != MINUS`
123			`\|\| ! REG_P (XEXP (XEXP (SET_DEST (element), 0), 0))`
124			`\|\| REGNO (XEXP (XEXP (SET_DEST (element), 0), 0)) != SP_REG`
125			`\|\| ! CONST_INT_P (XEXP (XEXP (SET_DEST (element), 0), 1))`
126			`\|\| INTVAL (XEXP (XEXP (SET_DEST (element), 0), 1))`
127			`!= GET_MODE_SIZE (SImode))`
128			`return false;`
129
130			`src_regno = REGNO (SET_SRC (element));`
131
132			`/* Check that the remaining elements use SP-`
133			`addressing and decreasing register numbers. */`
134			`for (i = 2; i < count; i++)`
135			`{`
136			`element = XVECEXP (op, 0, i);`
137
138			`if ( ! SET_P (element)`
139			`\|\| ! REG_P (SET_SRC (element))`
140			`\|\| GET_MODE (SET_SRC (element)) != SImode`
141			`\|\| REGNO (SET_SRC (element)) != src_regno - (i - 1)`
142			`\|\| ! MEM_P (SET_DEST (element))`
143			`\|\| GET_MODE (SET_DEST (element)) != SImode`
144			`\|\| GET_CODE (XEXP (SET_DEST (element), 0)) != MINUS`
145			`\|\| ! REG_P (XEXP (XEXP (SET_DEST (element), 0), 0))`
146			`\|\| REGNO (XEXP (XEXP (SET_DEST (element), 0), 0)) != SP_REG`
147			`\|\| ! CONST_INT_P (XEXP (XEXP (SET_DEST (element), 0), 1))`
148			`\|\| INTVAL (XEXP (XEXP (SET_DEST (element), 0), 1))`
149			`!= i * GET_MODE_SIZE (SImode))`
150			`return false;`
151			`}`
152			`return true;`
153			`})`
154
155			`;; Return true if OP is a load multiple operation.`
156			`;; This looks like:`
157			`;; [(set (SP) (PLUS (SP) (INT)))`
158			`;; (set (REG) (MEM (SP)))`
159			`;; (set (REG) (MEM (PLUS (SP) (INT)))) {optionally repeated}`
160			`;; ]`
161
162			`(define_special_predicate "rx_load_multiple_vector"`
163			`(match_code "parallel")`
164			`{`
165			`int count = XVECLEN (op, 0);`
166			`unsigned int dest_regno;`
167			`rtx element;`
168			`int i;`
169
170			`/* Perform a quick check so we don't blow up below. */`
171			`if (count <= 2)`
172			`return false;`
173
174			`/* Check that the first element of the vector is the stack adjust. */`
175			`element = XVECEXP (op, 0, 0);`
176			`if ( ! SET_P (element)`
177			`\|\| ! REG_P (SET_DEST (element))`
178			`\|\| REGNO (SET_DEST (element)) != SP_REG`
179			`\|\| GET_CODE (SET_SRC (element)) != PLUS`
180			`\|\| ! REG_P (XEXP (SET_SRC (element), 0))`
181			`\|\| REGNO (XEXP (SET_SRC (element), 0)) != SP_REG`
182			`\|\| ! CONST_INT_P (XEXP (SET_SRC (element), 1)))`
183			`return false;`
184
185			`/* Check that the next element is the first push. */`
186			`element = XVECEXP (op, 0, 1);`
187			`if ( ! SET_P (element)`
188			`\|\| ! REG_P (SET_DEST (element))`
189			`\|\| ! MEM_P (SET_SRC (element))`
190			`\|\| ! REG_P (XEXP (SET_SRC (element), 0))`
191			`\|\| REGNO (XEXP (SET_SRC (element), 0)) != SP_REG)`
192			`return false;`
193
194			`dest_regno = REGNO (SET_DEST (element));`
195
196			`/* Check that the remaining elements use SP+`
197			`addressing and incremental register numbers. */`
198			`for (i = 2; i < count; i++)`
199			`{`
200			`element = XVECEXP (op, 0, i);`
201
202			`if ( ! SET_P (element)`
203			`\|\| ! REG_P (SET_DEST (element))`
204			`\|\| GET_MODE (SET_DEST (element)) != SImode`
205			`\|\| REGNO (SET_DEST (element)) != dest_regno + (i - 1)`
206			`\|\| ! MEM_P (SET_SRC (element))`
207			`\|\| GET_MODE (SET_SRC (element)) != SImode`
208			`\|\| GET_CODE (XEXP (SET_SRC (element), 0)) != PLUS`
209			`\|\| ! REG_P (XEXP (XEXP (SET_SRC (element), 0), 0))`
210			`\|\| REGNO (XEXP (XEXP (SET_SRC (element), 0), 0)) != SP_REG`
211			`\|\| ! CONST_INT_P (XEXP (XEXP (SET_SRC (element), 0), 1))`
212			`\|\| INTVAL (XEXP (XEXP (SET_SRC (element), 0), 1))`
213			`!= (i - 1) * GET_MODE_SIZE (SImode))`
214			`return false;`
215			`}`
216			`return true;`
217			`})`
218
219			`;; Return true if OP is a pop-and-return load multiple operation.`
220			`;; This looks like:`
221			`;; [(set (SP) (PLUS (SP) (INT)))`
222			`;; (set (REG) (MEM (SP)))`
223			`;; (set (REG) (MEM (PLUS (SP) (INT)))) {optional and possibly repeated}`
224			`;; (return)`
225			`;; ]`
226
227			`(define_special_predicate "rx_rtsd_vector"`
228			`(match_code "parallel")`
229			`{`
230			`int count = XVECLEN (op, 0);`
231			`unsigned int dest_regno;`
232			`rtx element;`
233			`int i;`
234
235			`/* Perform a quick check so we don't blow up below. */`
236			`if (count <= 2)`
237			`return false;`
238
239			`/* Check that the first element of the vector is the stack adjust. */`
240			`element = XVECEXP (op, 0, 0);`
241			`if ( ! SET_P (element)`
242			`\|\| ! REG_P (SET_DEST (element))`
243			`\|\| REGNO (SET_DEST (element)) != SP_REG`
244			`\|\| GET_CODE (SET_SRC (element)) != PLUS`
245			`\|\| ! REG_P (XEXP (SET_SRC (element), 0))`
246			`\|\| REGNO (XEXP (SET_SRC (element), 0)) != SP_REG`
247			`\|\| ! CONST_INT_P (XEXP (SET_SRC (element), 1)))`
248			`return false;`
249
250			`/* Check that the next element is the first push. */`
251			`element = XVECEXP (op, 0, 1);`
252			`if ( ! SET_P (element)`
253			`\|\| ! REG_P (SET_DEST (element))`
254			`\|\| ! MEM_P (SET_SRC (element))`
255			`\|\| ! REG_P (XEXP (SET_SRC (element), 0))`
256			`\|\| REGNO (XEXP (SET_SRC (element), 0)) != SP_REG)`
257			`return false;`
258
259			`dest_regno = REGNO (SET_DEST (element));`
260
261			`/* Check that the remaining elements, if any, and except`
262			`for the last one, use SP+ addressing and incremental`
263			`register numbers. */`
264			`for (i = 2; i < count - 1; i++)`
265			`{`
266			`element = XVECEXP (op, 0, i);`
267
268			`if ( ! SET_P (element)`
269			`\|\| ! REG_P (SET_DEST (element))`
270			`\|\| GET_MODE (SET_DEST (element)) != SImode`
271			`\|\| REGNO (SET_DEST (element)) != dest_regno + (i - 1)`
272			`\|\| ! MEM_P (SET_SRC (element))`
273			`\|\| GET_MODE (SET_SRC (element)) != SImode`
274			`\|\| GET_CODE (XEXP (SET_SRC (element), 0)) != PLUS`
275			`\|\| ! REG_P (XEXP (XEXP (SET_SRC (element), 0), 0))`
276			`\|\| REGNO (XEXP (XEXP (SET_SRC (element), 0), 0)) != SP_REG`
277			`\|\| ! CONST_INT_P (XEXP (XEXP (SET_SRC (element), 0), 1))`
278			`\|\| INTVAL (XEXP (XEXP (SET_SRC (element), 0), 1))`
279			`!= (i - 1) * GET_MODE_SIZE (SImode))`
280			`return false;`
281			`}`
282
283			`/* The last element must be a RETURN. */`
284			`element = XVECEXP (op, 0, count - 1);`
285			`return GET_CODE (element) == RETURN;`
286			`})`
287
288			`(define_predicate "label_ref_operand"`
289			`(match_code "label_ref")`
290			`)`
291
292			`(define_predicate "rx_z_comparison_operator"`
293			`(match_code "eq,ne")`
294			`)`
295
296			`(define_predicate "rx_zs_comparison_operator"`
297			`(match_code "eq,ne,lt,ge")`
298			`)`
299
300			`;; GT and LE omitted due to operand swap required.`
301			`(define_predicate "rx_fp_comparison_operator"`
302			`(match_code "eq,ne,lt,ge,ordered,unordered")`
303			`)`
304
305			`(define_predicate "rshift_operator"`
306			`(match_code "ashiftrt,lshiftrt")`
307			`)`