annotate gcc/config/mips/constraints.md @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents f6334be47118
children 84e7813d76e9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 ;; Constraint definitions for MIPS.
111
kono
parents: 67
diff changeset
2 ;; Copyright (C) 2006-2017 Free Software Foundation, Inc.
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 ;;
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 ;; This file is part of GCC.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 ;;
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 ;; GCC is free software; you can redistribute it and/or modify
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
7 ;; it under the terms of the GNU General Public License as published by
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 ;; the Free Software Foundation; either version 3, or (at your option)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 ;; any later version.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 ;;
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 ;; GCC is distributed in the hope that it will be useful,
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
13 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 ;; GNU General Public License for more details.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 ;;
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 ;; You should have received a copy of the GNU General Public License
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 ;; along with GCC; see the file COPYING3. If not see
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 ;; <http://www.gnu.org/licenses/>.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
19
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 ;; Register constraints
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
21
111
kono
parents: 67
diff changeset
22 (define_register_constraint "d" "TARGET_MIPS16 ? M16_REGS : GR_REGS"
kono
parents: 67
diff changeset
23 "A general-purpose register. This is equivalent to @code{r} unless
kono
parents: 67
diff changeset
24 generating MIPS16 code, in which case the MIPS16 register set is used.")
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
25
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
26 (define_register_constraint "t" "T_REG"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
27 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
28
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
29 (define_register_constraint "f" "TARGET_HARD_FLOAT ? FP_REGS : NO_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
30 "A floating-point register (if available).")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
31
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
32 (define_register_constraint "h" "NO_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
33 "Formerly the @code{hi} register. This constraint is no longer supported.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
34
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
35 (define_register_constraint "l" "TARGET_BIG_ENDIAN ? MD1_REG : MD0_REG"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
36 "The @code{lo} register. Use this register to store values that are
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
37 no bigger than a word.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
38
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
39 (define_register_constraint "x" "MD_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
40 "The concatenated @code{hi} and @code{lo} registers. Use this register
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
41 to store doubleword values.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
42
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
43 (define_register_constraint "b" "ALL_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
44 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
45
111
kono
parents: 67
diff changeset
46 (define_register_constraint "u" "M16_REGS"
kono
parents: 67
diff changeset
47 "@internal")
kono
parents: 67
diff changeset
48
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
49 ;; MIPS16 code always calls through a MIPS16 register; see mips_emit_call_insn
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
50 ;; for details.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
51 (define_register_constraint "c" "TARGET_MIPS16 ? M16_REGS
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
52 : TARGET_USE_PIC_FN_ADDR_REG ? PIC_FN_ADDR_REG
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
53 : GR_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
54 "A register suitable for use in an indirect jump. This will always be
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
55 @code{$25} for @option{-mabicalls}.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
56
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
57 (define_register_constraint "e" "LEA_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
58 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
59
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
60 (define_register_constraint "j" "PIC_FN_ADDR_REG"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
61 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
62
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
63 ;; Don't use this constraint in gcc code! It runs the risk of
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
64 ;; introducing a spill failure; see tls_get_tp_<mode>.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
65 (define_register_constraint "v" "V1_REG"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
66 "Register @code{$3}. Do not use this constraint in new code;
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
67 it is retained only for compatibility with glibc.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
68
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
69 (define_register_constraint "y" "GR_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
70 "Equivalent to @code{r}; retained for backwards compatibility.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
71
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
72 (define_register_constraint "z" "ST_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
73 "A floating-point condition code register.")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
74
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
75 (define_register_constraint "A" "DSP_ACC_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
76 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
77
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
78 (define_register_constraint "a" "ACC_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
79 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
80
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
81 (define_register_constraint "B" "COP0_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
82 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
83
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
84 (define_register_constraint "C" "COP2_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
85 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
86
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
87 (define_register_constraint "D" "COP3_REGS"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
88 "@internal")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
89
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
90 ;; Registers that can be used as the target of multiply-accumulate
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
91 ;; instructions. The core MIPS32 ISA provides a hi/lo madd,
67
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents: 55
diff changeset
92 ;; but the DSP version allows any accumulator target.
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents: 55
diff changeset
93 (define_register_constraint "ka" "ISA_HAS_DSP_MULT ? ACC_REGS : MD_REGS")
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
94
111
kono
parents: 67
diff changeset
95 (define_register_constraint "kb" "M16_STORE_REGS"
kono
parents: 67
diff changeset
96 "@internal")
kono
parents: 67
diff changeset
97
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
98 (define_constraint "kf"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
99 "@internal"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
100 (match_operand 0 "force_to_mem_operand"))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
101
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
102 ;; This is a normal rather than a register constraint because we can
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
103 ;; never use the stack pointer as a reload register.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
104 (define_constraint "ks"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
105 "@internal"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
106 (and (match_code "reg")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
107 (match_test "REGNO (op) == STACK_POINTER_REGNUM")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
108
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
109 ;; Integer constraints
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
110
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
111 (define_constraint "I"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
112 "A signed 16-bit constant (for arithmetic instructions)."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
113 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
114 (match_test "SMALL_OPERAND (ival)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
115
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
116 (define_constraint "J"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
117 "Integer zero."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
118 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
119 (match_test "ival == 0")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
120
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
121 (define_constraint "K"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
122 "An unsigned 16-bit constant (for logic instructions)."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
123 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
124 (match_test "SMALL_OPERAND_UNSIGNED (ival)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
125
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
126 (define_constraint "L"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
127 "A signed 32-bit constant in which the lower 16 bits are zero.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
128 Such constants can be loaded using @code{lui}."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
129 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
130 (match_test "LUI_OPERAND (ival)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
131
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
132 (define_constraint "M"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
133 "A constant that cannot be loaded using @code{lui}, @code{addiu}
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
134 or @code{ori}."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
135 (and (match_code "const_int")
111
kono
parents: 67
diff changeset
136 (not (match_test "SMALL_OPERAND (ival)"))
kono
parents: 67
diff changeset
137 (not (match_test "SMALL_OPERAND_UNSIGNED (ival)"))
kono
parents: 67
diff changeset
138 (not (match_test "LUI_OPERAND (ival)"))))
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
139
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
140 (define_constraint "N"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
141 "A constant in the range -65535 to -1 (inclusive)."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
142 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
143 (match_test "ival >= -0xffff && ival < 0")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
144
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
145 (define_constraint "O"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
146 "A signed 15-bit constant."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
147 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
148 (match_test "ival >= -0x4000 && ival < 0x4000")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
149
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
150 (define_constraint "P"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
151 "A constant in the range 1 to 65535 (inclusive)."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
152 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
153 (match_test "ival > 0 && ival < 0x10000")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
154
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
155 ;; Floating-point constraints
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
156
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
157 (define_constraint "G"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
158 "Floating-point zero."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
159 (and (match_code "const_double")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
160 (match_test "op == CONST0_RTX (mode)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
161
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
162 ;; General constraints
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
163
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
164 (define_constraint "Q"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
165 "@internal"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
166 (match_operand 0 "const_arith_operand"))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
167
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
168 (define_memory_constraint "R"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
169 "An address that can be used in a non-macro load or store."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
170 (and (match_code "mem")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
171 (match_test "mips_address_insns (XEXP (op, 0), mode, false) == 1")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
172
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
173 (define_constraint "S"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
174 "@internal
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
175 A constant call address."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
176 (and (match_operand 0 "call_insn_operand")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
177 (match_test "CONSTANT_P (op)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
178
111
kono
parents: 67
diff changeset
179 (define_constraint "Udb7"
kono
parents: 67
diff changeset
180 "@internal
kono
parents: 67
diff changeset
181 A decremented unsigned constant of 7 bits."
kono
parents: 67
diff changeset
182 (match_operand 0 "db7_operand"))
kono
parents: 67
diff changeset
183
kono
parents: 67
diff changeset
184 (define_constraint "Udb8"
kono
parents: 67
diff changeset
185 "@internal
kono
parents: 67
diff changeset
186 A decremented unsigned constant of 8 bits."
kono
parents: 67
diff changeset
187 (match_operand 0 "db8_operand"))
kono
parents: 67
diff changeset
188
kono
parents: 67
diff changeset
189 (define_constraint "Uead"
kono
parents: 67
diff changeset
190 "@internal
kono
parents: 67
diff changeset
191 A microMIPS encoded ADDIUR2 immediate operand."
kono
parents: 67
diff changeset
192 (match_operand 0 "addiur2_operand"))
kono
parents: 67
diff changeset
193
kono
parents: 67
diff changeset
194 (define_constraint "Uean"
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
195 "@internal
111
kono
parents: 67
diff changeset
196 A microMIPS encoded ANDI operand."
kono
parents: 67
diff changeset
197 (match_operand 0 "andi16_operand"))
kono
parents: 67
diff changeset
198
kono
parents: 67
diff changeset
199 (define_constraint "Uesp"
kono
parents: 67
diff changeset
200 "@internal
kono
parents: 67
diff changeset
201 A microMIPS encoded ADDIUSP operand."
kono
parents: 67
diff changeset
202 (match_operand 0 "addiusp_operand"))
kono
parents: 67
diff changeset
203
kono
parents: 67
diff changeset
204 (define_constraint "Uib3"
kono
parents: 67
diff changeset
205 "@internal
kono
parents: 67
diff changeset
206 An unsigned, incremented constant of 3 bits."
kono
parents: 67
diff changeset
207 (match_operand 0 "ib3_operand"))
kono
parents: 67
diff changeset
208
kono
parents: 67
diff changeset
209 (define_constraint "Usb4"
kono
parents: 67
diff changeset
210 "@internal
kono
parents: 67
diff changeset
211 A signed constant of 4 bits."
kono
parents: 67
diff changeset
212 (match_operand 0 "sb4_operand"))
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
213
111
kono
parents: 67
diff changeset
214 (define_constraint "Usb5"
kono
parents: 67
diff changeset
215 "@internal
kono
parents: 67
diff changeset
216 A signed constant of 5 bits."
kono
parents: 67
diff changeset
217 (match_operand 0 "sb5_operand"))
kono
parents: 67
diff changeset
218
kono
parents: 67
diff changeset
219 (define_constraint "Usb8"
kono
parents: 67
diff changeset
220 "@internal
kono
parents: 67
diff changeset
221 A signed constant of 8 bits."
kono
parents: 67
diff changeset
222 (match_operand 0 "sb8_operand"))
kono
parents: 67
diff changeset
223
kono
parents: 67
diff changeset
224 (define_constraint "Usd8"
kono
parents: 67
diff changeset
225 "@internal
kono
parents: 67
diff changeset
226 A signed constant of 8 bits, shifted left three places."
kono
parents: 67
diff changeset
227 (match_operand 0 "sd8_operand"))
kono
parents: 67
diff changeset
228
kono
parents: 67
diff changeset
229 (define_constraint "Uub8"
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
230 "@internal
111
kono
parents: 67
diff changeset
231 An unsigned constant of 8 bits."
kono
parents: 67
diff changeset
232 (match_operand 0 "ub8_operand"))
kono
parents: 67
diff changeset
233
kono
parents: 67
diff changeset
234 (define_constraint "Uuw5"
kono
parents: 67
diff changeset
235 "@internal
kono
parents: 67
diff changeset
236 An unsigned constant of 5 bits, shifted left two places."
kono
parents: 67
diff changeset
237 (match_operand 0 "uw5_operand"))
kono
parents: 67
diff changeset
238
kono
parents: 67
diff changeset
239 (define_constraint "Uuw6"
kono
parents: 67
diff changeset
240 "@internal
kono
parents: 67
diff changeset
241 An unsigned constant of 6 bits, shifted left two places."
kono
parents: 67
diff changeset
242 (match_operand 0 "uw6_operand"))
kono
parents: 67
diff changeset
243
kono
parents: 67
diff changeset
244 (define_constraint "Uuw8"
kono
parents: 67
diff changeset
245 "@internal
kono
parents: 67
diff changeset
246 An unsigned constant of 8 bits, shifted left two places."
kono
parents: 67
diff changeset
247 (match_operand 0 "uw8_operand"))
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
248
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
249 (define_memory_constraint "W"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
250 "@internal
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
251 A memory address based on a member of @code{BASE_REG_CLASS}. This is
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
252 true for all non-mips16 references (although it can sometimes be implicit
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
253 if @samp{!TARGET_EXPLICIT_RELOCS}). For MIPS16, it excludes stack and
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
254 constant-pool references."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
255 (and (match_code "mem")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
256 (match_operand 0 "memory_operand")
111
kono
parents: 67
diff changeset
257 (ior (not (match_test "TARGET_MIPS16"))
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
258 (and (not (match_operand 0 "stack_operand"))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
259 (not (match_test "CONSTANT_P (XEXP (op, 0))"))))))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
260
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
261 (define_constraint "YG"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
262 "@internal
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
263 A vector zero."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
264 (and (match_code "const_vector")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
265 (match_test "op == CONST0_RTX (mode)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
266
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
267 (define_constraint "YA"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
268 "@internal
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
269 An unsigned 6-bit constant."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
270 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
271 (match_test "UIMM6_OPERAND (ival)")))
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
272
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
273 (define_constraint "YB"
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
274 "@internal
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
275 A signed 10-bit constant."
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
276 (and (match_code "const_int")
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
277 (match_test "IMM10_OPERAND (ival)")))
55
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
278
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
279 (define_constraint "Yb"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
280 "@internal"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
281 (match_operand 0 "qi_mask_operand"))
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
282
111
kono
parents: 67
diff changeset
283 (define_constraint "Yd"
kono
parents: 67
diff changeset
284 "@internal
kono
parents: 67
diff changeset
285 A constant @code{move_operand} that can be safely loaded into @code{$25}
kono
parents: 67
diff changeset
286 using @code{la}."
kono
parents: 67
diff changeset
287 (and (match_operand 0 "move_operand")
kono
parents: 67
diff changeset
288 (match_test "CONSTANT_P (op)")
kono
parents: 67
diff changeset
289 (not (match_test "mips_dangerous_for_la25_p (op)"))))
kono
parents: 67
diff changeset
290
kono
parents: 67
diff changeset
291 (define_constraint "Yf"
kono
parents: 67
diff changeset
292 "@internal
kono
parents: 67
diff changeset
293 A constant @code{move_operand} that cannot be safely loaded into @code{$25}
kono
parents: 67
diff changeset
294 using @code{la}."
kono
parents: 67
diff changeset
295 (and (match_operand 0 "move_operand")
kono
parents: 67
diff changeset
296 (match_test "CONSTANT_P (op)")
kono
parents: 67
diff changeset
297 (match_test "mips_dangerous_for_la25_p (op)")))
kono
parents: 67
diff changeset
298
55
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
299 (define_constraint "Yh"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
300 "@internal"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
301 (match_operand 0 "hi_mask_operand"))
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
302
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
303 (define_constraint "Yw"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
304 "@internal"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
305 (match_operand 0 "si_mask_operand"))
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
306
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
307 (define_constraint "Yx"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
308 "@internal"
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
309 (match_operand 0 "low_bitmask_operand"))
111
kono
parents: 67
diff changeset
310
kono
parents: 67
diff changeset
311 (define_constraint "YI"
kono
parents: 67
diff changeset
312 "@internal
kono
parents: 67
diff changeset
313 A replicated vector const in which the replicated value is in the range
kono
parents: 67
diff changeset
314 [-512,511]."
kono
parents: 67
diff changeset
315 (and (match_code "const_vector")
kono
parents: 67
diff changeset
316 (match_test "mips_const_vector_same_int_p (op, mode, -512, 511)")))
kono
parents: 67
diff changeset
317
kono
parents: 67
diff changeset
318 (define_constraint "YC"
kono
parents: 67
diff changeset
319 "@internal
kono
parents: 67
diff changeset
320 A replicated vector const in which the replicated value has a single
kono
parents: 67
diff changeset
321 bit set."
kono
parents: 67
diff changeset
322 (and (match_code "const_vector")
kono
parents: 67
diff changeset
323 (match_test "mips_const_vector_bitimm_set_p (op, mode)")))
kono
parents: 67
diff changeset
324
kono
parents: 67
diff changeset
325 (define_constraint "YZ"
kono
parents: 67
diff changeset
326 "@internal
kono
parents: 67
diff changeset
327 A replicated vector const in which the replicated value has a single
kono
parents: 67
diff changeset
328 bit clear."
kono
parents: 67
diff changeset
329 (and (match_code "const_vector")
kono
parents: 67
diff changeset
330 (match_test "mips_const_vector_bitimm_clr_p (op, mode)")))
kono
parents: 67
diff changeset
331
kono
parents: 67
diff changeset
332 (define_constraint "Unv5"
kono
parents: 67
diff changeset
333 "@internal
kono
parents: 67
diff changeset
334 A replicated vector const in which the replicated value is in the range
kono
parents: 67
diff changeset
335 [-31,0]."
kono
parents: 67
diff changeset
336 (and (match_code "const_vector")
kono
parents: 67
diff changeset
337 (match_test "mips_const_vector_same_int_p (op, mode, -31, 0)")))
kono
parents: 67
diff changeset
338
kono
parents: 67
diff changeset
339 (define_constraint "Uuv5"
kono
parents: 67
diff changeset
340 "@internal
kono
parents: 67
diff changeset
341 A replicated vector const in which the replicated value is in the range
kono
parents: 67
diff changeset
342 [0,31]."
kono
parents: 67
diff changeset
343 (and (match_code "const_vector")
kono
parents: 67
diff changeset
344 (match_test "mips_const_vector_same_int_p (op, mode, 0, 31)")))
kono
parents: 67
diff changeset
345
kono
parents: 67
diff changeset
346 (define_constraint "Usv5"
kono
parents: 67
diff changeset
347 "@internal
kono
parents: 67
diff changeset
348 A replicated vector const in which the replicated value is in the range
kono
parents: 67
diff changeset
349 [-16,15]."
kono
parents: 67
diff changeset
350 (and (match_code "const_vector")
kono
parents: 67
diff changeset
351 (match_test "mips_const_vector_same_int_p (op, mode, -16, 15)")))
kono
parents: 67
diff changeset
352
kono
parents: 67
diff changeset
353 (define_constraint "Uuv6"
kono
parents: 67
diff changeset
354 "@internal
kono
parents: 67
diff changeset
355 A replicated vector const in which the replicated value is in the range
kono
parents: 67
diff changeset
356 [0,63]."
kono
parents: 67
diff changeset
357 (and (match_code "const_vector")
kono
parents: 67
diff changeset
358 (match_test "mips_const_vector_same_int_p (op, mode, 0, 63)")))
kono
parents: 67
diff changeset
359
kono
parents: 67
diff changeset
360 (define_constraint "Urv8"
kono
parents: 67
diff changeset
361 "@internal
kono
parents: 67
diff changeset
362 A replicated vector const with replicated byte values as well as elements"
kono
parents: 67
diff changeset
363 (and (match_code "const_vector")
kono
parents: 67
diff changeset
364 (match_test "mips_const_vector_same_bytes_p (op, mode)")))
kono
parents: 67
diff changeset
365
kono
parents: 67
diff changeset
366 (define_memory_constraint "ZC"
kono
parents: 67
diff changeset
367 "A memory operand whose address is formed by a base register and offset
kono
parents: 67
diff changeset
368 that is suitable for use in instructions with the same addressing mode
kono
parents: 67
diff changeset
369 as @code{ll} and @code{sc}."
kono
parents: 67
diff changeset
370 (and (match_code "mem")
kono
parents: 67
diff changeset
371 (if_then_else
kono
parents: 67
diff changeset
372 (match_test "TARGET_MICROMIPS")
kono
parents: 67
diff changeset
373 (match_test "umips_12bit_offset_address_p (XEXP (op, 0), mode)")
kono
parents: 67
diff changeset
374 (if_then_else (match_test "ISA_HAS_9BIT_DISPLACEMENT")
kono
parents: 67
diff changeset
375 (match_test "mips_9bit_offset_address_p (XEXP (op, 0), mode)")
kono
parents: 67
diff changeset
376 (match_test "mips_address_insns (XEXP (op, 0), mode, false)")))))
kono
parents: 67
diff changeset
377
kono
parents: 67
diff changeset
378 (define_address_constraint "ZD"
kono
parents: 67
diff changeset
379 "An address suitable for a @code{prefetch} instruction, or for any other
kono
parents: 67
diff changeset
380 instruction with the same addressing mode as @code{prefetch}."
kono
parents: 67
diff changeset
381 (if_then_else (match_test "TARGET_MICROMIPS")
kono
parents: 67
diff changeset
382 (match_test "umips_12bit_offset_address_p (op, mode)")
kono
parents: 67
diff changeset
383 (if_then_else (match_test "ISA_HAS_9BIT_DISPLACEMENT")
kono
parents: 67
diff changeset
384 (match_test "mips_9bit_offset_address_p (op, mode)")
kono
parents: 67
diff changeset
385 (match_test "mips_address_insns (op, mode, false)"))))
kono
parents: 67
diff changeset
386
kono
parents: 67
diff changeset
387 (define_memory_constraint "ZR"
kono
parents: 67
diff changeset
388 "@internal
kono
parents: 67
diff changeset
389 An address valid for loading/storing register exclusive"
kono
parents: 67
diff changeset
390 (match_operand 0 "mem_noofs_operand"))
kono
parents: 67
diff changeset
391
kono
parents: 67
diff changeset
392 (define_memory_constraint "ZS"
kono
parents: 67
diff changeset
393 "@internal
kono
parents: 67
diff changeset
394 A microMIPS memory operand for use with the LWSP/SWSP insns."
kono
parents: 67
diff changeset
395 (and (match_code "mem")
kono
parents: 67
diff changeset
396 (match_operand 0 "lwsp_swsp_operand")))
kono
parents: 67
diff changeset
397
kono
parents: 67
diff changeset
398 (define_memory_constraint "ZT"
kono
parents: 67
diff changeset
399 "@internal
kono
parents: 67
diff changeset
400 A microMIPS memory operand for use with the LW16/SW16 insns."
kono
parents: 67
diff changeset
401 (and (match_code "mem")
kono
parents: 67
diff changeset
402 (match_operand 0 "lw16_sw16_operand")))
kono
parents: 67
diff changeset
403
kono
parents: 67
diff changeset
404 (define_memory_constraint "ZU"
kono
parents: 67
diff changeset
405 "@internal
kono
parents: 67
diff changeset
406 A microMIPS memory operand for use with the LHU16/SH16 insns."
kono
parents: 67
diff changeset
407 (and (match_code "mem")
kono
parents: 67
diff changeset
408 (match_operand 0 "lhu16_sh16_operand")))
kono
parents: 67
diff changeset
409
kono
parents: 67
diff changeset
410 (define_memory_constraint "ZV"
kono
parents: 67
diff changeset
411 "@internal
kono
parents: 67
diff changeset
412 A microMIPS memory operand for use with the SB16 insn."
kono
parents: 67
diff changeset
413 (and (match_code "mem")
kono
parents: 67
diff changeset
414 (match_operand 0 "sb16_operand")))
kono
parents: 67
diff changeset
415
kono
parents: 67
diff changeset
416 (define_memory_constraint "ZW"
kono
parents: 67
diff changeset
417 "@internal
kono
parents: 67
diff changeset
418 A microMIPS memory operand for use with the LBU16 insn."
kono
parents: 67
diff changeset
419 (and (match_code "mem")
kono
parents: 67
diff changeset
420 (match_operand 0 "lbu16_operand")))
kono
parents: 67
diff changeset
421