prev_cc0_setter can take a rtx_insn *
[official-gcc.git] / gcc / rtl.h
blob35a9fbc981ab4abe82d96732309e2e23b9b768b0
1 /* Register Transfer Language (RTL) definitions for GCC
2 Copyright (C) 1987-2015 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
9 version.
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 for more details.
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>. */
20 #ifndef GCC_RTL_H
21 #define GCC_RTL_H
23 #include "statistics.h"
24 #include "machmode.h"
25 #include "input.h"
26 #include "real.h"
27 #include "vec.h"
28 #include "fixed-value.h"
29 #include "alias.h"
30 #include "hashtab.h"
31 #include "wide-int.h"
32 #include "flags.h"
33 #include "is-a.h"
35 /* Value used by some passes to "recognize" noop moves as valid
36 instructions. */
37 #define NOOP_MOVE_INSN_CODE INT_MAX
39 /* Register Transfer Language EXPRESSIONS CODES */
41 #define RTX_CODE enum rtx_code
42 enum rtx_code {
44 #define DEF_RTL_EXPR(ENUM, NAME, FORMAT, CLASS) ENUM ,
45 #include "rtl.def" /* rtl expressions are documented here */
46 #undef DEF_RTL_EXPR
48 LAST_AND_UNUSED_RTX_CODE}; /* A convenient way to get a value for
49 NUM_RTX_CODE.
50 Assumes default enum value assignment. */
52 /* The cast here, saves many elsewhere. */
53 #define NUM_RTX_CODE ((int) LAST_AND_UNUSED_RTX_CODE)
55 /* Similar, but since generator files get more entries... */
56 #ifdef GENERATOR_FILE
57 # define NON_GENERATOR_NUM_RTX_CODE ((int) MATCH_OPERAND)
58 #endif
60 /* Register Transfer Language EXPRESSIONS CODE CLASSES */
62 enum rtx_class {
63 /* We check bit 0-1 of some rtx class codes in the predicates below. */
65 /* Bit 0 = comparison if 0, arithmetic is 1
66 Bit 1 = 1 if commutative. */
67 RTX_COMPARE, /* 0 */
68 RTX_COMM_COMPARE,
69 RTX_BIN_ARITH,
70 RTX_COMM_ARITH,
72 /* Must follow the four preceding values. */
73 RTX_UNARY, /* 4 */
75 RTX_EXTRA,
76 RTX_MATCH,
77 RTX_INSN,
79 /* Bit 0 = 1 if constant. */
80 RTX_OBJ, /* 8 */
81 RTX_CONST_OBJ,
83 RTX_TERNARY,
84 RTX_BITFIELD_OPS,
85 RTX_AUTOINC
88 #define RTX_OBJ_MASK (~1)
89 #define RTX_OBJ_RESULT (RTX_OBJ & RTX_OBJ_MASK)
90 #define RTX_COMPARE_MASK (~1)
91 #define RTX_COMPARE_RESULT (RTX_COMPARE & RTX_COMPARE_MASK)
92 #define RTX_ARITHMETIC_MASK (~1)
93 #define RTX_ARITHMETIC_RESULT (RTX_COMM_ARITH & RTX_ARITHMETIC_MASK)
94 #define RTX_BINARY_MASK (~3)
95 #define RTX_BINARY_RESULT (RTX_COMPARE & RTX_BINARY_MASK)
96 #define RTX_COMMUTATIVE_MASK (~2)
97 #define RTX_COMMUTATIVE_RESULT (RTX_COMM_COMPARE & RTX_COMMUTATIVE_MASK)
98 #define RTX_NON_COMMUTATIVE_RESULT (RTX_COMPARE & RTX_COMMUTATIVE_MASK)
100 extern const unsigned char rtx_length[NUM_RTX_CODE];
101 #define GET_RTX_LENGTH(CODE) (rtx_length[(int) (CODE)])
103 extern const char * const rtx_name[NUM_RTX_CODE];
104 #define GET_RTX_NAME(CODE) (rtx_name[(int) (CODE)])
106 extern const char * const rtx_format[NUM_RTX_CODE];
107 #define GET_RTX_FORMAT(CODE) (rtx_format[(int) (CODE)])
109 extern const enum rtx_class rtx_class[NUM_RTX_CODE];
110 #define GET_RTX_CLASS(CODE) (rtx_class[(int) (CODE)])
112 /* True if CODE is part of the insn chain (i.e. has INSN_UID, PREV_INSN
113 and NEXT_INSN fields). */
114 #define INSN_CHAIN_CODE_P(CODE) IN_RANGE (CODE, DEBUG_INSN, NOTE)
116 extern const unsigned char rtx_code_size[NUM_RTX_CODE];
117 extern const unsigned char rtx_next[NUM_RTX_CODE];
119 /* The flags and bitfields of an ADDR_DIFF_VEC. BASE is the base label
120 relative to which the offsets are calculated, as explained in rtl.def. */
121 struct addr_diff_vec_flags
123 /* Set at the start of shorten_branches - ONLY WHEN OPTIMIZING - : */
124 unsigned min_align: 8;
125 /* Flags: */
126 unsigned base_after_vec: 1; /* BASE is after the ADDR_DIFF_VEC. */
127 unsigned min_after_vec: 1; /* minimum address target label is
128 after the ADDR_DIFF_VEC. */
129 unsigned max_after_vec: 1; /* maximum address target label is
130 after the ADDR_DIFF_VEC. */
131 unsigned min_after_base: 1; /* minimum address target label is
132 after BASE. */
133 unsigned max_after_base: 1; /* maximum address target label is
134 after BASE. */
135 /* Set by the actual branch shortening process - ONLY WHEN OPTIMIZING - : */
136 unsigned offset_unsigned: 1; /* offsets have to be treated as unsigned. */
137 unsigned : 2;
138 unsigned scale : 8;
141 /* Structure used to describe the attributes of a MEM. These are hashed
142 so MEMs that the same attributes share a data structure. This means
143 they cannot be modified in place. */
144 struct GTY(()) mem_attrs
146 /* The expression that the MEM accesses, or null if not known.
147 This expression might be larger than the memory reference itself.
148 (In other words, the MEM might access only part of the object.) */
149 tree expr;
151 /* The offset of the memory reference from the start of EXPR.
152 Only valid if OFFSET_KNOWN_P. */
153 HOST_WIDE_INT offset;
155 /* The size of the memory reference in bytes. Only valid if
156 SIZE_KNOWN_P. */
157 HOST_WIDE_INT size;
159 /* The alias set of the memory reference. */
160 alias_set_type alias;
162 /* The alignment of the reference in bits. Always a multiple of
163 BITS_PER_UNIT. Note that EXPR may have a stricter alignment
164 than the memory reference itself. */
165 unsigned int align;
167 /* The address space that the memory reference uses. */
168 unsigned char addrspace;
170 /* True if OFFSET is known. */
171 bool offset_known_p;
173 /* True if SIZE is known. */
174 bool size_known_p;
177 /* Structure used to describe the attributes of a REG in similar way as
178 mem_attrs does for MEM above. Note that the OFFSET field is calculated
179 in the same way as for mem_attrs, rather than in the same way as a
180 SUBREG_BYTE. For example, if a big-endian target stores a byte
181 object in the low part of a 4-byte register, the OFFSET field
182 will be -3 rather than 0. */
184 struct GTY((for_user)) reg_attrs {
185 tree decl; /* decl corresponding to REG. */
186 HOST_WIDE_INT offset; /* Offset from start of DECL. */
189 /* Common union for an element of an rtx. */
191 union rtunion
193 int rt_int;
194 unsigned int rt_uint;
195 const char *rt_str;
196 rtx rt_rtx;
197 rtvec rt_rtvec;
198 machine_mode rt_type;
199 addr_diff_vec_flags rt_addr_diff_vec_flags;
200 struct cselib_val *rt_cselib;
201 tree rt_tree;
202 basic_block rt_bb;
203 mem_attrs *rt_mem;
204 reg_attrs *rt_reg;
205 struct constant_descriptor_rtx *rt_constant;
206 struct dw_cfi_node *rt_cfi;
209 /* This structure remembers the position of a SYMBOL_REF within an
210 object_block structure. A SYMBOL_REF only provides this information
211 if SYMBOL_REF_HAS_BLOCK_INFO_P is true. */
212 struct GTY(()) block_symbol {
213 /* The usual SYMBOL_REF fields. */
214 rtunion GTY ((skip)) fld[2];
216 /* The block that contains this object. */
217 struct object_block *block;
219 /* The offset of this object from the start of its block. It is negative
220 if the symbol has not yet been assigned an offset. */
221 HOST_WIDE_INT offset;
224 /* Describes a group of objects that are to be placed together in such
225 a way that their relative positions are known. */
226 struct GTY((for_user)) object_block {
227 /* The section in which these objects should be placed. */
228 section *sect;
230 /* The alignment of the first object, measured in bits. */
231 unsigned int alignment;
233 /* The total size of the objects, measured in bytes. */
234 HOST_WIDE_INT size;
236 /* The SYMBOL_REFs for each object. The vector is sorted in
237 order of increasing offset and the following conditions will
238 hold for each element X:
240 SYMBOL_REF_HAS_BLOCK_INFO_P (X)
241 !SYMBOL_REF_ANCHOR_P (X)
242 SYMBOL_REF_BLOCK (X) == [address of this structure]
243 SYMBOL_REF_BLOCK_OFFSET (X) >= 0. */
244 vec<rtx, va_gc> *objects;
246 /* All the anchor SYMBOL_REFs used to address these objects, sorted
247 in order of increasing offset, and then increasing TLS model.
248 The following conditions will hold for each element X in this vector:
250 SYMBOL_REF_HAS_BLOCK_INFO_P (X)
251 SYMBOL_REF_ANCHOR_P (X)
252 SYMBOL_REF_BLOCK (X) == [address of this structure]
253 SYMBOL_REF_BLOCK_OFFSET (X) >= 0. */
254 vec<rtx, va_gc> *anchors;
257 struct GTY((variable_size)) hwivec_def {
258 HOST_WIDE_INT elem[1];
261 /* Number of elements of the HWIVEC if RTX is a CONST_WIDE_INT. */
262 #define CWI_GET_NUM_ELEM(RTX) \
263 ((int)RTL_FLAG_CHECK1("CWI_GET_NUM_ELEM", (RTX), CONST_WIDE_INT)->u2.num_elem)
264 #define CWI_PUT_NUM_ELEM(RTX, NUM) \
265 (RTL_FLAG_CHECK1("CWI_PUT_NUM_ELEM", (RTX), CONST_WIDE_INT)->u2.num_elem = (NUM))
267 /* RTL expression ("rtx"). */
269 /* The GTY "desc" and "tag" options below are a kludge: we need a desc
270 field for for gengtype to recognize that inheritance is occurring,
271 so that all subclasses are redirected to the traversal hook for the
272 base class.
273 However, all of the fields are in the base class, and special-casing
274 is at work. Hence we use desc and tag of 0, generating a switch
275 statement of the form:
276 switch (0)
278 case 0: // all the work happens here
280 in order to work with the existing special-casing in gengtype. */
282 struct GTY((desc("0"), tag("0"),
283 chain_next ("RTX_NEXT (&%h)"),
284 chain_prev ("RTX_PREV (&%h)"))) rtx_def {
285 /* The kind of expression this is. */
286 ENUM_BITFIELD(rtx_code) code: 16;
288 /* The kind of value the expression has. */
289 ENUM_BITFIELD(machine_mode) mode : 8;
291 /* 1 in a MEM if we should keep the alias set for this mem unchanged
292 when we access a component.
293 1 in a JUMP_INSN if it is a crossing jump.
294 1 in a CALL_INSN if it is a sibling call.
295 1 in a SET that is for a return.
296 In a CODE_LABEL, part of the two-bit alternate entry field.
297 1 in a CONCAT is VAL_EXPR_IS_COPIED in var-tracking.c.
298 1 in a VALUE is SP_BASED_VALUE_P in cselib.c.
299 1 in a SUBREG generated by LRA for reload insns.
300 1 in a CALL for calls instrumented by Pointer Bounds Checker. */
301 unsigned int jump : 1;
302 /* In a CODE_LABEL, part of the two-bit alternate entry field.
303 1 in a MEM if it cannot trap.
304 1 in a CALL_INSN logically equivalent to
305 ECF_LOOPING_CONST_OR_PURE and DECL_LOOPING_CONST_OR_PURE_P. */
306 unsigned int call : 1;
307 /* 1 in a REG, MEM, or CONCAT if the value is set at most once, anywhere.
308 1 in a SUBREG used for SUBREG_PROMOTED_UNSIGNED_P.
309 1 in a SYMBOL_REF if it addresses something in the per-function
310 constants pool.
311 1 in a CALL_INSN logically equivalent to ECF_CONST and TREE_READONLY.
312 1 in a NOTE, or EXPR_LIST for a const call.
313 1 in a JUMP_INSN of an annulling branch.
314 1 in a CONCAT is VAL_EXPR_IS_CLOBBERED in var-tracking.c.
315 1 in a preserved VALUE is PRESERVED_VALUE_P in cselib.c.
316 1 in a clobber temporarily created for LRA. */
317 unsigned int unchanging : 1;
318 /* 1 in a MEM or ASM_OPERANDS expression if the memory reference is volatile.
319 1 in an INSN, CALL_INSN, JUMP_INSN, CODE_LABEL, BARRIER, or NOTE
320 if it has been deleted.
321 1 in a REG expression if corresponds to a variable declared by the user,
322 0 for an internally generated temporary.
323 1 in a SUBREG used for SUBREG_PROMOTED_UNSIGNED_P.
324 1 in a LABEL_REF, REG_LABEL_TARGET or REG_LABEL_OPERAND note for a
325 non-local label.
326 In a SYMBOL_REF, this flag is used for machine-specific purposes.
327 In a PREFETCH, this flag indicates that it should be considered a scheduling
328 barrier.
329 1 in a CONCAT is VAL_NEEDS_RESOLUTION in var-tracking.c. */
330 unsigned int volatil : 1;
331 /* 1 in a REG if the register is used only in exit code a loop.
332 1 in a SUBREG expression if was generated from a variable with a
333 promoted mode.
334 1 in a CODE_LABEL if the label is used for nonlocal gotos
335 and must not be deleted even if its count is zero.
336 1 in an INSN, JUMP_INSN or CALL_INSN if this insn must be scheduled
337 together with the preceding insn. Valid only within sched.
338 1 in an INSN, JUMP_INSN, or CALL_INSN if insn is in a delay slot and
339 from the target of a branch. Valid from reorg until end of compilation;
340 cleared before used.
342 The name of the field is historical. It used to be used in MEMs
343 to record whether the MEM accessed part of a structure. */
344 unsigned int in_struct : 1;
345 /* At the end of RTL generation, 1 if this rtx is used. This is used for
346 copying shared structure. See `unshare_all_rtl'.
347 In a REG, this is not needed for that purpose, and used instead
348 in `leaf_renumber_regs_insn'.
349 1 in a SYMBOL_REF, means that emit_library_call
350 has used it as the function.
351 1 in a CONCAT is VAL_HOLDS_TRACK_EXPR in var-tracking.c.
352 1 in a VALUE or DEBUG_EXPR is VALUE_RECURSED_INTO in var-tracking.c. */
353 unsigned int used : 1;
354 /* 1 in an INSN or a SET if this rtx is related to the call frame,
355 either changing how we compute the frame address or saving and
356 restoring registers in the prologue and epilogue.
357 1 in a REG or MEM if it is a pointer.
358 1 in a SYMBOL_REF if it addresses something in the per-function
359 constant string pool.
360 1 in a VALUE is VALUE_CHANGED in var-tracking.c. */
361 unsigned frame_related : 1;
362 /* 1 in a REG or PARALLEL that is the current function's return value.
363 1 in a SYMBOL_REF for a weak symbol.
364 1 in a CALL_INSN logically equivalent to ECF_PURE and DECL_PURE_P.
365 1 in a CONCAT is VAL_EXPR_HAS_REVERSE in var-tracking.c.
366 1 in a VALUE or DEBUG_EXPR is NO_LOC_P in var-tracking.c. */
367 unsigned return_val : 1;
369 union {
370 /* The final union field is aligned to 64 bits on LP64 hosts,
371 giving a 32-bit gap after the fields above. We optimize the
372 layout for that case and use the gap for extra code-specific
373 information. */
375 /* The ORIGINAL_REGNO of a REG. */
376 unsigned int original_regno;
378 /* The INSN_UID of an RTX_INSN-class code. */
379 int insn_uid;
381 /* The SYMBOL_REF_FLAGS of a SYMBOL_REF. */
382 unsigned int symbol_ref_flags;
384 /* The PAT_VAR_LOCATION_STATUS of a VAR_LOCATION. */
385 enum var_init_status var_location_status;
387 /* In a CONST_WIDE_INT (aka hwivec_def), this is the number of
388 HOST_WIDE_INTs in the hwivec_def. */
389 unsigned int num_elem;
390 } GTY ((skip)) u2;
392 /* The first element of the operands of this rtx.
393 The number of operands and their types are controlled
394 by the `code' field, according to rtl.def. */
395 union u {
396 rtunion fld[1];
397 HOST_WIDE_INT hwint[1];
398 struct block_symbol block_sym;
399 struct real_value rv;
400 struct fixed_value fv;
401 struct hwivec_def hwiv;
402 } GTY ((special ("rtx_def"), desc ("GET_CODE (&%0)"))) u;
405 /* A node for constructing singly-linked lists of rtx. */
407 class GTY(()) rtx_expr_list : public rtx_def
409 /* No extra fields, but adds invariant: (GET_CODE (X) == EXPR_LIST). */
411 public:
412 /* Get next in list. */
413 rtx_expr_list *next () const;
415 /* Get at the underlying rtx. */
416 rtx element () const;
419 template <>
420 template <>
421 inline bool
422 is_a_helper <rtx_expr_list *>::test (rtx rt)
424 return rt->code == EXPR_LIST;
427 class GTY(()) rtx_insn_list : public rtx_def
429 /* No extra fields, but adds invariant: (GET_CODE (X) == INSN_LIST).
431 This is an instance of:
433 DEF_RTL_EXPR(INSN_LIST, "insn_list", "ue", RTX_EXTRA)
435 i.e. a node for constructing singly-linked lists of rtx_insn *, where
436 the list is "external" to the insn (as opposed to the doubly-linked
437 list embedded within rtx_insn itself). */
439 public:
440 /* Get next in list. */
441 rtx_insn_list *next () const;
443 /* Get at the underlying instruction. */
444 rtx_insn *insn () const;
448 template <>
449 template <>
450 inline bool
451 is_a_helper <rtx_insn_list *>::test (rtx rt)
453 return rt->code == INSN_LIST;
456 /* A node with invariant GET_CODE (X) == SEQUENCE i.e. a vector of rtx,
457 typically (but not always) of rtx_insn *, used in the late passes. */
459 class GTY(()) rtx_sequence : public rtx_def
461 /* No extra fields, but adds invariant: (GET_CODE (X) == SEQUENCE). */
463 public:
464 /* Get number of elements in sequence. */
465 int len () const;
467 /* Get i-th element of the sequence. */
468 rtx element (int index) const;
470 /* Get i-th element of the sequence, with a checked cast to
471 rtx_insn *. */
472 rtx_insn *insn (int index) const;
475 template <>
476 template <>
477 inline bool
478 is_a_helper <rtx_sequence *>::test (rtx rt)
480 return rt->code == SEQUENCE;
483 template <>
484 template <>
485 inline bool
486 is_a_helper <const rtx_sequence *>::test (const_rtx rt)
488 return rt->code == SEQUENCE;
491 class GTY(()) rtx_insn : public rtx_def
493 public:
494 /* No extra fields, but adds the invariant:
496 (INSN_P (X)
497 || NOTE_P (X)
498 || JUMP_TABLE_DATA_P (X)
499 || BARRIER_P (X)
500 || LABEL_P (X))
502 i.e. that we must be able to use the following:
503 INSN_UID ()
504 NEXT_INSN ()
505 PREV_INSN ()
506 i.e. we have an rtx that has an INSN_UID field and can be part of
507 a linked list of insns.
510 /* Returns true if this insn has been deleted. */
512 bool deleted () const { return volatil; }
514 /* Mark this insn as deleted. */
516 void set_deleted () { volatil = true; }
518 /* Mark this insn as not deleted. */
520 void set_undeleted () { volatil = false; }
523 /* Subclasses of rtx_insn. */
525 class GTY(()) rtx_debug_insn : public rtx_insn
527 /* No extra fields, but adds the invariant:
528 DEBUG_INSN_P (X) aka (GET_CODE (X) == DEBUG_INSN)
529 i.e. an annotation for tracking variable assignments.
531 This is an instance of:
532 DEF_RTL_EXPR(DEBUG_INSN, "debug_insn", "uuBeiie", RTX_INSN)
533 from rtl.def. */
536 class GTY(()) rtx_nonjump_insn : public rtx_insn
538 /* No extra fields, but adds the invariant:
539 NONJUMP_INSN_P (X) aka (GET_CODE (X) == INSN)
540 i.e an instruction that cannot jump.
542 This is an instance of:
543 DEF_RTL_EXPR(INSN, "insn", "uuBeiie", RTX_INSN)
544 from rtl.def. */
547 class GTY(()) rtx_jump_insn : public rtx_insn
549 /* No extra fields, but adds the invariant:
550 JUMP_P (X) aka (GET_CODE (X) == JUMP_INSN)
551 i.e. an instruction that can possibly jump.
553 This is an instance of:
554 DEF_RTL_EXPR(JUMP_INSN, "jump_insn", "uuBeiie0", RTX_INSN)
555 from rtl.def. */
558 class GTY(()) rtx_call_insn : public rtx_insn
560 /* No extra fields, but adds the invariant:
561 CALL_P (X) aka (GET_CODE (X) == CALL_INSN)
562 i.e. an instruction that can possibly call a subroutine
563 but which will not change which instruction comes next
564 in the current function.
566 This is an instance of:
567 DEF_RTL_EXPR(CALL_INSN, "call_insn", "uuBeiiee", RTX_INSN)
568 from rtl.def. */
571 class GTY(()) rtx_jump_table_data : public rtx_insn
573 /* No extra fields, but adds the invariant:
574 JUMP_TABLE_DATA_P (X) aka (GET_CODE (INSN) == JUMP_TABLE_DATA)
575 i.e. a data for a jump table, considered an instruction for
576 historical reasons.
578 This is an instance of:
579 DEF_RTL_EXPR(JUMP_TABLE_DATA, "jump_table_data", "uuBe0000", RTX_INSN)
580 from rtl.def. */
582 public:
584 /* This can be either:
586 (a) a table of absolute jumps, in which case PATTERN (this) is an
587 ADDR_VEC with arg 0 a vector of labels, or
589 (b) a table of relative jumps (e.g. for -fPIC), in which case
590 PATTERN (this) is an ADDR_DIFF_VEC, with arg 0 a LABEL_REF and
591 arg 1 the vector of labels.
593 This method gets the underlying vec. */
595 inline rtvec get_labels () const;
598 class GTY(()) rtx_barrier : public rtx_insn
600 /* No extra fields, but adds the invariant:
601 BARRIER_P (X) aka (GET_CODE (X) == BARRIER)
602 i.e. a marker that indicates that control will not flow through.
604 This is an instance of:
605 DEF_RTL_EXPR(BARRIER, "barrier", "uu00000", RTX_EXTRA)
606 from rtl.def. */
609 class GTY(()) rtx_code_label : public rtx_insn
611 /* No extra fields, but adds the invariant:
612 LABEL_P (X) aka (GET_CODE (X) == CODE_LABEL)
613 i.e. a label in the assembler.
615 This is an instance of:
616 DEF_RTL_EXPR(CODE_LABEL, "code_label", "uuB00is", RTX_EXTRA)
617 from rtl.def. */
620 class GTY(()) rtx_note : public rtx_insn
622 /* No extra fields, but adds the invariant:
623 NOTE_P(X) aka (GET_CODE (X) == NOTE)
624 i.e. a note about the corresponding source code.
626 This is an instance of:
627 DEF_RTL_EXPR(NOTE, "note", "uuB0ni", RTX_EXTRA)
628 from rtl.def. */
631 /* The size in bytes of an rtx header (code, mode and flags). */
632 #define RTX_HDR_SIZE offsetof (struct rtx_def, u)
634 /* The size in bytes of an rtx with code CODE. */
635 #define RTX_CODE_SIZE(CODE) rtx_code_size[CODE]
637 #define NULL_RTX (rtx) 0
639 /* The "next" and "previous" RTX, relative to this one. */
641 #define RTX_NEXT(X) (rtx_next[GET_CODE (X)] == 0 ? NULL \
642 : *(rtx *)(((char *)X) + rtx_next[GET_CODE (X)]))
644 /* FIXME: the "NEXT_INSN (PREV_INSN (X)) == X" condition shouldn't be needed.
646 #define RTX_PREV(X) ((INSN_P (X) \
647 || NOTE_P (X) \
648 || JUMP_TABLE_DATA_P (X) \
649 || BARRIER_P (X) \
650 || LABEL_P (X)) \
651 && PREV_INSN (as_a <rtx_insn *> (X)) != NULL \
652 && NEXT_INSN (PREV_INSN (as_a <rtx_insn *> (X))) == X \
653 ? PREV_INSN (as_a <rtx_insn *> (X)) : NULL)
655 /* Define macros to access the `code' field of the rtx. */
657 #define GET_CODE(RTX) ((enum rtx_code) (RTX)->code)
658 #define PUT_CODE(RTX, CODE) ((RTX)->code = (CODE))
660 #define GET_MODE(RTX) ((machine_mode) (RTX)->mode)
661 #define PUT_MODE(RTX, MODE) ((RTX)->mode = (MODE))
663 /* RTL vector. These appear inside RTX's when there is a need
664 for a variable number of things. The principle use is inside
665 PARALLEL expressions. */
667 struct GTY(()) rtvec_def {
668 int num_elem; /* number of elements */
669 rtx GTY ((length ("%h.num_elem"))) elem[1];
672 #define NULL_RTVEC (rtvec) 0
674 #define GET_NUM_ELEM(RTVEC) ((RTVEC)->num_elem)
675 #define PUT_NUM_ELEM(RTVEC, NUM) ((RTVEC)->num_elem = (NUM))
677 /* Predicate yielding nonzero iff X is an rtx for a register. */
678 #define REG_P(X) (GET_CODE (X) == REG)
680 /* Predicate yielding nonzero iff X is an rtx for a memory location. */
681 #define MEM_P(X) (GET_CODE (X) == MEM)
683 #if TARGET_SUPPORTS_WIDE_INT
685 /* Match CONST_*s that can represent compile-time constant integers. */
686 #define CASE_CONST_SCALAR_INT \
687 case CONST_INT: \
688 case CONST_WIDE_INT
690 /* Match CONST_*s for which pointer equality corresponds to value
691 equality. */
692 #define CASE_CONST_UNIQUE \
693 case CONST_INT: \
694 case CONST_WIDE_INT: \
695 case CONST_DOUBLE: \
696 case CONST_FIXED
698 /* Match all CONST_* rtxes. */
699 #define CASE_CONST_ANY \
700 case CONST_INT: \
701 case CONST_WIDE_INT: \
702 case CONST_DOUBLE: \
703 case CONST_FIXED: \
704 case CONST_VECTOR
706 #else
708 /* Match CONST_*s that can represent compile-time constant integers. */
709 #define CASE_CONST_SCALAR_INT \
710 case CONST_INT: \
711 case CONST_DOUBLE
713 /* Match CONST_*s for which pointer equality corresponds to value
714 equality. */
715 #define CASE_CONST_UNIQUE \
716 case CONST_INT: \
717 case CONST_DOUBLE: \
718 case CONST_FIXED
720 /* Match all CONST_* rtxes. */
721 #define CASE_CONST_ANY \
722 case CONST_INT: \
723 case CONST_DOUBLE: \
724 case CONST_FIXED: \
725 case CONST_VECTOR
726 #endif
728 /* Predicate yielding nonzero iff X is an rtx for a constant integer. */
729 #define CONST_INT_P(X) (GET_CODE (X) == CONST_INT)
731 /* Predicate yielding nonzero iff X is an rtx for a constant integer. */
732 #define CONST_WIDE_INT_P(X) (GET_CODE (X) == CONST_WIDE_INT)
734 /* Predicate yielding nonzero iff X is an rtx for a constant fixed-point. */
735 #define CONST_FIXED_P(X) (GET_CODE (X) == CONST_FIXED)
737 /* Predicate yielding true iff X is an rtx for a double-int
738 or floating point constant. */
739 #define CONST_DOUBLE_P(X) (GET_CODE (X) == CONST_DOUBLE)
741 /* Predicate yielding true iff X is an rtx for a double-int. */
742 #define CONST_DOUBLE_AS_INT_P(X) \
743 (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) == VOIDmode)
745 /* Predicate yielding true iff X is an rtx for a integer const. */
746 #if TARGET_SUPPORTS_WIDE_INT
747 #define CONST_SCALAR_INT_P(X) \
748 (CONST_INT_P (X) || CONST_WIDE_INT_P (X))
749 #else
750 #define CONST_SCALAR_INT_P(X) \
751 (CONST_INT_P (X) || CONST_DOUBLE_AS_INT_P (X))
752 #endif
754 /* Predicate yielding true iff X is an rtx for a double-int. */
755 #define CONST_DOUBLE_AS_FLOAT_P(X) \
756 (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) != VOIDmode)
758 /* Predicate yielding nonzero iff X is a label insn. */
759 #define LABEL_P(X) (GET_CODE (X) == CODE_LABEL)
761 /* Predicate yielding nonzero iff X is a jump insn. */
762 #define JUMP_P(X) (GET_CODE (X) == JUMP_INSN)
764 /* Predicate yielding nonzero iff X is a call insn. */
765 #define CALL_P(X) (GET_CODE (X) == CALL_INSN)
767 /* Predicate yielding nonzero iff X is an insn that cannot jump. */
768 #define NONJUMP_INSN_P(X) (GET_CODE (X) == INSN)
770 /* Predicate yielding nonzero iff X is a debug note/insn. */
771 #define DEBUG_INSN_P(X) (GET_CODE (X) == DEBUG_INSN)
773 /* Predicate yielding nonzero iff X is an insn that is not a debug insn. */
774 #define NONDEBUG_INSN_P(X) (INSN_P (X) && !DEBUG_INSN_P (X))
776 /* Nonzero if DEBUG_INSN_P may possibly hold. */
777 #define MAY_HAVE_DEBUG_INSNS (flag_var_tracking_assignments)
779 /* Predicate yielding nonzero iff X is a real insn. */
780 #define INSN_P(X) \
781 (NONJUMP_INSN_P (X) || DEBUG_INSN_P (X) || JUMP_P (X) || CALL_P (X))
783 /* Predicate yielding nonzero iff X is a note insn. */
784 #define NOTE_P(X) (GET_CODE (X) == NOTE)
786 /* Predicate yielding nonzero iff X is a barrier insn. */
787 #define BARRIER_P(X) (GET_CODE (X) == BARRIER)
789 /* Predicate yielding nonzero iff X is a data for a jump table. */
790 #define JUMP_TABLE_DATA_P(INSN) (GET_CODE (INSN) == JUMP_TABLE_DATA)
792 /* Predicate yielding nonzero iff RTX is a subreg. */
793 #define SUBREG_P(RTX) (GET_CODE (RTX) == SUBREG)
795 template <>
796 template <>
797 inline bool
798 is_a_helper <rtx_insn *>::test (rtx rt)
800 return (INSN_P (rt)
801 || NOTE_P (rt)
802 || JUMP_TABLE_DATA_P (rt)
803 || BARRIER_P (rt)
804 || LABEL_P (rt));
807 template <>
808 template <>
809 inline bool
810 is_a_helper <const rtx_insn *>::test (const_rtx rt)
812 return (INSN_P (rt)
813 || NOTE_P (rt)
814 || JUMP_TABLE_DATA_P (rt)
815 || BARRIER_P (rt)
816 || LABEL_P (rt));
819 template <>
820 template <>
821 inline bool
822 is_a_helper <rtx_debug_insn *>::test (rtx rt)
824 return DEBUG_INSN_P (rt);
827 template <>
828 template <>
829 inline bool
830 is_a_helper <rtx_nonjump_insn *>::test (rtx rt)
832 return NONJUMP_INSN_P (rt);
835 template <>
836 template <>
837 inline bool
838 is_a_helper <rtx_jump_insn *>::test (rtx rt)
840 return JUMP_P (rt);
843 template <>
844 template <>
845 inline bool
846 is_a_helper <rtx_call_insn *>::test (rtx rt)
848 return CALL_P (rt);
851 template <>
852 template <>
853 inline bool
854 is_a_helper <rtx_call_insn *>::test (rtx_insn *insn)
856 return CALL_P (insn);
859 template <>
860 template <>
861 inline bool
862 is_a_helper <rtx_jump_table_data *>::test (rtx rt)
864 return JUMP_TABLE_DATA_P (rt);
867 template <>
868 template <>
869 inline bool
870 is_a_helper <rtx_jump_table_data *>::test (rtx_insn *insn)
872 return JUMP_TABLE_DATA_P (insn);
875 template <>
876 template <>
877 inline bool
878 is_a_helper <rtx_barrier *>::test (rtx rt)
880 return BARRIER_P (rt);
883 template <>
884 template <>
885 inline bool
886 is_a_helper <rtx_code_label *>::test (rtx rt)
888 return LABEL_P (rt);
891 template <>
892 template <>
893 inline bool
894 is_a_helper <rtx_code_label *>::test (rtx_insn *insn)
896 return LABEL_P (insn);
899 template <>
900 template <>
901 inline bool
902 is_a_helper <rtx_note *>::test (rtx rt)
904 return NOTE_P (rt);
907 template <>
908 template <>
909 inline bool
910 is_a_helper <rtx_note *>::test (rtx_insn *insn)
912 return NOTE_P (insn);
915 /* Predicate yielding nonzero iff X is a return or simple_return. */
916 #define ANY_RETURN_P(X) \
917 (GET_CODE (X) == RETURN || GET_CODE (X) == SIMPLE_RETURN)
919 /* 1 if X is a unary operator. */
921 #define UNARY_P(X) \
922 (GET_RTX_CLASS (GET_CODE (X)) == RTX_UNARY)
924 /* 1 if X is a binary operator. */
926 #define BINARY_P(X) \
927 ((GET_RTX_CLASS (GET_CODE (X)) & RTX_BINARY_MASK) == RTX_BINARY_RESULT)
929 /* 1 if X is an arithmetic operator. */
931 #define ARITHMETIC_P(X) \
932 ((GET_RTX_CLASS (GET_CODE (X)) & RTX_ARITHMETIC_MASK) \
933 == RTX_ARITHMETIC_RESULT)
935 /* 1 if X is an arithmetic operator. */
937 #define COMMUTATIVE_ARITH_P(X) \
938 (GET_RTX_CLASS (GET_CODE (X)) == RTX_COMM_ARITH)
940 /* 1 if X is a commutative arithmetic operator or a comparison operator.
941 These two are sometimes selected together because it is possible to
942 swap the two operands. */
944 #define SWAPPABLE_OPERANDS_P(X) \
945 ((1 << GET_RTX_CLASS (GET_CODE (X))) \
946 & ((1 << RTX_COMM_ARITH) | (1 << RTX_COMM_COMPARE) \
947 | (1 << RTX_COMPARE)))
949 /* 1 if X is a non-commutative operator. */
951 #define NON_COMMUTATIVE_P(X) \
952 ((GET_RTX_CLASS (GET_CODE (X)) & RTX_COMMUTATIVE_MASK) \
953 == RTX_NON_COMMUTATIVE_RESULT)
955 /* 1 if X is a commutative operator on integers. */
957 #define COMMUTATIVE_P(X) \
958 ((GET_RTX_CLASS (GET_CODE (X)) & RTX_COMMUTATIVE_MASK) \
959 == RTX_COMMUTATIVE_RESULT)
961 /* 1 if X is a relational operator. */
963 #define COMPARISON_P(X) \
964 ((GET_RTX_CLASS (GET_CODE (X)) & RTX_COMPARE_MASK) == RTX_COMPARE_RESULT)
966 /* 1 if X is a constant value that is an integer. */
968 #define CONSTANT_P(X) \
969 (GET_RTX_CLASS (GET_CODE (X)) == RTX_CONST_OBJ)
971 /* 1 if X can be used to represent an object. */
972 #define OBJECT_P(X) \
973 ((GET_RTX_CLASS (GET_CODE (X)) & RTX_OBJ_MASK) == RTX_OBJ_RESULT)
975 /* General accessor macros for accessing the fields of an rtx. */
977 #if defined ENABLE_RTL_CHECKING && (GCC_VERSION >= 2007)
978 /* The bit with a star outside the statement expr and an & inside is
979 so that N can be evaluated only once. */
980 #define RTL_CHECK1(RTX, N, C1) __extension__ \
981 (*({ __typeof (RTX) const _rtx = (RTX); const int _n = (N); \
982 const enum rtx_code _code = GET_CODE (_rtx); \
983 if (_n < 0 || _n >= GET_RTX_LENGTH (_code)) \
984 rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, \
985 __FUNCTION__); \
986 if (GET_RTX_FORMAT (_code)[_n] != C1) \
987 rtl_check_failed_type1 (_rtx, _n, C1, __FILE__, __LINE__, \
988 __FUNCTION__); \
989 &_rtx->u.fld[_n]; }))
991 #define RTL_CHECK2(RTX, N, C1, C2) __extension__ \
992 (*({ __typeof (RTX) const _rtx = (RTX); const int _n = (N); \
993 const enum rtx_code _code = GET_CODE (_rtx); \
994 if (_n < 0 || _n >= GET_RTX_LENGTH (_code)) \
995 rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, \
996 __FUNCTION__); \
997 if (GET_RTX_FORMAT (_code)[_n] != C1 \
998 && GET_RTX_FORMAT (_code)[_n] != C2) \
999 rtl_check_failed_type2 (_rtx, _n, C1, C2, __FILE__, __LINE__, \
1000 __FUNCTION__); \
1001 &_rtx->u.fld[_n]; }))
1003 #define RTL_CHECKC1(RTX, N, C) __extension__ \
1004 (*({ __typeof (RTX) const _rtx = (RTX); const int _n = (N); \
1005 if (GET_CODE (_rtx) != (C)) \
1006 rtl_check_failed_code1 (_rtx, (C), __FILE__, __LINE__, \
1007 __FUNCTION__); \
1008 &_rtx->u.fld[_n]; }))
1010 #define RTL_CHECKC2(RTX, N, C1, C2) __extension__ \
1011 (*({ __typeof (RTX) const _rtx = (RTX); const int _n = (N); \
1012 const enum rtx_code _code = GET_CODE (_rtx); \
1013 if (_code != (C1) && _code != (C2)) \
1014 rtl_check_failed_code2 (_rtx, (C1), (C2), __FILE__, __LINE__, \
1015 __FUNCTION__); \
1016 &_rtx->u.fld[_n]; }))
1018 #define RTVEC_ELT(RTVEC, I) __extension__ \
1019 (*({ __typeof (RTVEC) const _rtvec = (RTVEC); const int _i = (I); \
1020 if (_i < 0 || _i >= GET_NUM_ELEM (_rtvec)) \
1021 rtvec_check_failed_bounds (_rtvec, _i, __FILE__, __LINE__, \
1022 __FUNCTION__); \
1023 &_rtvec->elem[_i]; }))
1025 #define XWINT(RTX, N) __extension__ \
1026 (*({ __typeof (RTX) const _rtx = (RTX); const int _n = (N); \
1027 const enum rtx_code _code = GET_CODE (_rtx); \
1028 if (_n < 0 || _n >= GET_RTX_LENGTH (_code)) \
1029 rtl_check_failed_bounds (_rtx, _n, __FILE__, __LINE__, \
1030 __FUNCTION__); \
1031 if (GET_RTX_FORMAT (_code)[_n] != 'w') \
1032 rtl_check_failed_type1 (_rtx, _n, 'w', __FILE__, __LINE__, \
1033 __FUNCTION__); \
1034 &_rtx->u.hwint[_n]; }))
1036 #define CWI_ELT(RTX, I) __extension__ \
1037 (*({ __typeof (RTX) const _cwi = (RTX); \
1038 int _max = CWI_GET_NUM_ELEM (_cwi); \
1039 const int _i = (I); \
1040 if (_i < 0 || _i >= _max) \
1041 cwi_check_failed_bounds (_cwi, _i, __FILE__, __LINE__, \
1042 __FUNCTION__); \
1043 &_cwi->u.hwiv.elem[_i]; }))
1045 #define XCWINT(RTX, N, C) __extension__ \
1046 (*({ __typeof (RTX) const _rtx = (RTX); \
1047 if (GET_CODE (_rtx) != (C)) \
1048 rtl_check_failed_code1 (_rtx, (C), __FILE__, __LINE__, \
1049 __FUNCTION__); \
1050 &_rtx->u.hwint[N]; }))
1052 #define XCMWINT(RTX, N, C, M) __extension__ \
1053 (*({ __typeof (RTX) const _rtx = (RTX); \
1054 if (GET_CODE (_rtx) != (C) || GET_MODE (_rtx) != (M)) \
1055 rtl_check_failed_code_mode (_rtx, (C), (M), false, __FILE__, \
1056 __LINE__, __FUNCTION__); \
1057 &_rtx->u.hwint[N]; }))
1059 #define XCNMPRV(RTX, C, M) __extension__ \
1060 ({ __typeof (RTX) const _rtx = (RTX); \
1061 if (GET_CODE (_rtx) != (C) || GET_MODE (_rtx) == (M)) \
1062 rtl_check_failed_code_mode (_rtx, (C), (M), true, __FILE__, \
1063 __LINE__, __FUNCTION__); \
1064 &_rtx->u.rv; })
1066 #define XCNMPFV(RTX, C, M) __extension__ \
1067 ({ __typeof (RTX) const _rtx = (RTX); \
1068 if (GET_CODE (_rtx) != (C) || GET_MODE (_rtx) == (M)) \
1069 rtl_check_failed_code_mode (_rtx, (C), (M), true, __FILE__, \
1070 __LINE__, __FUNCTION__); \
1071 &_rtx->u.fv; })
1073 #define BLOCK_SYMBOL_CHECK(RTX) __extension__ \
1074 ({ __typeof (RTX) const _symbol = (RTX); \
1075 const unsigned int flags = SYMBOL_REF_FLAGS (_symbol); \
1076 if ((flags & SYMBOL_FLAG_HAS_BLOCK_INFO) == 0) \
1077 rtl_check_failed_block_symbol (__FILE__, __LINE__, \
1078 __FUNCTION__); \
1079 &_symbol->u.block_sym; })
1081 #define HWIVEC_CHECK(RTX,C) __extension__ \
1082 ({ __typeof (RTX) const _symbol = (RTX); \
1083 RTL_CHECKC1 (_symbol, 0, C); \
1084 &_symbol->u.hwiv; })
1086 extern void rtl_check_failed_bounds (const_rtx, int, const char *, int,
1087 const char *)
1088 ATTRIBUTE_NORETURN;
1089 extern void rtl_check_failed_type1 (const_rtx, int, int, const char *, int,
1090 const char *)
1091 ATTRIBUTE_NORETURN;
1092 extern void rtl_check_failed_type2 (const_rtx, int, int, int, const char *,
1093 int, const char *)
1094 ATTRIBUTE_NORETURN;
1095 extern void rtl_check_failed_code1 (const_rtx, enum rtx_code, const char *,
1096 int, const char *)
1097 ATTRIBUTE_NORETURN;
1098 extern void rtl_check_failed_code2 (const_rtx, enum rtx_code, enum rtx_code,
1099 const char *, int, const char *)
1100 ATTRIBUTE_NORETURN;
1101 extern void rtl_check_failed_code_mode (const_rtx, enum rtx_code, machine_mode,
1102 bool, const char *, int, const char *)
1103 ATTRIBUTE_NORETURN;
1104 extern void rtl_check_failed_block_symbol (const char *, int, const char *)
1105 ATTRIBUTE_NORETURN;
1106 extern void cwi_check_failed_bounds (const_rtx, int, const char *, int,
1107 const char *)
1108 ATTRIBUTE_NORETURN;
1109 extern void rtvec_check_failed_bounds (const_rtvec, int, const char *, int,
1110 const char *)
1111 ATTRIBUTE_NORETURN;
1113 #else /* not ENABLE_RTL_CHECKING */
1115 #define RTL_CHECK1(RTX, N, C1) ((RTX)->u.fld[N])
1116 #define RTL_CHECK2(RTX, N, C1, C2) ((RTX)->u.fld[N])
1117 #define RTL_CHECKC1(RTX, N, C) ((RTX)->u.fld[N])
1118 #define RTL_CHECKC2(RTX, N, C1, C2) ((RTX)->u.fld[N])
1119 #define RTVEC_ELT(RTVEC, I) ((RTVEC)->elem[I])
1120 #define XWINT(RTX, N) ((RTX)->u.hwint[N])
1121 #define CWI_ELT(RTX, I) ((RTX)->u.hwiv.elem[I])
1122 #define XCWINT(RTX, N, C) ((RTX)->u.hwint[N])
1123 #define XCMWINT(RTX, N, C, M) ((RTX)->u.hwint[N])
1124 #define XCNMWINT(RTX, N, C, M) ((RTX)->u.hwint[N])
1125 #define XCNMPRV(RTX, C, M) (&(RTX)->u.rv)
1126 #define XCNMPFV(RTX, C, M) (&(RTX)->u.fv)
1127 #define BLOCK_SYMBOL_CHECK(RTX) (&(RTX)->u.block_sym)
1128 #define HWIVEC_CHECK(RTX,C) (&(RTX)->u.hwiv)
1130 #endif
1132 /* General accessor macros for accessing the flags of an rtx. */
1134 /* Access an individual rtx flag, with no checking of any kind. */
1135 #define RTX_FLAG(RTX, FLAG) ((RTX)->FLAG)
1137 #if defined ENABLE_RTL_FLAG_CHECKING && (GCC_VERSION >= 2007)
1138 #define RTL_FLAG_CHECK1(NAME, RTX, C1) __extension__ \
1139 ({ __typeof (RTX) const _rtx = (RTX); \
1140 if (GET_CODE (_rtx) != C1) \
1141 rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \
1142 __FUNCTION__); \
1143 _rtx; })
1145 #define RTL_FLAG_CHECK2(NAME, RTX, C1, C2) __extension__ \
1146 ({ __typeof (RTX) const _rtx = (RTX); \
1147 if (GET_CODE (_rtx) != C1 && GET_CODE(_rtx) != C2) \
1148 rtl_check_failed_flag (NAME,_rtx, __FILE__, __LINE__, \
1149 __FUNCTION__); \
1150 _rtx; })
1152 #define RTL_FLAG_CHECK3(NAME, RTX, C1, C2, C3) __extension__ \
1153 ({ __typeof (RTX) const _rtx = (RTX); \
1154 if (GET_CODE (_rtx) != C1 && GET_CODE(_rtx) != C2 \
1155 && GET_CODE (_rtx) != C3) \
1156 rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \
1157 __FUNCTION__); \
1158 _rtx; })
1160 #define RTL_FLAG_CHECK4(NAME, RTX, C1, C2, C3, C4) __extension__ \
1161 ({ __typeof (RTX) const _rtx = (RTX); \
1162 if (GET_CODE (_rtx) != C1 && GET_CODE(_rtx) != C2 \
1163 && GET_CODE (_rtx) != C3 && GET_CODE(_rtx) != C4) \
1164 rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \
1165 __FUNCTION__); \
1166 _rtx; })
1168 #define RTL_FLAG_CHECK5(NAME, RTX, C1, C2, C3, C4, C5) __extension__ \
1169 ({ __typeof (RTX) const _rtx = (RTX); \
1170 if (GET_CODE (_rtx) != C1 && GET_CODE (_rtx) != C2 \
1171 && GET_CODE (_rtx) != C3 && GET_CODE (_rtx) != C4 \
1172 && GET_CODE (_rtx) != C5) \
1173 rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \
1174 __FUNCTION__); \
1175 _rtx; })
1177 #define RTL_FLAG_CHECK6(NAME, RTX, C1, C2, C3, C4, C5, C6) \
1178 __extension__ \
1179 ({ __typeof (RTX) const _rtx = (RTX); \
1180 if (GET_CODE (_rtx) != C1 && GET_CODE (_rtx) != C2 \
1181 && GET_CODE (_rtx) != C3 && GET_CODE (_rtx) != C4 \
1182 && GET_CODE (_rtx) != C5 && GET_CODE (_rtx) != C6) \
1183 rtl_check_failed_flag (NAME,_rtx, __FILE__, __LINE__, \
1184 __FUNCTION__); \
1185 _rtx; })
1187 #define RTL_FLAG_CHECK7(NAME, RTX, C1, C2, C3, C4, C5, C6, C7) \
1188 __extension__ \
1189 ({ __typeof (RTX) const _rtx = (RTX); \
1190 if (GET_CODE (_rtx) != C1 && GET_CODE (_rtx) != C2 \
1191 && GET_CODE (_rtx) != C3 && GET_CODE (_rtx) != C4 \
1192 && GET_CODE (_rtx) != C5 && GET_CODE (_rtx) != C6 \
1193 && GET_CODE (_rtx) != C7) \
1194 rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \
1195 __FUNCTION__); \
1196 _rtx; })
1198 #define RTL_INSN_CHAIN_FLAG_CHECK(NAME, RTX) \
1199 __extension__ \
1200 ({ __typeof (RTX) const _rtx = (RTX); \
1201 if (!INSN_CHAIN_CODE_P (GET_CODE (_rtx))) \
1202 rtl_check_failed_flag (NAME, _rtx, __FILE__, __LINE__, \
1203 __FUNCTION__); \
1204 _rtx; })
1206 extern void rtl_check_failed_flag (const char *, const_rtx, const char *,
1207 int, const char *)
1208 ATTRIBUTE_NORETURN
1211 #else /* not ENABLE_RTL_FLAG_CHECKING */
1213 #define RTL_FLAG_CHECK1(NAME, RTX, C1) (RTX)
1214 #define RTL_FLAG_CHECK2(NAME, RTX, C1, C2) (RTX)
1215 #define RTL_FLAG_CHECK3(NAME, RTX, C1, C2, C3) (RTX)
1216 #define RTL_FLAG_CHECK4(NAME, RTX, C1, C2, C3, C4) (RTX)
1217 #define RTL_FLAG_CHECK5(NAME, RTX, C1, C2, C3, C4, C5) (RTX)
1218 #define RTL_FLAG_CHECK6(NAME, RTX, C1, C2, C3, C4, C5, C6) (RTX)
1219 #define RTL_FLAG_CHECK7(NAME, RTX, C1, C2, C3, C4, C5, C6, C7) (RTX)
1220 #define RTL_INSN_CHAIN_FLAG_CHECK(NAME, RTX) (RTX)
1221 #endif
1223 #define XINT(RTX, N) (RTL_CHECK2 (RTX, N, 'i', 'n').rt_int)
1224 #define XUINT(RTX, N) (RTL_CHECK2 (RTX, N, 'i', 'n').rt_uint)
1225 #define XSTR(RTX, N) (RTL_CHECK2 (RTX, N, 's', 'S').rt_str)
1226 #define XEXP(RTX, N) (RTL_CHECK2 (RTX, N, 'e', 'u').rt_rtx)
1227 #define XVEC(RTX, N) (RTL_CHECK2 (RTX, N, 'E', 'V').rt_rtvec)
1228 #define XMODE(RTX, N) (RTL_CHECK1 (RTX, N, 'M').rt_type)
1229 #define XTREE(RTX, N) (RTL_CHECK1 (RTX, N, 't').rt_tree)
1230 #define XBBDEF(RTX, N) (RTL_CHECK1 (RTX, N, 'B').rt_bb)
1231 #define XTMPL(RTX, N) (RTL_CHECK1 (RTX, N, 'T').rt_str)
1232 #define XCFI(RTX, N) (RTL_CHECK1 (RTX, N, 'C').rt_cfi)
1234 #define XVECEXP(RTX, N, M) RTVEC_ELT (XVEC (RTX, N), M)
1235 #define XVECLEN(RTX, N) GET_NUM_ELEM (XVEC (RTX, N))
1237 /* These are like XINT, etc. except that they expect a '0' field instead
1238 of the normal type code. */
1240 #define X0INT(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_int)
1241 #define X0UINT(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_uint)
1242 #define X0STR(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_str)
1243 #define X0EXP(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_rtx)
1244 #define X0VEC(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_rtvec)
1245 #define X0MODE(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_type)
1246 #define X0TREE(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_tree)
1247 #define X0BBDEF(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_bb)
1248 #define X0ADVFLAGS(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_addr_diff_vec_flags)
1249 #define X0CSELIB(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_cselib)
1250 #define X0MEMATTR(RTX, N) (RTL_CHECKC1 (RTX, N, MEM).rt_mem)
1251 #define X0REGATTR(RTX, N) (RTL_CHECKC1 (RTX, N, REG).rt_reg)
1252 #define X0CONSTANT(RTX, N) (RTL_CHECK1 (RTX, N, '0').rt_constant)
1254 /* Access a '0' field with any type. */
1255 #define X0ANY(RTX, N) RTL_CHECK1 (RTX, N, '0')
1257 #define XCINT(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_int)
1258 #define XCUINT(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_uint)
1259 #define XCSTR(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_str)
1260 #define XCEXP(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_rtx)
1261 #define XCVEC(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_rtvec)
1262 #define XCMODE(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_type)
1263 #define XCTREE(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_tree)
1264 #define XCBBDEF(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_bb)
1265 #define XCCFI(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_cfi)
1266 #define XCCSELIB(RTX, N, C) (RTL_CHECKC1 (RTX, N, C).rt_cselib)
1268 #define XCVECEXP(RTX, N, M, C) RTVEC_ELT (XCVEC (RTX, N, C), M)
1269 #define XCVECLEN(RTX, N, C) GET_NUM_ELEM (XCVEC (RTX, N, C))
1271 #define XC2EXP(RTX, N, C1, C2) (RTL_CHECKC2 (RTX, N, C1, C2).rt_rtx)
1274 /* Methods of rtx_expr_list. */
1276 inline rtx_expr_list *rtx_expr_list::next () const
1278 rtx tmp = XEXP (this, 1);
1279 return safe_as_a <rtx_expr_list *> (tmp);
1282 inline rtx rtx_expr_list::element () const
1284 return XEXP (this, 0);
1287 /* Methods of rtx_insn_list. */
1289 inline rtx_insn_list *rtx_insn_list::next () const
1291 rtx tmp = XEXP (this, 1);
1292 return safe_as_a <rtx_insn_list *> (tmp);
1295 inline rtx_insn *rtx_insn_list::insn () const
1297 rtx tmp = XEXP (this, 0);
1298 return safe_as_a <rtx_insn *> (tmp);
1301 /* Methods of rtx_sequence. */
1303 inline int rtx_sequence::len () const
1305 return XVECLEN (this, 0);
1308 inline rtx rtx_sequence::element (int index) const
1310 return XVECEXP (this, 0, index);
1313 inline rtx_insn *rtx_sequence::insn (int index) const
1315 return as_a <rtx_insn *> (XVECEXP (this, 0, index));
1318 /* ACCESS MACROS for particular fields of insns. */
1320 /* Holds a unique number for each insn.
1321 These are not necessarily sequentially increasing. */
1322 inline int INSN_UID (const_rtx insn)
1324 return RTL_INSN_CHAIN_FLAG_CHECK ("INSN_UID",
1325 (insn))->u2.insn_uid;
1327 inline int& INSN_UID (rtx insn)
1329 return RTL_INSN_CHAIN_FLAG_CHECK ("INSN_UID",
1330 (insn))->u2.insn_uid;
1333 /* Chain insns together in sequence. */
1335 /* For now these are split in two: an rvalue form:
1336 PREV_INSN/NEXT_INSN
1337 and an lvalue form:
1338 SET_NEXT_INSN/SET_PREV_INSN. */
1340 inline rtx_insn *PREV_INSN (const rtx_insn *insn)
1342 rtx prev = XEXP (insn, 0);
1343 return safe_as_a <rtx_insn *> (prev);
1346 inline rtx& SET_PREV_INSN (rtx_insn *insn)
1348 return XEXP (insn, 0);
1351 inline rtx_insn *NEXT_INSN (const rtx_insn *insn)
1353 rtx next = XEXP (insn, 1);
1354 return safe_as_a <rtx_insn *> (next);
1357 inline rtx& SET_NEXT_INSN (rtx_insn *insn)
1359 return XEXP (insn, 1);
1362 inline basic_block BLOCK_FOR_INSN (const_rtx insn)
1364 return XBBDEF (insn, 2);
1367 inline basic_block& BLOCK_FOR_INSN (rtx insn)
1369 return XBBDEF (insn, 2);
1372 inline void set_block_for_insn (rtx_insn *insn, basic_block bb)
1374 BLOCK_FOR_INSN (insn) = bb;
1377 /* The body of an insn. */
1378 inline rtx PATTERN (const_rtx insn)
1380 return XEXP (insn, 3);
1383 inline rtx& PATTERN (rtx insn)
1385 return XEXP (insn, 3);
1388 inline unsigned int INSN_LOCATION (const rtx_insn *insn)
1390 return XUINT (insn, 4);
1393 inline unsigned int& INSN_LOCATION (rtx_insn *insn)
1395 return XUINT (insn, 4);
1398 inline bool INSN_HAS_LOCATION (const rtx_insn *insn)
1400 return LOCATION_LOCUS (INSN_LOCATION (insn)) != UNKNOWN_LOCATION;
1403 /* LOCATION of an RTX if relevant. */
1404 #define RTL_LOCATION(X) (INSN_P (X) ? \
1405 INSN_LOCATION (as_a <rtx_insn *> (X)) \
1406 : UNKNOWN_LOCATION)
1408 /* Code number of instruction, from when it was recognized.
1409 -1 means this instruction has not been recognized yet. */
1410 #define INSN_CODE(INSN) XINT (INSN, 5)
1412 inline rtvec rtx_jump_table_data::get_labels () const
1414 rtx pat = PATTERN (this);
1415 if (GET_CODE (pat) == ADDR_VEC)
1416 return XVEC (pat, 0);
1417 else
1418 return XVEC (pat, 1); /* presumably an ADDR_DIFF_VEC */
1421 #define RTX_FRAME_RELATED_P(RTX) \
1422 (RTL_FLAG_CHECK6 ("RTX_FRAME_RELATED_P", (RTX), DEBUG_INSN, INSN, \
1423 CALL_INSN, JUMP_INSN, BARRIER, SET)->frame_related)
1425 /* 1 if JUMP RTX is a crossing jump. */
1426 #define CROSSING_JUMP_P(RTX) \
1427 (RTL_FLAG_CHECK1 ("CROSSING_JUMP_P", (RTX), JUMP_INSN)->jump)
1429 /* 1 if RTX is a call to a const function. Built from ECF_CONST and
1430 TREE_READONLY. */
1431 #define RTL_CONST_CALL_P(RTX) \
1432 (RTL_FLAG_CHECK1 ("RTL_CONST_CALL_P", (RTX), CALL_INSN)->unchanging)
1434 /* 1 if RTX is a call to a pure function. Built from ECF_PURE and
1435 DECL_PURE_P. */
1436 #define RTL_PURE_CALL_P(RTX) \
1437 (RTL_FLAG_CHECK1 ("RTL_PURE_CALL_P", (RTX), CALL_INSN)->return_val)
1439 /* 1 if RTX is a call to a const or pure function. */
1440 #define RTL_CONST_OR_PURE_CALL_P(RTX) \
1441 (RTL_CONST_CALL_P (RTX) || RTL_PURE_CALL_P (RTX))
1443 /* 1 if RTX is a call to a looping const or pure function. Built from
1444 ECF_LOOPING_CONST_OR_PURE and DECL_LOOPING_CONST_OR_PURE_P. */
1445 #define RTL_LOOPING_CONST_OR_PURE_CALL_P(RTX) \
1446 (RTL_FLAG_CHECK1 ("CONST_OR_PURE_CALL_P", (RTX), CALL_INSN)->call)
1448 /* 1 if RTX is a call_insn for a sibling call. */
1449 #define SIBLING_CALL_P(RTX) \
1450 (RTL_FLAG_CHECK1 ("SIBLING_CALL_P", (RTX), CALL_INSN)->jump)
1452 /* 1 if RTX is a jump_insn, call_insn, or insn that is an annulling branch. */
1453 #define INSN_ANNULLED_BRANCH_P(RTX) \
1454 (RTL_FLAG_CHECK1 ("INSN_ANNULLED_BRANCH_P", (RTX), JUMP_INSN)->unchanging)
1456 /* 1 if RTX is an insn in a delay slot and is from the target of the branch.
1457 If the branch insn has INSN_ANNULLED_BRANCH_P set, this insn should only be
1458 executed if the branch is taken. For annulled branches with this bit
1459 clear, the insn should be executed only if the branch is not taken. */
1460 #define INSN_FROM_TARGET_P(RTX) \
1461 (RTL_FLAG_CHECK3 ("INSN_FROM_TARGET_P", (RTX), INSN, JUMP_INSN, \
1462 CALL_INSN)->in_struct)
1464 /* In an ADDR_DIFF_VEC, the flags for RTX for use by branch shortening.
1465 See the comments for ADDR_DIFF_VEC in rtl.def. */
1466 #define ADDR_DIFF_VEC_FLAGS(RTX) X0ADVFLAGS (RTX, 4)
1468 /* In a VALUE, the value cselib has assigned to RTX.
1469 This is a "struct cselib_val", see cselib.h. */
1470 #define CSELIB_VAL_PTR(RTX) X0CSELIB (RTX, 0)
1472 /* Holds a list of notes on what this insn does to various REGs.
1473 It is a chain of EXPR_LIST rtx's, where the second operand is the
1474 chain pointer and the first operand is the REG being described.
1475 The mode field of the EXPR_LIST contains not a real machine mode
1476 but a value from enum reg_note. */
1477 #define REG_NOTES(INSN) XEXP(INSN, 6)
1479 /* In an ENTRY_VALUE this is the DECL_INCOMING_RTL of the argument in
1480 question. */
1481 #define ENTRY_VALUE_EXP(RTX) (RTL_CHECKC1 (RTX, 0, ENTRY_VALUE).rt_rtx)
1483 enum reg_note
1485 #define DEF_REG_NOTE(NAME) NAME,
1486 #include "reg-notes.def"
1487 #undef DEF_REG_NOTE
1488 REG_NOTE_MAX
1491 /* Define macros to extract and insert the reg-note kind in an EXPR_LIST. */
1492 #define REG_NOTE_KIND(LINK) ((enum reg_note) GET_MODE (LINK))
1493 #define PUT_REG_NOTE_KIND(LINK, KIND) \
1494 PUT_MODE (LINK, (machine_mode) (KIND))
1496 /* Names for REG_NOTE's in EXPR_LIST insn's. */
1498 extern const char * const reg_note_name[];
1499 #define GET_REG_NOTE_NAME(MODE) (reg_note_name[(int) (MODE)])
1501 /* This field is only present on CALL_INSNs. It holds a chain of EXPR_LIST of
1502 USE and CLOBBER expressions.
1503 USE expressions list the registers filled with arguments that
1504 are passed to the function.
1505 CLOBBER expressions document the registers explicitly clobbered
1506 by this CALL_INSN.
1507 Pseudo registers can not be mentioned in this list. */
1508 #define CALL_INSN_FUNCTION_USAGE(INSN) XEXP(INSN, 7)
1510 /* The label-number of a code-label. The assembler label
1511 is made from `L' and the label-number printed in decimal.
1512 Label numbers are unique in a compilation. */
1513 #define CODE_LABEL_NUMBER(INSN) XINT (INSN, 5)
1515 /* In a NOTE that is a line number, this is a string for the file name that the
1516 line is in. We use the same field to record block numbers temporarily in
1517 NOTE_INSN_BLOCK_BEG and NOTE_INSN_BLOCK_END notes. (We avoid lots of casts
1518 between ints and pointers if we use a different macro for the block number.)
1521 /* Opaque data. */
1522 #define NOTE_DATA(INSN) RTL_CHECKC1 (INSN, 3, NOTE)
1523 #define NOTE_DELETED_LABEL_NAME(INSN) XCSTR (INSN, 3, NOTE)
1524 #define SET_INSN_DELETED(INSN) set_insn_deleted (INSN);
1525 #define NOTE_BLOCK(INSN) XCTREE (INSN, 3, NOTE)
1526 #define NOTE_EH_HANDLER(INSN) XCINT (INSN, 3, NOTE)
1527 #define NOTE_BASIC_BLOCK(INSN) XCBBDEF (INSN, 3, NOTE)
1528 #define NOTE_VAR_LOCATION(INSN) XCEXP (INSN, 3, NOTE)
1529 #define NOTE_CFI(INSN) XCCFI (INSN, 3, NOTE)
1530 #define NOTE_LABEL_NUMBER(INSN) XCINT (INSN, 3, NOTE)
1532 /* In a NOTE that is a line number, this is the line number.
1533 Other kinds of NOTEs are identified by negative numbers here. */
1534 #define NOTE_KIND(INSN) XCINT (INSN, 4, NOTE)
1536 /* Nonzero if INSN is a note marking the beginning of a basic block. */
1537 #define NOTE_INSN_BASIC_BLOCK_P(INSN) \
1538 (NOTE_P (INSN) && NOTE_KIND (INSN) == NOTE_INSN_BASIC_BLOCK)
1540 /* Variable declaration and the location of a variable. */
1541 #define PAT_VAR_LOCATION_DECL(PAT) (XCTREE ((PAT), 0, VAR_LOCATION))
1542 #define PAT_VAR_LOCATION_LOC(PAT) (XCEXP ((PAT), 1, VAR_LOCATION))
1544 /* Initialization status of the variable in the location. Status
1545 can be unknown, uninitialized or initialized. See enumeration
1546 type below. */
1547 #define PAT_VAR_LOCATION_STATUS(PAT) \
1548 (RTL_FLAG_CHECK1 ("PAT_VAR_LOCATION_STATUS", PAT, VAR_LOCATION) \
1549 ->u2.var_location_status)
1551 /* Accessors for a NOTE_INSN_VAR_LOCATION. */
1552 #define NOTE_VAR_LOCATION_DECL(NOTE) \
1553 PAT_VAR_LOCATION_DECL (NOTE_VAR_LOCATION (NOTE))
1554 #define NOTE_VAR_LOCATION_LOC(NOTE) \
1555 PAT_VAR_LOCATION_LOC (NOTE_VAR_LOCATION (NOTE))
1556 #define NOTE_VAR_LOCATION_STATUS(NOTE) \
1557 PAT_VAR_LOCATION_STATUS (NOTE_VAR_LOCATION (NOTE))
1559 /* The VAR_LOCATION rtx in a DEBUG_INSN. */
1560 #define INSN_VAR_LOCATION(INSN) PATTERN (INSN)
1562 /* Accessors for a tree-expanded var location debug insn. */
1563 #define INSN_VAR_LOCATION_DECL(INSN) \
1564 PAT_VAR_LOCATION_DECL (INSN_VAR_LOCATION (INSN))
1565 #define INSN_VAR_LOCATION_LOC(INSN) \
1566 PAT_VAR_LOCATION_LOC (INSN_VAR_LOCATION (INSN))
1567 #define INSN_VAR_LOCATION_STATUS(INSN) \
1568 PAT_VAR_LOCATION_STATUS (INSN_VAR_LOCATION (INSN))
1570 /* Expand to the RTL that denotes an unknown variable location in a
1571 DEBUG_INSN. */
1572 #define gen_rtx_UNKNOWN_VAR_LOC() (gen_rtx_CLOBBER (VOIDmode, const0_rtx))
1574 /* Determine whether X is such an unknown location. */
1575 #define VAR_LOC_UNKNOWN_P(X) \
1576 (GET_CODE (X) == CLOBBER && XEXP ((X), 0) == const0_rtx)
1578 /* 1 if RTX is emitted after a call, but it should take effect before
1579 the call returns. */
1580 #define NOTE_DURING_CALL_P(RTX) \
1581 (RTL_FLAG_CHECK1 ("NOTE_VAR_LOCATION_DURING_CALL_P", (RTX), NOTE)->call)
1583 /* DEBUG_EXPR_DECL corresponding to a DEBUG_EXPR RTX. */
1584 #define DEBUG_EXPR_TREE_DECL(RTX) XCTREE (RTX, 0, DEBUG_EXPR)
1586 /* VAR_DECL/PARM_DECL DEBUG_IMPLICIT_PTR takes address of. */
1587 #define DEBUG_IMPLICIT_PTR_DECL(RTX) XCTREE (RTX, 0, DEBUG_IMPLICIT_PTR)
1589 /* PARM_DECL DEBUG_PARAMETER_REF references. */
1590 #define DEBUG_PARAMETER_REF_DECL(RTX) XCTREE (RTX, 0, DEBUG_PARAMETER_REF)
1592 /* Codes that appear in the NOTE_KIND field for kinds of notes
1593 that are not line numbers. These codes are all negative.
1595 Notice that we do not try to use zero here for any of
1596 the special note codes because sometimes the source line
1597 actually can be zero! This happens (for example) when we
1598 are generating code for the per-translation-unit constructor
1599 and destructor routines for some C++ translation unit. */
1601 enum insn_note
1603 #define DEF_INSN_NOTE(NAME) NAME,
1604 #include "insn-notes.def"
1605 #undef DEF_INSN_NOTE
1607 NOTE_INSN_MAX
1610 /* Names for NOTE insn's other than line numbers. */
1612 extern const char * const note_insn_name[NOTE_INSN_MAX];
1613 #define GET_NOTE_INSN_NAME(NOTE_CODE) \
1614 (note_insn_name[(NOTE_CODE)])
1616 /* The name of a label, in case it corresponds to an explicit label
1617 in the input source code. */
1618 #define LABEL_NAME(RTX) XCSTR (RTX, 6, CODE_LABEL)
1620 /* In jump.c, each label contains a count of the number
1621 of LABEL_REFs that point at it, so unused labels can be deleted. */
1622 #define LABEL_NUSES(RTX) XCINT (RTX, 4, CODE_LABEL)
1624 /* Labels carry a two-bit field composed of the ->jump and ->call
1625 bits. This field indicates whether the label is an alternate
1626 entry point, and if so, what kind. */
1627 enum label_kind
1629 LABEL_NORMAL = 0, /* ordinary label */
1630 LABEL_STATIC_ENTRY, /* alternate entry point, not exported */
1631 LABEL_GLOBAL_ENTRY, /* alternate entry point, exported */
1632 LABEL_WEAK_ENTRY /* alternate entry point, exported as weak symbol */
1635 #if defined ENABLE_RTL_FLAG_CHECKING && (GCC_VERSION > 2007)
1637 /* Retrieve the kind of LABEL. */
1638 #define LABEL_KIND(LABEL) __extension__ \
1639 ({ __typeof (LABEL) const _label = (LABEL); \
1640 if (! LABEL_P (_label)) \
1641 rtl_check_failed_flag ("LABEL_KIND", _label, __FILE__, __LINE__, \
1642 __FUNCTION__); \
1643 (enum label_kind) ((_label->jump << 1) | _label->call); })
1645 /* Set the kind of LABEL. */
1646 #define SET_LABEL_KIND(LABEL, KIND) do { \
1647 __typeof (LABEL) const _label = (LABEL); \
1648 const unsigned int _kind = (KIND); \
1649 if (! LABEL_P (_label)) \
1650 rtl_check_failed_flag ("SET_LABEL_KIND", _label, __FILE__, __LINE__, \
1651 __FUNCTION__); \
1652 _label->jump = ((_kind >> 1) & 1); \
1653 _label->call = (_kind & 1); \
1654 } while (0)
1656 #else
1658 /* Retrieve the kind of LABEL. */
1659 #define LABEL_KIND(LABEL) \
1660 ((enum label_kind) (((LABEL)->jump << 1) | (LABEL)->call))
1662 /* Set the kind of LABEL. */
1663 #define SET_LABEL_KIND(LABEL, KIND) do { \
1664 rtx const _label = (LABEL); \
1665 const unsigned int _kind = (KIND); \
1666 _label->jump = ((_kind >> 1) & 1); \
1667 _label->call = (_kind & 1); \
1668 } while (0)
1670 #endif /* rtl flag checking */
1672 #define LABEL_ALT_ENTRY_P(LABEL) (LABEL_KIND (LABEL) != LABEL_NORMAL)
1674 /* In jump.c, each JUMP_INSN can point to a label that it can jump to,
1675 so that if the JUMP_INSN is deleted, the label's LABEL_NUSES can
1676 be decremented and possibly the label can be deleted. */
1677 #define JUMP_LABEL(INSN) XCEXP (INSN, 7, JUMP_INSN)
1679 inline rtx_insn *JUMP_LABEL_AS_INSN (const rtx_insn *insn)
1681 return safe_as_a <rtx_insn *> (JUMP_LABEL (insn));
1684 /* Once basic blocks are found, each CODE_LABEL starts a chain that
1685 goes through all the LABEL_REFs that jump to that label. The chain
1686 eventually winds up at the CODE_LABEL: it is circular. */
1687 #define LABEL_REFS(LABEL) XCEXP (LABEL, 3, CODE_LABEL)
1689 /* Get the label that a LABEL_REF references. */
1690 #define LABEL_REF_LABEL(LABREF) XCEXP (LABREF, 0, LABEL_REF)
1693 /* For a REG rtx, REGNO extracts the register number. REGNO can only
1694 be used on RHS. Use SET_REGNO to change the value. */
1695 #define REGNO(RTX) (rhs_regno(RTX))
1696 #define SET_REGNO(RTX,N) \
1697 (df_ref_change_reg_with_loc (REGNO (RTX), N, RTX), XCUINT (RTX, 0, REG) = N)
1698 #define SET_REGNO_RAW(RTX,N) (XCUINT (RTX, 0, REG) = N)
1700 /* ORIGINAL_REGNO holds the number the register originally had; for a
1701 pseudo register turned into a hard reg this will hold the old pseudo
1702 register number. */
1703 #define ORIGINAL_REGNO(RTX) \
1704 (RTL_FLAG_CHECK1 ("ORIGINAL_REGNO", (RTX), REG)->u2.original_regno)
1706 /* Force the REGNO macro to only be used on the lhs. */
1707 static inline unsigned int
1708 rhs_regno (const_rtx x)
1710 return XCUINT (x, 0, REG);
1714 /* 1 if RTX is a reg or parallel that is the current function's return
1715 value. */
1716 #define REG_FUNCTION_VALUE_P(RTX) \
1717 (RTL_FLAG_CHECK2 ("REG_FUNCTION_VALUE_P", (RTX), REG, PARALLEL)->return_val)
1719 /* 1 if RTX is a reg that corresponds to a variable declared by the user. */
1720 #define REG_USERVAR_P(RTX) \
1721 (RTL_FLAG_CHECK1 ("REG_USERVAR_P", (RTX), REG)->volatil)
1723 /* 1 if RTX is a reg that holds a pointer value. */
1724 #define REG_POINTER(RTX) \
1725 (RTL_FLAG_CHECK1 ("REG_POINTER", (RTX), REG)->frame_related)
1727 /* 1 if RTX is a mem that holds a pointer value. */
1728 #define MEM_POINTER(RTX) \
1729 (RTL_FLAG_CHECK1 ("MEM_POINTER", (RTX), MEM)->frame_related)
1731 /* 1 if the given register REG corresponds to a hard register. */
1732 #define HARD_REGISTER_P(REG) (HARD_REGISTER_NUM_P (REGNO (REG)))
1734 /* 1 if the given register number REG_NO corresponds to a hard register. */
1735 #define HARD_REGISTER_NUM_P(REG_NO) ((REG_NO) < FIRST_PSEUDO_REGISTER)
1737 /* For a CONST_INT rtx, INTVAL extracts the integer. */
1738 #define INTVAL(RTX) XCWINT (RTX, 0, CONST_INT)
1739 #define UINTVAL(RTX) ((unsigned HOST_WIDE_INT) INTVAL (RTX))
1741 /* For a CONST_WIDE_INT, CONST_WIDE_INT_NUNITS is the number of
1742 elements actually needed to represent the constant.
1743 CONST_WIDE_INT_ELT gets one of the elements. 0 is the least
1744 significant HOST_WIDE_INT. */
1745 #define CONST_WIDE_INT_VEC(RTX) HWIVEC_CHECK (RTX, CONST_WIDE_INT)
1746 #define CONST_WIDE_INT_NUNITS(RTX) CWI_GET_NUM_ELEM (RTX)
1747 #define CONST_WIDE_INT_ELT(RTX, N) CWI_ELT (RTX, N)
1749 /* For a CONST_DOUBLE:
1750 #if TARGET_SUPPORTS_WIDE_INT == 0
1751 For a VOIDmode, there are two integers CONST_DOUBLE_LOW is the
1752 low-order word and ..._HIGH the high-order.
1753 #endif
1754 For a float, there is a REAL_VALUE_TYPE structure, and
1755 CONST_DOUBLE_REAL_VALUE(r) is a pointer to it. */
1756 #define CONST_DOUBLE_LOW(r) XCMWINT (r, 0, CONST_DOUBLE, VOIDmode)
1757 #define CONST_DOUBLE_HIGH(r) XCMWINT (r, 1, CONST_DOUBLE, VOIDmode)
1758 #define CONST_DOUBLE_REAL_VALUE(r) \
1759 ((const struct real_value *) XCNMPRV (r, CONST_DOUBLE, VOIDmode))
1761 #define CONST_FIXED_VALUE(r) \
1762 ((const struct fixed_value *) XCNMPFV (r, CONST_FIXED, VOIDmode))
1763 #define CONST_FIXED_VALUE_HIGH(r) \
1764 ((HOST_WIDE_INT) (CONST_FIXED_VALUE (r)->data.high))
1765 #define CONST_FIXED_VALUE_LOW(r) \
1766 ((HOST_WIDE_INT) (CONST_FIXED_VALUE (r)->data.low))
1768 /* For a CONST_VECTOR, return element #n. */
1769 #define CONST_VECTOR_ELT(RTX, N) XCVECEXP (RTX, 0, N, CONST_VECTOR)
1771 /* For a CONST_VECTOR, return the number of elements in a vector. */
1772 #define CONST_VECTOR_NUNITS(RTX) XCVECLEN (RTX, 0, CONST_VECTOR)
1774 /* For a SUBREG rtx, SUBREG_REG extracts the value we want a subreg of.
1775 SUBREG_BYTE extracts the byte-number. */
1777 #define SUBREG_REG(RTX) XCEXP (RTX, 0, SUBREG)
1778 #define SUBREG_BYTE(RTX) XCUINT (RTX, 1, SUBREG)
1780 /* in rtlanal.c */
1781 /* Return the right cost to give to an operation
1782 to make the cost of the corresponding register-to-register instruction
1783 N times that of a fast register-to-register instruction. */
1784 #define COSTS_N_INSNS(N) ((N) * 4)
1786 /* Maximum cost of an rtl expression. This value has the special meaning
1787 not to use an rtx with this cost under any circumstances. */
1788 #define MAX_COST INT_MAX
1790 /* Return true if CODE always has VOIDmode. */
1792 static inline bool
1793 always_void_p (enum rtx_code code)
1795 return code == SET;
1798 /* A structure to hold all available cost information about an rtl
1799 expression. */
1800 struct full_rtx_costs
1802 int speed;
1803 int size;
1806 /* Initialize a full_rtx_costs structure C to the maximum cost. */
1807 static inline void
1808 init_costs_to_max (struct full_rtx_costs *c)
1810 c->speed = MAX_COST;
1811 c->size = MAX_COST;
1814 /* Initialize a full_rtx_costs structure C to zero cost. */
1815 static inline void
1816 init_costs_to_zero (struct full_rtx_costs *c)
1818 c->speed = 0;
1819 c->size = 0;
1822 /* Compare two full_rtx_costs structures A and B, returning true
1823 if A < B when optimizing for speed. */
1824 static inline bool
1825 costs_lt_p (struct full_rtx_costs *a, struct full_rtx_costs *b,
1826 bool speed)
1828 if (speed)
1829 return (a->speed < b->speed
1830 || (a->speed == b->speed && a->size < b->size));
1831 else
1832 return (a->size < b->size
1833 || (a->size == b->size && a->speed < b->speed));
1836 /* Increase both members of the full_rtx_costs structure C by the
1837 cost of N insns. */
1838 static inline void
1839 costs_add_n_insns (struct full_rtx_costs *c, int n)
1841 c->speed += COSTS_N_INSNS (n);
1842 c->size += COSTS_N_INSNS (n);
1845 /* Describes the shape of a subreg:
1847 inner_mode == the mode of the SUBREG_REG
1848 offset == the SUBREG_BYTE
1849 outer_mode == the mode of the SUBREG itself. */
1850 struct subreg_shape {
1851 subreg_shape (machine_mode, unsigned int, machine_mode);
1852 bool operator == (const subreg_shape &) const;
1853 bool operator != (const subreg_shape &) const;
1854 unsigned int unique_id () const;
1856 machine_mode inner_mode;
1857 unsigned int offset;
1858 machine_mode outer_mode;
1861 inline
1862 subreg_shape::subreg_shape (machine_mode inner_mode_in,
1863 unsigned int offset_in,
1864 machine_mode outer_mode_in)
1865 : inner_mode (inner_mode_in), offset (offset_in), outer_mode (outer_mode_in)
1868 inline bool
1869 subreg_shape::operator == (const subreg_shape &other) const
1871 return (inner_mode == other.inner_mode
1872 && offset == other.offset
1873 && outer_mode == other.outer_mode);
1876 inline bool
1877 subreg_shape::operator != (const subreg_shape &other) const
1879 return !operator == (other);
1882 /* Return an integer that uniquely identifies this shape. Structures
1883 like rtx_def assume that a mode can fit in an 8-bit bitfield and no
1884 current mode is anywhere near being 65536 bytes in size, so the
1885 id comfortably fits in an int. */
1887 inline unsigned int
1888 subreg_shape::unique_id () const
1890 STATIC_ASSERT (MAX_MACHINE_MODE <= 256);
1891 return (int) inner_mode + ((int) outer_mode << 8) + (offset << 16);
1894 /* Return the shape of a SUBREG rtx. */
1896 static inline subreg_shape
1897 shape_of_subreg (const_rtx x)
1899 return subreg_shape (GET_MODE (SUBREG_REG (x)),
1900 SUBREG_BYTE (x), GET_MODE (x));
1903 /* Information about an address. This structure is supposed to be able
1904 to represent all supported target addresses. Please extend it if it
1905 is not yet general enough. */
1906 struct address_info {
1907 /* The mode of the value being addressed, or VOIDmode if this is
1908 a load-address operation with no known address mode. */
1909 machine_mode mode;
1911 /* The address space. */
1912 addr_space_t as;
1914 /* A pointer to the top-level address. */
1915 rtx *outer;
1917 /* A pointer to the inner address, after all address mutations
1918 have been stripped from the top-level address. It can be one
1919 of the following:
1921 - A {PRE,POST}_{INC,DEC} of *BASE. SEGMENT, INDEX and DISP are null.
1923 - A {PRE,POST}_MODIFY of *BASE. In this case either INDEX or DISP
1924 points to the step value, depending on whether the step is variable
1925 or constant respectively. SEGMENT is null.
1927 - A plain sum of the form SEGMENT + BASE + INDEX + DISP,
1928 with null fields evaluating to 0. */
1929 rtx *inner;
1931 /* Components that make up *INNER. Each one may be null or nonnull.
1932 When nonnull, their meanings are as follows:
1934 - *SEGMENT is the "segment" of memory to which the address refers.
1935 This value is entirely target-specific and is only called a "segment"
1936 because that's its most typical use. It contains exactly one UNSPEC,
1937 pointed to by SEGMENT_TERM. The contents of *SEGMENT do not need
1938 reloading.
1940 - *BASE is a variable expression representing a base address.
1941 It contains exactly one REG, SUBREG or MEM, pointed to by BASE_TERM.
1943 - *INDEX is a variable expression representing an index value.
1944 It may be a scaled expression, such as a MULT. It has exactly
1945 one REG, SUBREG or MEM, pointed to by INDEX_TERM.
1947 - *DISP is a constant, possibly mutated. DISP_TERM points to the
1948 unmutated RTX_CONST_OBJ. */
1949 rtx *segment;
1950 rtx *base;
1951 rtx *index;
1952 rtx *disp;
1954 rtx *segment_term;
1955 rtx *base_term;
1956 rtx *index_term;
1957 rtx *disp_term;
1959 /* In a {PRE,POST}_MODIFY address, this points to a second copy
1960 of BASE_TERM, otherwise it is null. */
1961 rtx *base_term2;
1963 /* ADDRESS if this structure describes an address operand, MEM if
1964 it describes a MEM address. */
1965 enum rtx_code addr_outer_code;
1967 /* If BASE is nonnull, this is the code of the rtx that contains it. */
1968 enum rtx_code base_outer_code;
1970 /* True if this is an RTX_AUTOINC address. */
1971 bool autoinc_p;
1974 /* This is used to bundle an rtx and a mode together so that the pair
1975 can be used with the wi:: routines. If we ever put modes into rtx
1976 integer constants, this should go away and then just pass an rtx in. */
1977 typedef std::pair <rtx, machine_mode> rtx_mode_t;
1979 namespace wi
1981 template <>
1982 struct int_traits <rtx_mode_t>
1984 static const enum precision_type precision_type = VAR_PRECISION;
1985 static const bool host_dependent_precision = false;
1986 /* This ought to be true, except for the special case that BImode
1987 is canonicalized to STORE_FLAG_VALUE, which might be 1. */
1988 static const bool is_sign_extended = false;
1989 static unsigned int get_precision (const rtx_mode_t &);
1990 static wi::storage_ref decompose (HOST_WIDE_INT *, unsigned int,
1991 const rtx_mode_t &);
1995 inline unsigned int
1996 wi::int_traits <rtx_mode_t>::get_precision (const rtx_mode_t &x)
1998 return GET_MODE_PRECISION (x.second);
2001 inline wi::storage_ref
2002 wi::int_traits <rtx_mode_t>::decompose (HOST_WIDE_INT *,
2003 unsigned int precision,
2004 const rtx_mode_t &x)
2006 gcc_checking_assert (precision == get_precision (x));
2007 switch (GET_CODE (x.first))
2009 case CONST_INT:
2010 if (precision < HOST_BITS_PER_WIDE_INT)
2011 /* Nonzero BImodes are stored as STORE_FLAG_VALUE, which on many
2012 targets is 1 rather than -1. */
2013 gcc_checking_assert (INTVAL (x.first)
2014 == sext_hwi (INTVAL (x.first), precision)
2015 || (x.second == BImode && INTVAL (x.first) == 1));
2017 return wi::storage_ref (&INTVAL (x.first), 1, precision);
2019 case CONST_WIDE_INT:
2020 return wi::storage_ref (&CONST_WIDE_INT_ELT (x.first, 0),
2021 CONST_WIDE_INT_NUNITS (x.first), precision);
2023 #if TARGET_SUPPORTS_WIDE_INT == 0
2024 case CONST_DOUBLE:
2025 return wi::storage_ref (&CONST_DOUBLE_LOW (x.first), 2, precision);
2026 #endif
2028 default:
2029 gcc_unreachable ();
2033 namespace wi
2035 hwi_with_prec shwi (HOST_WIDE_INT, machine_mode mode);
2036 wide_int min_value (machine_mode, signop);
2037 wide_int max_value (machine_mode, signop);
2040 inline wi::hwi_with_prec
2041 wi::shwi (HOST_WIDE_INT val, machine_mode mode)
2043 return shwi (val, GET_MODE_PRECISION (mode));
2046 /* Produce the smallest number that is represented in MODE. The precision
2047 is taken from MODE and the sign from SGN. */
2048 inline wide_int
2049 wi::min_value (machine_mode mode, signop sgn)
2051 return min_value (GET_MODE_PRECISION (mode), sgn);
2054 /* Produce the largest number that is represented in MODE. The precision
2055 is taken from MODE and the sign from SGN. */
2056 inline wide_int
2057 wi::max_value (machine_mode mode, signop sgn)
2059 return max_value (GET_MODE_PRECISION (mode), sgn);
2062 extern void init_rtlanal (void);
2063 extern int rtx_cost (rtx, enum rtx_code, int, bool);
2064 extern int address_cost (rtx, machine_mode, addr_space_t, bool);
2065 extern void get_full_rtx_cost (rtx, enum rtx_code, int,
2066 struct full_rtx_costs *);
2067 extern unsigned int subreg_lsb (const_rtx);
2068 extern unsigned int subreg_lsb_1 (machine_mode, machine_mode,
2069 unsigned int);
2070 extern unsigned int subreg_regno_offset (unsigned int, machine_mode,
2071 unsigned int, machine_mode);
2072 extern bool subreg_offset_representable_p (unsigned int, machine_mode,
2073 unsigned int, machine_mode);
2074 extern unsigned int subreg_regno (const_rtx);
2075 extern int simplify_subreg_regno (unsigned int, machine_mode,
2076 unsigned int, machine_mode);
2077 extern unsigned int subreg_nregs (const_rtx);
2078 extern unsigned int subreg_nregs_with_regno (unsigned int, const_rtx);
2079 extern unsigned HOST_WIDE_INT nonzero_bits (const_rtx, machine_mode);
2080 extern unsigned int num_sign_bit_copies (const_rtx, machine_mode);
2081 extern bool constant_pool_constant_p (rtx);
2082 extern bool truncated_to_mode (machine_mode, const_rtx);
2083 extern int low_bitmask_len (machine_mode, unsigned HOST_WIDE_INT);
2084 extern void split_double (rtx, rtx *, rtx *);
2085 extern rtx *strip_address_mutations (rtx *, enum rtx_code * = 0);
2086 extern void decompose_address (struct address_info *, rtx *,
2087 machine_mode, addr_space_t, enum rtx_code);
2088 extern void decompose_lea_address (struct address_info *, rtx *);
2089 extern void decompose_mem_address (struct address_info *, rtx);
2090 extern void update_address (struct address_info *);
2091 extern HOST_WIDE_INT get_index_scale (const struct address_info *);
2092 extern enum rtx_code get_index_code (const struct address_info *);
2094 #ifndef GENERATOR_FILE
2095 /* Return the cost of SET X. SPEED_P is true if optimizing for speed
2096 rather than size. */
2098 static inline int
2099 set_rtx_cost (rtx x, bool speed_p)
2101 return rtx_cost (x, INSN, 4, speed_p);
2104 /* Like set_rtx_cost, but return both the speed and size costs in C. */
2106 static inline void
2107 get_full_set_rtx_cost (rtx x, struct full_rtx_costs *c)
2109 get_full_rtx_cost (x, INSN, 4, c);
2112 /* Return the cost of moving X into a register, relative to the cost
2113 of a register move. SPEED_P is true if optimizing for speed rather
2114 than size. */
2116 static inline int
2117 set_src_cost (rtx x, bool speed_p)
2119 return rtx_cost (x, SET, 1, speed_p);
2122 /* Like set_src_cost, but return both the speed and size costs in C. */
2124 static inline void
2125 get_full_set_src_cost (rtx x, struct full_rtx_costs *c)
2127 get_full_rtx_cost (x, SET, 1, c);
2129 #endif
2131 /* 1 if RTX is a subreg containing a reg that is already known to be
2132 sign- or zero-extended from the mode of the subreg to the mode of
2133 the reg. SUBREG_PROMOTED_UNSIGNED_P gives the signedness of the
2134 extension.
2136 When used as a LHS, is means that this extension must be done
2137 when assigning to SUBREG_REG. */
2139 #define SUBREG_PROMOTED_VAR_P(RTX) \
2140 (RTL_FLAG_CHECK1 ("SUBREG_PROMOTED", (RTX), SUBREG)->in_struct)
2142 /* Valid for subregs which are SUBREG_PROMOTED_VAR_P(). In that case
2143 this gives the necessary extensions:
2144 0 - signed (SPR_SIGNED)
2145 1 - normal unsigned (SPR_UNSIGNED)
2146 2 - value is both sign and unsign extended for mode
2147 (SPR_SIGNED_AND_UNSIGNED).
2148 -1 - pointer unsigned, which most often can be handled like unsigned
2149 extension, except for generating instructions where we need to
2150 emit special code (ptr_extend insns) on some architectures
2151 (SPR_POINTER). */
2153 const int SRP_POINTER = -1;
2154 const int SRP_SIGNED = 0;
2155 const int SRP_UNSIGNED = 1;
2156 const int SRP_SIGNED_AND_UNSIGNED = 2;
2158 /* Sets promoted mode for SUBREG_PROMOTED_VAR_P(). */
2159 #define SUBREG_PROMOTED_SET(RTX, VAL) \
2160 do { \
2161 rtx const _rtx = RTL_FLAG_CHECK1 ("SUBREG_PROMOTED_SET", \
2162 (RTX), SUBREG); \
2163 switch (VAL) \
2165 case SRP_POINTER: \
2166 _rtx->volatil = 0; \
2167 _rtx->unchanging = 0; \
2168 break; \
2169 case SRP_SIGNED: \
2170 _rtx->volatil = 0; \
2171 _rtx->unchanging = 1; \
2172 break; \
2173 case SRP_UNSIGNED: \
2174 _rtx->volatil = 1; \
2175 _rtx->unchanging = 0; \
2176 break; \
2177 case SRP_SIGNED_AND_UNSIGNED: \
2178 _rtx->volatil = 1; \
2179 _rtx->unchanging = 1; \
2180 break; \
2182 } while (0)
2184 /* Gets the value stored in promoted mode for SUBREG_PROMOTED_VAR_P(),
2185 including SRP_SIGNED_AND_UNSIGNED if promoted for
2186 both signed and unsigned. */
2187 #define SUBREG_PROMOTED_GET(RTX) \
2188 (2 * (RTL_FLAG_CHECK1 ("SUBREG_PROMOTED_GET", (RTX), SUBREG)->volatil)\
2189 + (RTX)->unchanging - 1)
2191 /* Returns sign of promoted mode for SUBREG_PROMOTED_VAR_P(). */
2192 #define SUBREG_PROMOTED_SIGN(RTX) \
2193 ((RTL_FLAG_CHECK1 ("SUBREG_PROMOTED_SIGN", (RTX), SUBREG)->volatil) ? 1\
2194 : (RTX)->unchanging - 1)
2196 /* Predicate to check if RTX of SUBREG_PROMOTED_VAR_P() is promoted
2197 for SIGNED type. */
2198 #define SUBREG_PROMOTED_SIGNED_P(RTX) \
2199 (RTL_FLAG_CHECK1 ("SUBREG_PROMOTED_SIGNED_P", (RTX), SUBREG)->unchanging)
2201 /* Predicate to check if RTX of SUBREG_PROMOTED_VAR_P() is promoted
2202 for UNSIGNED type. */
2203 #define SUBREG_PROMOTED_UNSIGNED_P(RTX) \
2204 (RTL_FLAG_CHECK1 ("SUBREG_PROMOTED_UNSIGNED_P", (RTX), SUBREG)->volatil)
2206 /* Checks if RTX of SUBREG_PROMOTED_VAR_P() is promoted for given SIGN. */
2207 #define SUBREG_CHECK_PROMOTED_SIGN(RTX, SIGN) \
2208 ((SIGN) == SRP_POINTER ? SUBREG_PROMOTED_GET (RTX) == SRP_POINTER \
2209 : (SIGN) == SRP_SIGNED ? SUBREG_PROMOTED_SIGNED_P (RTX) \
2210 : SUBREG_PROMOTED_UNSIGNED_P (RTX))
2212 /* True if the subreg was generated by LRA for reload insns. Such
2213 subregs are valid only during LRA. */
2214 #define LRA_SUBREG_P(RTX) \
2215 (RTL_FLAG_CHECK1 ("LRA_SUBREG_P", (RTX), SUBREG)->jump)
2217 /* True if call is instrumented by Pointer Bounds Checker. */
2218 #define CALL_EXPR_WITH_BOUNDS_P(RTX) \
2219 (RTL_FLAG_CHECK1 ("CALL_EXPR_WITH_BOUNDS_P", (RTX), CALL)->jump)
2221 /* Access various components of an ASM_OPERANDS rtx. */
2223 #define ASM_OPERANDS_TEMPLATE(RTX) XCSTR (RTX, 0, ASM_OPERANDS)
2224 #define ASM_OPERANDS_OUTPUT_CONSTRAINT(RTX) XCSTR (RTX, 1, ASM_OPERANDS)
2225 #define ASM_OPERANDS_OUTPUT_IDX(RTX) XCINT (RTX, 2, ASM_OPERANDS)
2226 #define ASM_OPERANDS_INPUT_VEC(RTX) XCVEC (RTX, 3, ASM_OPERANDS)
2227 #define ASM_OPERANDS_INPUT_CONSTRAINT_VEC(RTX) XCVEC (RTX, 4, ASM_OPERANDS)
2228 #define ASM_OPERANDS_INPUT(RTX, N) XCVECEXP (RTX, 3, N, ASM_OPERANDS)
2229 #define ASM_OPERANDS_INPUT_LENGTH(RTX) XCVECLEN (RTX, 3, ASM_OPERANDS)
2230 #define ASM_OPERANDS_INPUT_CONSTRAINT_EXP(RTX, N) \
2231 XCVECEXP (RTX, 4, N, ASM_OPERANDS)
2232 #define ASM_OPERANDS_INPUT_CONSTRAINT(RTX, N) \
2233 XSTR (XCVECEXP (RTX, 4, N, ASM_OPERANDS), 0)
2234 #define ASM_OPERANDS_INPUT_MODE(RTX, N) \
2235 GET_MODE (XCVECEXP (RTX, 4, N, ASM_OPERANDS))
2236 #define ASM_OPERANDS_LABEL_VEC(RTX) XCVEC (RTX, 5, ASM_OPERANDS)
2237 #define ASM_OPERANDS_LABEL_LENGTH(RTX) XCVECLEN (RTX, 5, ASM_OPERANDS)
2238 #define ASM_OPERANDS_LABEL(RTX, N) XCVECEXP (RTX, 5, N, ASM_OPERANDS)
2239 #define ASM_OPERANDS_SOURCE_LOCATION(RTX) XCUINT (RTX, 6, ASM_OPERANDS)
2240 #define ASM_INPUT_SOURCE_LOCATION(RTX) XCUINT (RTX, 1, ASM_INPUT)
2242 /* 1 if RTX is a mem that is statically allocated in read-only memory. */
2243 #define MEM_READONLY_P(RTX) \
2244 (RTL_FLAG_CHECK1 ("MEM_READONLY_P", (RTX), MEM)->unchanging)
2246 /* 1 if RTX is a mem and we should keep the alias set for this mem
2247 unchanged when we access a component. Set to 1, or example, when we
2248 are already in a non-addressable component of an aggregate. */
2249 #define MEM_KEEP_ALIAS_SET_P(RTX) \
2250 (RTL_FLAG_CHECK1 ("MEM_KEEP_ALIAS_SET_P", (RTX), MEM)->jump)
2252 /* 1 if RTX is a mem or asm_operand for a volatile reference. */
2253 #define MEM_VOLATILE_P(RTX) \
2254 (RTL_FLAG_CHECK3 ("MEM_VOLATILE_P", (RTX), MEM, ASM_OPERANDS, \
2255 ASM_INPUT)->volatil)
2257 /* 1 if RTX is a mem that cannot trap. */
2258 #define MEM_NOTRAP_P(RTX) \
2259 (RTL_FLAG_CHECK1 ("MEM_NOTRAP_P", (RTX), MEM)->call)
2261 /* The memory attribute block. We provide access macros for each value
2262 in the block and provide defaults if none specified. */
2263 #define MEM_ATTRS(RTX) X0MEMATTR (RTX, 1)
2265 /* The register attribute block. We provide access macros for each value
2266 in the block and provide defaults if none specified. */
2267 #define REG_ATTRS(RTX) X0REGATTR (RTX, 1)
2269 #ifndef GENERATOR_FILE
2270 /* For a MEM rtx, the alias set. If 0, this MEM is not in any alias
2271 set, and may alias anything. Otherwise, the MEM can only alias
2272 MEMs in a conflicting alias set. This value is set in a
2273 language-dependent manner in the front-end, and should not be
2274 altered in the back-end. These set numbers are tested with
2275 alias_sets_conflict_p. */
2276 #define MEM_ALIAS_SET(RTX) (get_mem_attrs (RTX)->alias)
2278 /* For a MEM rtx, the decl it is known to refer to, if it is known to
2279 refer to part of a DECL. It may also be a COMPONENT_REF. */
2280 #define MEM_EXPR(RTX) (get_mem_attrs (RTX)->expr)
2282 /* For a MEM rtx, true if its MEM_OFFSET is known. */
2283 #define MEM_OFFSET_KNOWN_P(RTX) (get_mem_attrs (RTX)->offset_known_p)
2285 /* For a MEM rtx, the offset from the start of MEM_EXPR. */
2286 #define MEM_OFFSET(RTX) (get_mem_attrs (RTX)->offset)
2288 /* For a MEM rtx, the address space. */
2289 #define MEM_ADDR_SPACE(RTX) (get_mem_attrs (RTX)->addrspace)
2291 /* For a MEM rtx, true if its MEM_SIZE is known. */
2292 #define MEM_SIZE_KNOWN_P(RTX) (get_mem_attrs (RTX)->size_known_p)
2294 /* For a MEM rtx, the size in bytes of the MEM. */
2295 #define MEM_SIZE(RTX) (get_mem_attrs (RTX)->size)
2297 /* For a MEM rtx, the alignment in bits. We can use the alignment of the
2298 mode as a default when STRICT_ALIGNMENT, but not if not. */
2299 #define MEM_ALIGN(RTX) (get_mem_attrs (RTX)->align)
2300 #else
2301 #define MEM_ADDR_SPACE(RTX) ADDR_SPACE_GENERIC
2302 #endif
2304 /* For a REG rtx, the decl it is known to refer to, if it is known to
2305 refer to part of a DECL. */
2306 #define REG_EXPR(RTX) (REG_ATTRS (RTX) == 0 ? 0 : REG_ATTRS (RTX)->decl)
2308 /* For a REG rtx, the offset from the start of REG_EXPR, if known, as an
2309 HOST_WIDE_INT. */
2310 #define REG_OFFSET(RTX) (REG_ATTRS (RTX) == 0 ? 0 : REG_ATTRS (RTX)->offset)
2312 /* Copy the attributes that apply to memory locations from RHS to LHS. */
2313 #define MEM_COPY_ATTRIBUTES(LHS, RHS) \
2314 (MEM_VOLATILE_P (LHS) = MEM_VOLATILE_P (RHS), \
2315 MEM_NOTRAP_P (LHS) = MEM_NOTRAP_P (RHS), \
2316 MEM_READONLY_P (LHS) = MEM_READONLY_P (RHS), \
2317 MEM_KEEP_ALIAS_SET_P (LHS) = MEM_KEEP_ALIAS_SET_P (RHS), \
2318 MEM_POINTER (LHS) = MEM_POINTER (RHS), \
2319 MEM_ATTRS (LHS) = MEM_ATTRS (RHS))
2321 /* 1 if RTX is a label_ref for a nonlocal label. */
2322 /* Likewise in an expr_list for a REG_LABEL_OPERAND or
2323 REG_LABEL_TARGET note. */
2324 #define LABEL_REF_NONLOCAL_P(RTX) \
2325 (RTL_FLAG_CHECK1 ("LABEL_REF_NONLOCAL_P", (RTX), LABEL_REF)->volatil)
2327 /* 1 if RTX is a code_label that should always be considered to be needed. */
2328 #define LABEL_PRESERVE_P(RTX) \
2329 (RTL_FLAG_CHECK2 ("LABEL_PRESERVE_P", (RTX), CODE_LABEL, NOTE)->in_struct)
2331 /* During sched, 1 if RTX is an insn that must be scheduled together
2332 with the preceding insn. */
2333 #define SCHED_GROUP_P(RTX) \
2334 (RTL_FLAG_CHECK4 ("SCHED_GROUP_P", (RTX), DEBUG_INSN, INSN, \
2335 JUMP_INSN, CALL_INSN)->in_struct)
2337 /* For a SET rtx, SET_DEST is the place that is set
2338 and SET_SRC is the value it is set to. */
2339 #define SET_DEST(RTX) XC2EXP (RTX, 0, SET, CLOBBER)
2340 #define SET_SRC(RTX) XCEXP (RTX, 1, SET)
2341 #define SET_IS_RETURN_P(RTX) \
2342 (RTL_FLAG_CHECK1 ("SET_IS_RETURN_P", (RTX), SET)->jump)
2344 /* For a TRAP_IF rtx, TRAP_CONDITION is an expression. */
2345 #define TRAP_CONDITION(RTX) XCEXP (RTX, 0, TRAP_IF)
2346 #define TRAP_CODE(RTX) XCEXP (RTX, 1, TRAP_IF)
2348 /* For a COND_EXEC rtx, COND_EXEC_TEST is the condition to base
2349 conditionally executing the code on, COND_EXEC_CODE is the code
2350 to execute if the condition is true. */
2351 #define COND_EXEC_TEST(RTX) XCEXP (RTX, 0, COND_EXEC)
2352 #define COND_EXEC_CODE(RTX) XCEXP (RTX, 1, COND_EXEC)
2354 /* 1 if RTX is a symbol_ref that addresses this function's rtl
2355 constants pool. */
2356 #define CONSTANT_POOL_ADDRESS_P(RTX) \
2357 (RTL_FLAG_CHECK1 ("CONSTANT_POOL_ADDRESS_P", (RTX), SYMBOL_REF)->unchanging)
2359 /* 1 if RTX is a symbol_ref that addresses a value in the file's
2360 tree constant pool. This information is private to varasm.c. */
2361 #define TREE_CONSTANT_POOL_ADDRESS_P(RTX) \
2362 (RTL_FLAG_CHECK1 ("TREE_CONSTANT_POOL_ADDRESS_P", \
2363 (RTX), SYMBOL_REF)->frame_related)
2365 /* Used if RTX is a symbol_ref, for machine-specific purposes. */
2366 #define SYMBOL_REF_FLAG(RTX) \
2367 (RTL_FLAG_CHECK1 ("SYMBOL_REF_FLAG", (RTX), SYMBOL_REF)->volatil)
2369 /* 1 if RTX is a symbol_ref that has been the library function in
2370 emit_library_call. */
2371 #define SYMBOL_REF_USED(RTX) \
2372 (RTL_FLAG_CHECK1 ("SYMBOL_REF_USED", (RTX), SYMBOL_REF)->used)
2374 /* 1 if RTX is a symbol_ref for a weak symbol. */
2375 #define SYMBOL_REF_WEAK(RTX) \
2376 (RTL_FLAG_CHECK1 ("SYMBOL_REF_WEAK", (RTX), SYMBOL_REF)->return_val)
2378 /* A pointer attached to the SYMBOL_REF; either SYMBOL_REF_DECL or
2379 SYMBOL_REF_CONSTANT. */
2380 #define SYMBOL_REF_DATA(RTX) X0ANY ((RTX), 1)
2382 /* Set RTX's SYMBOL_REF_DECL to DECL. RTX must not be a constant
2383 pool symbol. */
2384 #define SET_SYMBOL_REF_DECL(RTX, DECL) \
2385 (gcc_assert (!CONSTANT_POOL_ADDRESS_P (RTX)), X0TREE ((RTX), 1) = (DECL))
2387 /* The tree (decl or constant) associated with the symbol, or null. */
2388 #define SYMBOL_REF_DECL(RTX) \
2389 (CONSTANT_POOL_ADDRESS_P (RTX) ? NULL : X0TREE ((RTX), 1))
2391 /* Set RTX's SYMBOL_REF_CONSTANT to C. RTX must be a constant pool symbol. */
2392 #define SET_SYMBOL_REF_CONSTANT(RTX, C) \
2393 (gcc_assert (CONSTANT_POOL_ADDRESS_P (RTX)), X0CONSTANT ((RTX), 1) = (C))
2395 /* The rtx constant pool entry for a symbol, or null. */
2396 #define SYMBOL_REF_CONSTANT(RTX) \
2397 (CONSTANT_POOL_ADDRESS_P (RTX) ? X0CONSTANT ((RTX), 1) : NULL)
2399 /* A set of flags on a symbol_ref that are, in some respects, redundant with
2400 information derivable from the tree decl associated with this symbol.
2401 Except that we build a *lot* of SYMBOL_REFs that aren't associated with a
2402 decl. In some cases this is a bug. But beyond that, it's nice to cache
2403 this information to avoid recomputing it. Finally, this allows space for
2404 the target to store more than one bit of information, as with
2405 SYMBOL_REF_FLAG. */
2406 #define SYMBOL_REF_FLAGS(RTX) \
2407 (RTL_FLAG_CHECK1 ("SYMBOL_REF_FLAGS", (RTX), SYMBOL_REF) \
2408 ->u2.symbol_ref_flags)
2410 /* These flags are common enough to be defined for all targets. They
2411 are computed by the default version of targetm.encode_section_info. */
2413 /* Set if this symbol is a function. */
2414 #define SYMBOL_FLAG_FUNCTION (1 << 0)
2415 #define SYMBOL_REF_FUNCTION_P(RTX) \
2416 ((SYMBOL_REF_FLAGS (RTX) & SYMBOL_FLAG_FUNCTION) != 0)
2417 /* Set if targetm.binds_local_p is true. */
2418 #define SYMBOL_FLAG_LOCAL (1 << 1)
2419 #define SYMBOL_REF_LOCAL_P(RTX) \
2420 ((SYMBOL_REF_FLAGS (RTX) & SYMBOL_FLAG_LOCAL) != 0)
2421 /* Set if targetm.in_small_data_p is true. */
2422 #define SYMBOL_FLAG_SMALL (1 << 2)
2423 #define SYMBOL_REF_SMALL_P(RTX) \
2424 ((SYMBOL_REF_FLAGS (RTX) & SYMBOL_FLAG_SMALL) != 0)
2425 /* The three-bit field at [5:3] is true for TLS variables; use
2426 SYMBOL_REF_TLS_MODEL to extract the field as an enum tls_model. */
2427 #define SYMBOL_FLAG_TLS_SHIFT 3
2428 #define SYMBOL_REF_TLS_MODEL(RTX) \
2429 ((enum tls_model) ((SYMBOL_REF_FLAGS (RTX) >> SYMBOL_FLAG_TLS_SHIFT) & 7))
2430 /* Set if this symbol is not defined in this translation unit. */
2431 #define SYMBOL_FLAG_EXTERNAL (1 << 6)
2432 #define SYMBOL_REF_EXTERNAL_P(RTX) \
2433 ((SYMBOL_REF_FLAGS (RTX) & SYMBOL_FLAG_EXTERNAL) != 0)
2434 /* Set if this symbol has a block_symbol structure associated with it. */
2435 #define SYMBOL_FLAG_HAS_BLOCK_INFO (1 << 7)
2436 #define SYMBOL_REF_HAS_BLOCK_INFO_P(RTX) \
2437 ((SYMBOL_REF_FLAGS (RTX) & SYMBOL_FLAG_HAS_BLOCK_INFO) != 0)
2438 /* Set if this symbol is a section anchor. SYMBOL_REF_ANCHOR_P implies
2439 SYMBOL_REF_HAS_BLOCK_INFO_P. */
2440 #define SYMBOL_FLAG_ANCHOR (1 << 8)
2441 #define SYMBOL_REF_ANCHOR_P(RTX) \
2442 ((SYMBOL_REF_FLAGS (RTX) & SYMBOL_FLAG_ANCHOR) != 0)
2444 /* Subsequent bits are available for the target to use. */
2445 #define SYMBOL_FLAG_MACH_DEP_SHIFT 9
2446 #define SYMBOL_FLAG_MACH_DEP (1 << SYMBOL_FLAG_MACH_DEP_SHIFT)
2448 /* If SYMBOL_REF_HAS_BLOCK_INFO_P (RTX), this is the object_block
2449 structure to which the symbol belongs, or NULL if it has not been
2450 assigned a block. */
2451 #define SYMBOL_REF_BLOCK(RTX) (BLOCK_SYMBOL_CHECK (RTX)->block)
2453 /* If SYMBOL_REF_HAS_BLOCK_INFO_P (RTX), this is the offset of RTX from
2454 the first object in SYMBOL_REF_BLOCK (RTX). The value is negative if
2455 RTX has not yet been assigned to a block, or it has not been given an
2456 offset within that block. */
2457 #define SYMBOL_REF_BLOCK_OFFSET(RTX) (BLOCK_SYMBOL_CHECK (RTX)->offset)
2459 /* True if RTX is flagged to be a scheduling barrier. */
2460 #define PREFETCH_SCHEDULE_BARRIER_P(RTX) \
2461 (RTL_FLAG_CHECK1 ("PREFETCH_SCHEDULE_BARRIER_P", (RTX), PREFETCH)->volatil)
2463 /* Indicate whether the machine has any sort of auto increment addressing.
2464 If not, we can avoid checking for REG_INC notes. */
2466 #if (defined (HAVE_PRE_INCREMENT) || defined (HAVE_PRE_DECREMENT) \
2467 || defined (HAVE_POST_INCREMENT) || defined (HAVE_POST_DECREMENT) \
2468 || defined (HAVE_PRE_MODIFY_DISP) || defined (HAVE_POST_MODIFY_DISP) \
2469 || defined (HAVE_PRE_MODIFY_REG) || defined (HAVE_POST_MODIFY_REG))
2470 #define AUTO_INC_DEC
2471 #endif
2473 /* Define a macro to look for REG_INC notes,
2474 but save time on machines where they never exist. */
2476 #ifdef AUTO_INC_DEC
2477 #define FIND_REG_INC_NOTE(INSN, REG) \
2478 ((REG) != NULL_RTX && REG_P ((REG)) \
2479 ? find_regno_note ((INSN), REG_INC, REGNO (REG)) \
2480 : find_reg_note ((INSN), REG_INC, (REG)))
2481 #else
2482 #define FIND_REG_INC_NOTE(INSN, REG) 0
2483 #endif
2485 #ifndef HAVE_PRE_INCREMENT
2486 #define HAVE_PRE_INCREMENT 0
2487 #endif
2489 #ifndef HAVE_PRE_DECREMENT
2490 #define HAVE_PRE_DECREMENT 0
2491 #endif
2493 #ifndef HAVE_POST_INCREMENT
2494 #define HAVE_POST_INCREMENT 0
2495 #endif
2497 #ifndef HAVE_POST_DECREMENT
2498 #define HAVE_POST_DECREMENT 0
2499 #endif
2501 #ifndef HAVE_POST_MODIFY_DISP
2502 #define HAVE_POST_MODIFY_DISP 0
2503 #endif
2505 #ifndef HAVE_POST_MODIFY_REG
2506 #define HAVE_POST_MODIFY_REG 0
2507 #endif
2509 #ifndef HAVE_PRE_MODIFY_DISP
2510 #define HAVE_PRE_MODIFY_DISP 0
2511 #endif
2513 #ifndef HAVE_PRE_MODIFY_REG
2514 #define HAVE_PRE_MODIFY_REG 0
2515 #endif
2518 /* Some architectures do not have complete pre/post increment/decrement
2519 instruction sets, or only move some modes efficiently. These macros
2520 allow us to tune autoincrement generation. */
2522 #ifndef USE_LOAD_POST_INCREMENT
2523 #define USE_LOAD_POST_INCREMENT(MODE) HAVE_POST_INCREMENT
2524 #endif
2526 #ifndef USE_LOAD_POST_DECREMENT
2527 #define USE_LOAD_POST_DECREMENT(MODE) HAVE_POST_DECREMENT
2528 #endif
2530 #ifndef USE_LOAD_PRE_INCREMENT
2531 #define USE_LOAD_PRE_INCREMENT(MODE) HAVE_PRE_INCREMENT
2532 #endif
2534 #ifndef USE_LOAD_PRE_DECREMENT
2535 #define USE_LOAD_PRE_DECREMENT(MODE) HAVE_PRE_DECREMENT
2536 #endif
2538 #ifndef USE_STORE_POST_INCREMENT
2539 #define USE_STORE_POST_INCREMENT(MODE) HAVE_POST_INCREMENT
2540 #endif
2542 #ifndef USE_STORE_POST_DECREMENT
2543 #define USE_STORE_POST_DECREMENT(MODE) HAVE_POST_DECREMENT
2544 #endif
2546 #ifndef USE_STORE_PRE_INCREMENT
2547 #define USE_STORE_PRE_INCREMENT(MODE) HAVE_PRE_INCREMENT
2548 #endif
2550 #ifndef USE_STORE_PRE_DECREMENT
2551 #define USE_STORE_PRE_DECREMENT(MODE) HAVE_PRE_DECREMENT
2552 #endif
2554 /* Nonzero when we are generating CONCATs. */
2555 extern int generating_concat_p;
2557 /* Nonzero when we are expanding trees to RTL. */
2558 extern int currently_expanding_to_rtl;
2560 /* Generally useful functions. */
2562 /* In explow.c */
2563 extern HOST_WIDE_INT trunc_int_for_mode (HOST_WIDE_INT, machine_mode);
2564 extern rtx plus_constant (machine_mode, rtx, HOST_WIDE_INT, bool = false);
2566 /* In rtl.c */
2567 extern rtx rtx_alloc_stat (RTX_CODE MEM_STAT_DECL);
2568 #define rtx_alloc(c) rtx_alloc_stat (c MEM_STAT_INFO)
2569 extern rtx rtx_alloc_stat_v (RTX_CODE MEM_STAT_DECL, int);
2570 #define rtx_alloc_v(c, SZ) rtx_alloc_stat_v (c MEM_STAT_INFO, SZ)
2571 #define const_wide_int_alloc(NWORDS) \
2572 rtx_alloc_v (CONST_WIDE_INT, \
2573 (sizeof (struct hwivec_def) \
2574 + ((NWORDS)-1) * sizeof (HOST_WIDE_INT))) \
2576 extern rtvec rtvec_alloc (int);
2577 extern rtvec shallow_copy_rtvec (rtvec);
2578 extern bool shared_const_p (const_rtx);
2579 extern rtx copy_rtx (rtx);
2580 extern void dump_rtx_statistics (void);
2582 /* In emit-rtl.c */
2583 extern rtx copy_rtx_if_shared (rtx);
2585 /* In rtl.c */
2586 extern unsigned int rtx_size (const_rtx);
2587 extern rtx shallow_copy_rtx_stat (const_rtx MEM_STAT_DECL);
2588 #define shallow_copy_rtx(a) shallow_copy_rtx_stat (a MEM_STAT_INFO)
2589 extern int rtx_equal_p (const_rtx, const_rtx);
2591 /* In emit-rtl.c */
2592 extern rtvec gen_rtvec_v (int, rtx *);
2593 extern rtvec gen_rtvec_v (int, rtx_insn **);
2594 extern rtx gen_reg_rtx (machine_mode);
2595 extern rtx gen_rtx_REG_offset (rtx, machine_mode, unsigned int, int);
2596 extern rtx gen_reg_rtx_offset (rtx, machine_mode, int);
2597 extern rtx gen_reg_rtx_and_attrs (rtx);
2598 extern rtx_code_label *gen_label_rtx (void);
2599 extern rtx gen_lowpart_common (machine_mode, rtx);
2601 /* In cse.c */
2602 extern rtx gen_lowpart_if_possible (machine_mode, rtx);
2604 /* In emit-rtl.c */
2605 extern rtx gen_highpart (machine_mode, rtx);
2606 extern rtx gen_highpart_mode (machine_mode, machine_mode, rtx);
2607 extern rtx operand_subword (rtx, unsigned int, int, machine_mode);
2609 /* In emit-rtl.c */
2610 extern rtx operand_subword_force (rtx, unsigned int, machine_mode);
2611 extern bool paradoxical_subreg_p (const_rtx);
2612 extern int subreg_lowpart_p (const_rtx);
2613 extern unsigned int subreg_lowpart_offset (machine_mode,
2614 machine_mode);
2615 extern unsigned int subreg_highpart_offset (machine_mode,
2616 machine_mode);
2617 extern int byte_lowpart_offset (machine_mode, machine_mode);
2618 extern rtx make_safe_from (rtx, rtx);
2619 extern rtx convert_memory_address_addr_space (machine_mode, rtx,
2620 addr_space_t);
2621 #define convert_memory_address(to_mode,x) \
2622 convert_memory_address_addr_space ((to_mode), (x), ADDR_SPACE_GENERIC)
2623 extern const char *get_insn_name (int);
2624 extern rtx_insn *get_last_insn_anywhere (void);
2625 extern rtx_insn *get_first_nonnote_insn (void);
2626 extern rtx_insn *get_last_nonnote_insn (void);
2627 extern void start_sequence (void);
2628 extern void push_to_sequence (rtx_insn *);
2629 extern void push_to_sequence2 (rtx_insn *, rtx_insn *);
2630 extern void end_sequence (void);
2631 #if TARGET_SUPPORTS_WIDE_INT == 0
2632 extern double_int rtx_to_double_int (const_rtx);
2633 #endif
2634 extern void cwi_output_hex (FILE *, const_rtx);
2635 #ifndef GENERATOR_FILE
2636 extern rtx immed_wide_int_const (const wide_int_ref &, machine_mode);
2637 #endif
2638 #if TARGET_SUPPORTS_WIDE_INT == 0
2639 extern rtx immed_double_const (HOST_WIDE_INT, HOST_WIDE_INT,
2640 machine_mode);
2641 #endif
2643 /* In loop-iv.c */
2645 extern rtx lowpart_subreg (machine_mode, rtx, machine_mode);
2647 /* In varasm.c */
2648 extern rtx force_const_mem (machine_mode, rtx);
2650 /* In varasm.c */
2652 struct function;
2653 extern rtx get_pool_constant (const_rtx);
2654 extern rtx get_pool_constant_mark (rtx, bool *);
2655 extern machine_mode get_pool_mode (const_rtx);
2656 extern rtx simplify_subtraction (rtx);
2657 extern void decide_function_section (tree);
2659 /* In emit-rtl.c */
2660 extern rtx_insn *emit_insn_before (rtx, rtx);
2661 extern rtx_insn *emit_insn_before_noloc (rtx, rtx_insn *, basic_block);
2662 extern rtx_insn *emit_insn_before_setloc (rtx, rtx_insn *, int);
2663 extern rtx_insn *emit_jump_insn_before (rtx, rtx);
2664 extern rtx_insn *emit_jump_insn_before_noloc (rtx, rtx_insn *);
2665 extern rtx_insn *emit_jump_insn_before_setloc (rtx, rtx_insn *, int);
2666 extern rtx_insn *emit_call_insn_before (rtx, rtx_insn *);
2667 extern rtx_insn *emit_call_insn_before_noloc (rtx, rtx_insn *);
2668 extern rtx_insn *emit_call_insn_before_setloc (rtx, rtx_insn *, int);
2669 extern rtx_insn *emit_debug_insn_before (rtx, rtx);
2670 extern rtx_insn *emit_debug_insn_before_noloc (rtx, rtx);
2671 extern rtx_insn *emit_debug_insn_before_setloc (rtx, rtx, int);
2672 extern rtx_barrier *emit_barrier_before (rtx);
2673 extern rtx_insn *emit_label_before (rtx, rtx_insn *);
2674 extern rtx_note *emit_note_before (enum insn_note, rtx);
2675 extern rtx_insn *emit_insn_after (rtx, rtx);
2676 extern rtx_insn *emit_insn_after_noloc (rtx, rtx, basic_block);
2677 extern rtx_insn *emit_insn_after_setloc (rtx, rtx, int);
2678 extern rtx_insn *emit_jump_insn_after (rtx, rtx);
2679 extern rtx_insn *emit_jump_insn_after_noloc (rtx, rtx);
2680 extern rtx_insn *emit_jump_insn_after_setloc (rtx, rtx, int);
2681 extern rtx_insn *emit_call_insn_after (rtx, rtx);
2682 extern rtx_insn *emit_call_insn_after_noloc (rtx, rtx);
2683 extern rtx_insn *emit_call_insn_after_setloc (rtx, rtx, int);
2684 extern rtx_insn *emit_debug_insn_after (rtx, rtx);
2685 extern rtx_insn *emit_debug_insn_after_noloc (rtx, rtx);
2686 extern rtx_insn *emit_debug_insn_after_setloc (rtx, rtx, int);
2687 extern rtx_barrier *emit_barrier_after (rtx);
2688 extern rtx_insn *emit_label_after (rtx, rtx_insn *);
2689 extern rtx_note *emit_note_after (enum insn_note, rtx);
2690 extern rtx_insn *emit_insn (rtx);
2691 extern rtx_insn *emit_debug_insn (rtx);
2692 extern rtx_insn *emit_jump_insn (rtx);
2693 extern rtx_insn *emit_call_insn (rtx);
2694 extern rtx_insn *emit_label (rtx);
2695 extern rtx_jump_table_data *emit_jump_table_data (rtx);
2696 extern rtx_barrier *emit_barrier (void);
2697 extern rtx_note *emit_note (enum insn_note);
2698 extern rtx_note *emit_note_copy (rtx_note *);
2699 extern rtx_insn *gen_clobber (rtx);
2700 extern rtx_insn *emit_clobber (rtx);
2701 extern rtx_insn *gen_use (rtx);
2702 extern rtx_insn *emit_use (rtx);
2703 extern rtx_insn *make_insn_raw (rtx);
2704 extern void add_function_usage_to (rtx, rtx);
2705 extern rtx_call_insn *last_call_insn (void);
2706 extern rtx_insn *previous_insn (rtx_insn *);
2707 extern rtx_insn *next_insn (rtx_insn *);
2708 extern rtx_insn *prev_nonnote_insn (rtx);
2709 extern rtx_insn *prev_nonnote_insn_bb (rtx);
2710 extern rtx_insn *next_nonnote_insn (rtx);
2711 extern rtx_insn *next_nonnote_insn_bb (rtx_insn *);
2712 extern rtx_insn *prev_nondebug_insn (rtx);
2713 extern rtx_insn *next_nondebug_insn (rtx);
2714 extern rtx_insn *prev_nonnote_nondebug_insn (rtx);
2715 extern rtx_insn *next_nonnote_nondebug_insn (rtx);
2716 extern rtx_insn *prev_real_insn (rtx);
2717 extern rtx_insn *next_real_insn (rtx);
2718 extern rtx_insn *prev_active_insn (rtx);
2719 extern rtx_insn *next_active_insn (rtx);
2720 extern int active_insn_p (const_rtx);
2721 extern rtx_insn *next_cc0_user (rtx);
2722 extern rtx_insn *prev_cc0_setter (rtx_insn *);
2724 /* In emit-rtl.c */
2725 extern int insn_line (const rtx_insn *);
2726 extern const char * insn_file (const rtx_insn *);
2727 extern tree insn_scope (const rtx_insn *);
2728 extern expanded_location insn_location (const rtx_insn *);
2729 extern location_t prologue_location, epilogue_location;
2731 /* In jump.c */
2732 extern enum rtx_code reverse_condition (enum rtx_code);
2733 extern enum rtx_code reverse_condition_maybe_unordered (enum rtx_code);
2734 extern enum rtx_code swap_condition (enum rtx_code);
2735 extern enum rtx_code unsigned_condition (enum rtx_code);
2736 extern enum rtx_code signed_condition (enum rtx_code);
2737 extern void mark_jump_label (rtx, rtx_insn *, int);
2739 /* In jump.c */
2740 extern rtx_insn *delete_related_insns (rtx);
2742 /* In recog.c */
2743 extern rtx *find_constant_term_loc (rtx *);
2745 /* In emit-rtl.c */
2746 extern rtx_insn *try_split (rtx, rtx, int);
2747 extern int split_branch_probability;
2749 /* In unknown file */
2750 extern rtx split_insns (rtx, rtx);
2752 /* In simplify-rtx.c */
2753 extern rtx simplify_const_unary_operation (enum rtx_code, machine_mode,
2754 rtx, machine_mode);
2755 extern rtx simplify_unary_operation (enum rtx_code, machine_mode, rtx,
2756 machine_mode);
2757 extern rtx simplify_const_binary_operation (enum rtx_code, machine_mode,
2758 rtx, rtx);
2759 extern rtx simplify_binary_operation (enum rtx_code, machine_mode, rtx,
2760 rtx);
2761 extern rtx simplify_ternary_operation (enum rtx_code, machine_mode,
2762 machine_mode, rtx, rtx, rtx);
2763 extern rtx simplify_const_relational_operation (enum rtx_code,
2764 machine_mode, rtx, rtx);
2765 extern rtx simplify_relational_operation (enum rtx_code, machine_mode,
2766 machine_mode, rtx, rtx);
2767 extern rtx simplify_gen_binary (enum rtx_code, machine_mode, rtx, rtx);
2768 extern rtx simplify_gen_unary (enum rtx_code, machine_mode, rtx,
2769 machine_mode);
2770 extern rtx simplify_gen_ternary (enum rtx_code, machine_mode,
2771 machine_mode, rtx, rtx, rtx);
2772 extern rtx simplify_gen_relational (enum rtx_code, machine_mode,
2773 machine_mode, rtx, rtx);
2774 extern rtx simplify_subreg (machine_mode, rtx, machine_mode,
2775 unsigned int);
2776 extern rtx simplify_gen_subreg (machine_mode, rtx, machine_mode,
2777 unsigned int);
2778 extern rtx simplify_replace_fn_rtx (rtx, const_rtx,
2779 rtx (*fn) (rtx, const_rtx, void *), void *);
2780 extern rtx simplify_replace_rtx (rtx, const_rtx, rtx);
2781 extern rtx simplify_rtx (const_rtx);
2782 extern rtx avoid_constant_pool_reference (rtx);
2783 extern rtx delegitimize_mem_from_attrs (rtx);
2784 extern bool mode_signbit_p (machine_mode, const_rtx);
2785 extern bool val_signbit_p (machine_mode, unsigned HOST_WIDE_INT);
2786 extern bool val_signbit_known_set_p (machine_mode,
2787 unsigned HOST_WIDE_INT);
2788 extern bool val_signbit_known_clear_p (machine_mode,
2789 unsigned HOST_WIDE_INT);
2791 /* In reginfo.c */
2792 extern machine_mode choose_hard_reg_mode (unsigned int, unsigned int,
2793 bool);
2794 #ifdef HARD_CONST
2795 extern const HARD_REG_SET &simplifiable_subregs (const subreg_shape &);
2796 #endif
2798 /* In emit-rtl.c */
2799 extern rtx set_for_reg_notes (rtx);
2800 extern rtx set_unique_reg_note (rtx, enum reg_note, rtx);
2801 extern rtx set_dst_reg_note (rtx, enum reg_note, rtx, rtx);
2802 extern void set_insn_deleted (rtx);
2804 /* Functions in rtlanal.c */
2806 extern rtx single_set_2 (const rtx_insn *, const_rtx);
2808 /* Handle the cheap and common cases inline for performance. */
2810 inline rtx single_set (const rtx_insn *insn)
2812 if (!INSN_P (insn))
2813 return NULL_RTX;
2815 if (GET_CODE (PATTERN (insn)) == SET)
2816 return PATTERN (insn);
2818 /* Defer to the more expensive case. */
2819 return single_set_2 (insn, PATTERN (insn));
2822 extern machine_mode get_address_mode (rtx mem);
2823 extern int rtx_addr_can_trap_p (const_rtx);
2824 extern bool nonzero_address_p (const_rtx);
2825 extern int rtx_unstable_p (const_rtx);
2826 extern bool rtx_varies_p (const_rtx, bool);
2827 extern bool rtx_addr_varies_p (const_rtx, bool);
2828 extern rtx get_call_rtx_from (rtx);
2829 extern HOST_WIDE_INT get_integer_term (const_rtx);
2830 extern rtx get_related_value (const_rtx);
2831 extern bool offset_within_block_p (const_rtx, HOST_WIDE_INT);
2832 extern void split_const (rtx, rtx *, rtx *);
2833 extern bool unsigned_reg_p (rtx);
2834 extern int reg_mentioned_p (const_rtx, const_rtx);
2835 extern int count_occurrences (const_rtx, const_rtx, int);
2836 extern int reg_referenced_p (const_rtx, const_rtx);
2837 extern int reg_used_between_p (const_rtx, const rtx_insn *, const rtx_insn *);
2838 extern int reg_set_between_p (const_rtx, const rtx_insn *, const rtx_insn *);
2839 extern int commutative_operand_precedence (rtx);
2840 extern bool swap_commutative_operands_p (rtx, rtx);
2841 extern int modified_between_p (const_rtx, const rtx_insn *, const rtx_insn *);
2842 extern int no_labels_between_p (const rtx_insn *, const rtx_insn *);
2843 extern int modified_in_p (const_rtx, const_rtx);
2844 extern int reg_set_p (const_rtx, const_rtx);
2845 extern int multiple_sets (const_rtx);
2846 extern int set_noop_p (const_rtx);
2847 extern int noop_move_p (const rtx_insn *);
2848 extern bool refers_to_regno_p (unsigned int, unsigned int, const_rtx, rtx *);
2849 extern int reg_overlap_mentioned_p (const_rtx, const_rtx);
2850 extern const_rtx set_of (const_rtx, const_rtx);
2851 extern void record_hard_reg_sets (rtx, const_rtx, void *);
2852 extern void record_hard_reg_uses (rtx *, void *);
2853 #ifdef HARD_CONST
2854 extern void find_all_hard_regs (const_rtx, HARD_REG_SET *);
2855 extern void find_all_hard_reg_sets (const_rtx, HARD_REG_SET *, bool);
2856 #endif
2857 extern void note_stores (const_rtx, void (*) (rtx, const_rtx, void *), void *);
2858 extern void note_uses (rtx *, void (*) (rtx *, void *), void *);
2859 extern int dead_or_set_p (const_rtx, const_rtx);
2860 extern int dead_or_set_regno_p (const_rtx, unsigned int);
2861 extern rtx find_reg_note (const_rtx, enum reg_note, const_rtx);
2862 extern rtx find_regno_note (const_rtx, enum reg_note, unsigned int);
2863 extern rtx find_reg_equal_equiv_note (const_rtx);
2864 extern rtx find_constant_src (const rtx_insn *);
2865 extern int find_reg_fusage (const_rtx, enum rtx_code, const_rtx);
2866 extern int find_regno_fusage (const_rtx, enum rtx_code, unsigned int);
2867 extern rtx alloc_reg_note (enum reg_note, rtx, rtx);
2868 extern void add_reg_note (rtx, enum reg_note, rtx);
2869 extern void add_int_reg_note (rtx, enum reg_note, int);
2870 extern void add_shallow_copy_of_reg_note (rtx_insn *, rtx);
2871 extern void remove_note (rtx, const_rtx);
2872 extern void remove_reg_equal_equiv_notes (rtx_insn *);
2873 extern void remove_reg_equal_equiv_notes_for_regno (unsigned int);
2874 extern int side_effects_p (const_rtx);
2875 extern int volatile_refs_p (const_rtx);
2876 extern int volatile_insn_p (const_rtx);
2877 extern int may_trap_p_1 (const_rtx, unsigned);
2878 extern int may_trap_p (const_rtx);
2879 extern int may_trap_or_fault_p (const_rtx);
2880 extern bool can_throw_internal (const_rtx);
2881 extern bool can_throw_external (const_rtx);
2882 extern bool insn_could_throw_p (const_rtx);
2883 extern bool insn_nothrow_p (const_rtx);
2884 extern bool can_nonlocal_goto (const rtx_insn *);
2885 extern void copy_reg_eh_region_note_forward (rtx, rtx_insn *, rtx);
2886 extern void copy_reg_eh_region_note_backward (rtx, rtx_insn *, rtx);
2887 extern int inequality_comparisons_p (const_rtx);
2888 extern rtx replace_rtx (rtx, rtx, rtx);
2889 extern void replace_label (rtx *, rtx, rtx, bool);
2890 extern void replace_label_in_insn (rtx_insn *, rtx, rtx, bool);
2891 extern bool rtx_referenced_p (const_rtx, const_rtx);
2892 extern bool tablejump_p (const rtx_insn *, rtx *, rtx_jump_table_data **);
2893 extern int computed_jump_p (const rtx_insn *);
2894 extern bool tls_referenced_p (const_rtx);
2896 /* Overload for refers_to_regno_p for checking a single register. */
2897 inline bool
2898 refers_to_regno_p (unsigned int regnum, const_rtx x, rtx* loc = NULL)
2900 return refers_to_regno_p (regnum, regnum + 1, x, loc);
2903 /* Callback for for_each_inc_dec, to process the autoinc operation OP
2904 within MEM that sets DEST to SRC + SRCOFF, or SRC if SRCOFF is
2905 NULL. The callback is passed the same opaque ARG passed to
2906 for_each_inc_dec. Return zero to continue looking for other
2907 autoinc operations or any other value to interrupt the traversal and
2908 return that value to the caller of for_each_inc_dec. */
2909 typedef int (*for_each_inc_dec_fn) (rtx mem, rtx op, rtx dest, rtx src,
2910 rtx srcoff, void *arg);
2911 extern int for_each_inc_dec (rtx, for_each_inc_dec_fn, void *arg);
2913 typedef int (*rtx_equal_p_callback_function) (const_rtx *, const_rtx *,
2914 rtx *, rtx *);
2915 extern int rtx_equal_p_cb (const_rtx, const_rtx,
2916 rtx_equal_p_callback_function);
2918 typedef int (*hash_rtx_callback_function) (const_rtx, machine_mode, rtx *,
2919 machine_mode *);
2920 extern unsigned hash_rtx_cb (const_rtx, machine_mode, int *, int *,
2921 bool, hash_rtx_callback_function);
2923 extern rtx regno_use_in (unsigned int, rtx);
2924 extern int auto_inc_p (const_rtx);
2925 extern bool in_insn_list_p (const rtx_insn_list *, const rtx_insn *);
2926 extern void remove_node_from_expr_list (const_rtx, rtx_expr_list **);
2927 extern void remove_node_from_insn_list (const rtx_insn *, rtx_insn_list **);
2928 extern int loc_mentioned_in_p (rtx *, const_rtx);
2929 extern rtx_insn *find_first_parameter_load (rtx_insn *, rtx_insn *);
2930 extern bool keep_with_call_p (const rtx_insn *);
2931 extern bool label_is_jump_target_p (const_rtx, const rtx_insn *);
2932 extern int insn_rtx_cost (rtx, bool);
2933 extern unsigned seq_cost (const rtx_insn *, bool);
2935 /* Given an insn and condition, return a canonical description of
2936 the test being made. */
2937 extern rtx canonicalize_condition (rtx_insn *, rtx, int, rtx_insn **, rtx,
2938 int, int);
2940 /* Given a JUMP_INSN, return a canonical description of the test
2941 being made. */
2942 extern rtx get_condition (rtx_insn *, rtx_insn **, int, int);
2944 /* Information about a subreg of a hard register. */
2945 struct subreg_info
2947 /* Offset of first hard register involved in the subreg. */
2948 int offset;
2949 /* Number of hard registers involved in the subreg. In the case of
2950 a paradoxical subreg, this is the number of registers that would
2951 be modified by writing to the subreg; some of them may be don't-care
2952 when reading from the subreg. */
2953 int nregs;
2954 /* Whether this subreg can be represented as a hard reg with the new
2955 mode (by adding OFFSET to the original hard register). */
2956 bool representable_p;
2959 extern void subreg_get_info (unsigned int, machine_mode,
2960 unsigned int, machine_mode,
2961 struct subreg_info *);
2963 /* lists.c */
2965 extern void free_EXPR_LIST_list (rtx_expr_list **);
2966 extern void free_INSN_LIST_list (rtx_insn_list **);
2967 extern void free_EXPR_LIST_node (rtx);
2968 extern void free_INSN_LIST_node (rtx);
2969 extern rtx_insn_list *alloc_INSN_LIST (rtx, rtx);
2970 extern rtx_insn_list *copy_INSN_LIST (rtx_insn_list *);
2971 extern rtx_insn_list *concat_INSN_LIST (rtx_insn_list *, rtx_insn_list *);
2972 extern rtx_expr_list *alloc_EXPR_LIST (int, rtx, rtx);
2973 extern void remove_free_INSN_LIST_elem (rtx_insn *, rtx_insn_list **);
2974 extern rtx remove_list_elem (rtx, rtx *);
2975 extern rtx_insn *remove_free_INSN_LIST_node (rtx_insn_list **);
2976 extern rtx remove_free_EXPR_LIST_node (rtx_expr_list **);
2979 /* reginfo.c */
2981 /* Resize reg info. */
2982 extern bool resize_reg_info (void);
2983 /* Free up register info memory. */
2984 extern void free_reg_info (void);
2985 extern void init_subregs_of_mode (void);
2986 extern void finish_subregs_of_mode (void);
2988 /* recog.c */
2989 extern rtx extract_asm_operands (rtx);
2990 extern int asm_noperands (const_rtx);
2991 extern const char *decode_asm_operands (rtx, rtx *, rtx **, const char **,
2992 machine_mode *, location_t *);
2993 extern void get_referenced_operands (const char *, bool *, unsigned int);
2995 extern enum reg_class reg_preferred_class (int);
2996 extern enum reg_class reg_alternate_class (int);
2997 extern enum reg_class reg_allocno_class (int);
2998 extern void setup_reg_classes (int, enum reg_class, enum reg_class,
2999 enum reg_class);
3001 extern void split_all_insns (void);
3002 extern unsigned int split_all_insns_noflow (void);
3004 #define MAX_SAVED_CONST_INT 64
3005 extern GTY(()) rtx const_int_rtx[MAX_SAVED_CONST_INT * 2 + 1];
3007 #define const0_rtx (const_int_rtx[MAX_SAVED_CONST_INT])
3008 #define const1_rtx (const_int_rtx[MAX_SAVED_CONST_INT+1])
3009 #define const2_rtx (const_int_rtx[MAX_SAVED_CONST_INT+2])
3010 #define constm1_rtx (const_int_rtx[MAX_SAVED_CONST_INT-1])
3011 extern GTY(()) rtx const_true_rtx;
3013 extern GTY(()) rtx const_tiny_rtx[4][(int) MAX_MACHINE_MODE];
3015 /* Returns a constant 0 rtx in mode MODE. Integer modes are treated the
3016 same as VOIDmode. */
3018 #define CONST0_RTX(MODE) (const_tiny_rtx[0][(int) (MODE)])
3020 /* Likewise, for the constants 1 and 2 and -1. */
3022 #define CONST1_RTX(MODE) (const_tiny_rtx[1][(int) (MODE)])
3023 #define CONST2_RTX(MODE) (const_tiny_rtx[2][(int) (MODE)])
3024 #define CONSTM1_RTX(MODE) (const_tiny_rtx[3][(int) (MODE)])
3026 extern GTY(()) rtx pc_rtx;
3027 extern GTY(()) rtx cc0_rtx;
3028 extern GTY(()) rtx ret_rtx;
3029 extern GTY(()) rtx simple_return_rtx;
3031 /* If HARD_FRAME_POINTER_REGNUM is defined, then a special dummy reg
3032 is used to represent the frame pointer. This is because the
3033 hard frame pointer and the automatic variables are separated by an amount
3034 that cannot be determined until after register allocation. We can assume
3035 that in this case ELIMINABLE_REGS will be defined, one action of which
3036 will be to eliminate FRAME_POINTER_REGNUM into HARD_FRAME_POINTER_REGNUM. */
3037 #ifndef HARD_FRAME_POINTER_REGNUM
3038 #define HARD_FRAME_POINTER_REGNUM FRAME_POINTER_REGNUM
3039 #endif
3041 #ifndef HARD_FRAME_POINTER_IS_FRAME_POINTER
3042 #define HARD_FRAME_POINTER_IS_FRAME_POINTER \
3043 (HARD_FRAME_POINTER_REGNUM == FRAME_POINTER_REGNUM)
3044 #endif
3046 #ifndef HARD_FRAME_POINTER_IS_ARG_POINTER
3047 #define HARD_FRAME_POINTER_IS_ARG_POINTER \
3048 (HARD_FRAME_POINTER_REGNUM == ARG_POINTER_REGNUM)
3049 #endif
3051 /* Index labels for global_rtl. */
3052 enum global_rtl_index
3054 GR_STACK_POINTER,
3055 GR_FRAME_POINTER,
3056 /* For register elimination to work properly these hard_frame_pointer_rtx,
3057 frame_pointer_rtx, and arg_pointer_rtx must be the same if they refer to
3058 the same register. */
3059 #if FRAME_POINTER_REGNUM == ARG_POINTER_REGNUM
3060 GR_ARG_POINTER = GR_FRAME_POINTER,
3061 #endif
3062 #if HARD_FRAME_POINTER_IS_FRAME_POINTER
3063 GR_HARD_FRAME_POINTER = GR_FRAME_POINTER,
3064 #else
3065 GR_HARD_FRAME_POINTER,
3066 #endif
3067 #if FRAME_POINTER_REGNUM != ARG_POINTER_REGNUM
3068 #if HARD_FRAME_POINTER_IS_ARG_POINTER
3069 GR_ARG_POINTER = GR_HARD_FRAME_POINTER,
3070 #else
3071 GR_ARG_POINTER,
3072 #endif
3073 #endif
3074 GR_VIRTUAL_INCOMING_ARGS,
3075 GR_VIRTUAL_STACK_ARGS,
3076 GR_VIRTUAL_STACK_DYNAMIC,
3077 GR_VIRTUAL_OUTGOING_ARGS,
3078 GR_VIRTUAL_CFA,
3079 GR_VIRTUAL_PREFERRED_STACK_BOUNDARY,
3081 GR_MAX
3084 /* Target-dependent globals. */
3085 struct GTY(()) target_rtl {
3086 /* All references to the hard registers in global_rtl_index go through
3087 these unique rtl objects. On machines where the frame-pointer and
3088 arg-pointer are the same register, they use the same unique object.
3090 After register allocation, other rtl objects which used to be pseudo-regs
3091 may be clobbered to refer to the frame-pointer register.
3092 But references that were originally to the frame-pointer can be
3093 distinguished from the others because they contain frame_pointer_rtx.
3095 When to use frame_pointer_rtx and hard_frame_pointer_rtx is a little
3096 tricky: until register elimination has taken place hard_frame_pointer_rtx
3097 should be used if it is being set, and frame_pointer_rtx otherwise. After
3098 register elimination hard_frame_pointer_rtx should always be used.
3099 On machines where the two registers are same (most) then these are the
3100 same. */
3101 rtx x_global_rtl[GR_MAX];
3103 /* A unique representation of (REG:Pmode PIC_OFFSET_TABLE_REGNUM). */
3104 rtx x_pic_offset_table_rtx;
3106 /* A unique representation of (REG:Pmode RETURN_ADDRESS_POINTER_REGNUM).
3107 This is used to implement __builtin_return_address for some machines;
3108 see for instance the MIPS port. */
3109 rtx x_return_address_pointer_rtx;
3111 /* Commonly used RTL for hard registers. These objects are not
3112 necessarily unique, so we allocate them separately from global_rtl.
3113 They are initialized once per compilation unit, then copied into
3114 regno_reg_rtx at the beginning of each function. */
3115 rtx x_initial_regno_reg_rtx[FIRST_PSEUDO_REGISTER];
3117 /* A sample (mem:M stack_pointer_rtx) rtx for each mode M. */
3118 rtx x_top_of_stack[MAX_MACHINE_MODE];
3120 /* Static hunks of RTL used by the aliasing code; these are treated
3121 as persistent to avoid unnecessary RTL allocations. */
3122 rtx x_static_reg_base_value[FIRST_PSEUDO_REGISTER];
3124 /* The default memory attributes for each mode. */
3125 struct mem_attrs *x_mode_mem_attrs[(int) MAX_MACHINE_MODE];
3127 /* Track if RTL has been initialized. */
3128 bool target_specific_initialized;
3131 extern GTY(()) struct target_rtl default_target_rtl;
3132 #if SWITCHABLE_TARGET
3133 extern struct target_rtl *this_target_rtl;
3134 #else
3135 #define this_target_rtl (&default_target_rtl)
3136 #endif
3138 #define global_rtl \
3139 (this_target_rtl->x_global_rtl)
3140 #define pic_offset_table_rtx \
3141 (this_target_rtl->x_pic_offset_table_rtx)
3142 #define return_address_pointer_rtx \
3143 (this_target_rtl->x_return_address_pointer_rtx)
3144 #define top_of_stack \
3145 (this_target_rtl->x_top_of_stack)
3146 #define mode_mem_attrs \
3147 (this_target_rtl->x_mode_mem_attrs)
3149 /* All references to certain hard regs, except those created
3150 by allocating pseudo regs into them (when that's possible),
3151 go through these unique rtx objects. */
3152 #define stack_pointer_rtx (global_rtl[GR_STACK_POINTER])
3153 #define frame_pointer_rtx (global_rtl[GR_FRAME_POINTER])
3154 #define hard_frame_pointer_rtx (global_rtl[GR_HARD_FRAME_POINTER])
3155 #define arg_pointer_rtx (global_rtl[GR_ARG_POINTER])
3157 #ifndef GENERATOR_FILE
3158 /* Return the attributes of a MEM rtx. */
3159 static inline struct mem_attrs *
3160 get_mem_attrs (const_rtx x)
3162 struct mem_attrs *attrs;
3164 attrs = MEM_ATTRS (x);
3165 if (!attrs)
3166 attrs = mode_mem_attrs[(int) GET_MODE (x)];
3167 return attrs;
3169 #endif
3171 /* Include the RTL generation functions. */
3173 #ifndef GENERATOR_FILE
3174 #include "genrtl.h"
3175 #undef gen_rtx_ASM_INPUT
3176 #define gen_rtx_ASM_INPUT(MODE, ARG0) \
3177 gen_rtx_fmt_si (ASM_INPUT, (MODE), (ARG0), 0)
3178 #define gen_rtx_ASM_INPUT_loc(MODE, ARG0, LOC) \
3179 gen_rtx_fmt_si (ASM_INPUT, (MODE), (ARG0), (LOC))
3180 #endif
3182 /* There are some RTL codes that require special attention; the
3183 generation functions included above do the raw handling. If you
3184 add to this list, modify special_rtx in gengenrtl.c as well. */
3186 extern rtx_expr_list *gen_rtx_EXPR_LIST (machine_mode, rtx, rtx);
3187 extern rtx_insn_list *gen_rtx_INSN_LIST (machine_mode, rtx, rtx);
3188 extern rtx_insn *
3189 gen_rtx_INSN (machine_mode mode, rtx_insn *prev_insn, rtx_insn *next_insn,
3190 basic_block bb, rtx pattern, int location, int code,
3191 rtx reg_notes);
3192 extern rtx gen_rtx_CONST_INT (machine_mode, HOST_WIDE_INT);
3193 extern rtx gen_rtx_CONST_VECTOR (machine_mode, rtvec);
3194 extern rtx gen_raw_REG (machine_mode, int);
3195 extern rtx gen_rtx_REG (machine_mode, unsigned);
3196 extern rtx gen_rtx_SUBREG (machine_mode, rtx, int);
3197 extern rtx gen_rtx_MEM (machine_mode, rtx);
3198 extern rtx gen_rtx_VAR_LOCATION (machine_mode, tree, rtx,
3199 enum var_init_status);
3201 #define GEN_INT(N) gen_rtx_CONST_INT (VOIDmode, (N))
3203 /* Virtual registers are used during RTL generation to refer to locations into
3204 the stack frame when the actual location isn't known until RTL generation
3205 is complete. The routine instantiate_virtual_regs replaces these with
3206 the proper value, which is normally {frame,arg,stack}_pointer_rtx plus
3207 a constant. */
3209 #define FIRST_VIRTUAL_REGISTER (FIRST_PSEUDO_REGISTER)
3211 /* This points to the first word of the incoming arguments passed on the stack,
3212 either by the caller or by the callee when pretending it was passed by the
3213 caller. */
3215 #define virtual_incoming_args_rtx (global_rtl[GR_VIRTUAL_INCOMING_ARGS])
3217 #define VIRTUAL_INCOMING_ARGS_REGNUM (FIRST_VIRTUAL_REGISTER)
3219 /* If FRAME_GROWS_DOWNWARD, this points to immediately above the first
3220 variable on the stack. Otherwise, it points to the first variable on
3221 the stack. */
3223 #define virtual_stack_vars_rtx (global_rtl[GR_VIRTUAL_STACK_ARGS])
3225 #define VIRTUAL_STACK_VARS_REGNUM ((FIRST_VIRTUAL_REGISTER) + 1)
3227 /* This points to the location of dynamically-allocated memory on the stack
3228 immediately after the stack pointer has been adjusted by the amount
3229 desired. */
3231 #define virtual_stack_dynamic_rtx (global_rtl[GR_VIRTUAL_STACK_DYNAMIC])
3233 #define VIRTUAL_STACK_DYNAMIC_REGNUM ((FIRST_VIRTUAL_REGISTER) + 2)
3235 /* This points to the location in the stack at which outgoing arguments should
3236 be written when the stack is pre-pushed (arguments pushed using push
3237 insns always use sp). */
3239 #define virtual_outgoing_args_rtx (global_rtl[GR_VIRTUAL_OUTGOING_ARGS])
3241 #define VIRTUAL_OUTGOING_ARGS_REGNUM ((FIRST_VIRTUAL_REGISTER) + 3)
3243 /* This points to the Canonical Frame Address of the function. This
3244 should correspond to the CFA produced by INCOMING_FRAME_SP_OFFSET,
3245 but is calculated relative to the arg pointer for simplicity; the
3246 frame pointer nor stack pointer are necessarily fixed relative to
3247 the CFA until after reload. */
3249 #define virtual_cfa_rtx (global_rtl[GR_VIRTUAL_CFA])
3251 #define VIRTUAL_CFA_REGNUM ((FIRST_VIRTUAL_REGISTER) + 4)
3253 #define LAST_VIRTUAL_POINTER_REGISTER ((FIRST_VIRTUAL_REGISTER) + 4)
3255 /* This is replaced by crtl->preferred_stack_boundary / BITS_PER_UNIT
3256 when finalized. */
3258 #define virtual_preferred_stack_boundary_rtx \
3259 (global_rtl[GR_VIRTUAL_PREFERRED_STACK_BOUNDARY])
3261 #define VIRTUAL_PREFERRED_STACK_BOUNDARY_REGNUM \
3262 ((FIRST_VIRTUAL_REGISTER) + 5)
3264 #define LAST_VIRTUAL_REGISTER ((FIRST_VIRTUAL_REGISTER) + 5)
3266 /* Nonzero if REGNUM is a pointer into the stack frame. */
3267 #define REGNO_PTR_FRAME_P(REGNUM) \
3268 ((REGNUM) == STACK_POINTER_REGNUM \
3269 || (REGNUM) == FRAME_POINTER_REGNUM \
3270 || (REGNUM) == HARD_FRAME_POINTER_REGNUM \
3271 || (REGNUM) == ARG_POINTER_REGNUM \
3272 || ((REGNUM) >= FIRST_VIRTUAL_REGISTER \
3273 && (REGNUM) <= LAST_VIRTUAL_POINTER_REGISTER))
3275 /* REGNUM never really appearing in the INSN stream. */
3276 #define INVALID_REGNUM (~(unsigned int) 0)
3278 /* REGNUM for which no debug information can be generated. */
3279 #define IGNORED_DWARF_REGNUM (INVALID_REGNUM - 1)
3281 extern rtx output_constant_def (tree, int);
3282 extern rtx lookup_constant_def (tree);
3284 /* Nonzero after end of reload pass.
3285 Set to 1 or 0 by reload1.c. */
3287 extern int reload_completed;
3289 /* Nonzero after thread_prologue_and_epilogue_insns has run. */
3290 extern int epilogue_completed;
3292 /* Set to 1 while reload_as_needed is operating.
3293 Required by some machines to handle any generated moves differently. */
3295 extern int reload_in_progress;
3297 /* Set to 1 while in lra. */
3298 extern int lra_in_progress;
3300 /* This macro indicates whether you may create a new
3301 pseudo-register. */
3303 #define can_create_pseudo_p() (!reload_in_progress && !reload_completed)
3305 #ifdef STACK_REGS
3306 /* Nonzero after end of regstack pass.
3307 Set to 1 or 0 by reg-stack.c. */
3308 extern int regstack_completed;
3309 #endif
3311 /* If this is nonzero, we do not bother generating VOLATILE
3312 around volatile memory references, and we are willing to
3313 output indirect addresses. If cse is to follow, we reject
3314 indirect addresses so a useful potential cse is generated;
3315 if it is used only once, instruction combination will produce
3316 the same indirect address eventually. */
3317 extern int cse_not_expected;
3319 /* Translates rtx code to tree code, for those codes needed by
3320 REAL_ARITHMETIC. The function returns an int because the caller may not
3321 know what `enum tree_code' means. */
3323 extern int rtx_to_tree_code (enum rtx_code);
3325 /* In cse.c */
3326 extern int delete_trivially_dead_insns (rtx_insn *, int);
3327 extern int exp_equiv_p (const_rtx, const_rtx, int, bool);
3328 extern unsigned hash_rtx (const_rtx x, machine_mode, int *, int *, bool);
3330 /* In dse.c */
3331 extern bool check_for_inc_dec (rtx_insn *insn);
3333 /* In jump.c */
3334 extern int comparison_dominates_p (enum rtx_code, enum rtx_code);
3335 extern bool jump_to_label_p (const rtx_insn *);
3336 extern int condjump_p (const rtx_insn *);
3337 extern int any_condjump_p (const rtx_insn *);
3338 extern int any_uncondjump_p (const rtx_insn *);
3339 extern rtx pc_set (const rtx_insn *);
3340 extern rtx condjump_label (const rtx_insn *);
3341 extern int simplejump_p (const rtx_insn *);
3342 extern int returnjump_p (const rtx_insn *);
3343 extern int eh_returnjump_p (rtx_insn *);
3344 extern int onlyjump_p (const rtx_insn *);
3345 extern int only_sets_cc0_p (const_rtx);
3346 extern int sets_cc0_p (const_rtx);
3347 extern int invert_jump_1 (rtx_insn *, rtx);
3348 extern int invert_jump (rtx_insn *, rtx, int);
3349 extern int rtx_renumbered_equal_p (const_rtx, const_rtx);
3350 extern int true_regnum (const_rtx);
3351 extern unsigned int reg_or_subregno (const_rtx);
3352 extern int redirect_jump_1 (rtx, rtx);
3353 extern void redirect_jump_2 (rtx, rtx, rtx, int, int);
3354 extern int redirect_jump (rtx, rtx, int);
3355 extern void rebuild_jump_labels (rtx_insn *);
3356 extern void rebuild_jump_labels_chain (rtx_insn *);
3357 extern rtx reversed_comparison (const_rtx, machine_mode);
3358 extern enum rtx_code reversed_comparison_code (const_rtx, const_rtx);
3359 extern enum rtx_code reversed_comparison_code_parts (enum rtx_code, const_rtx,
3360 const_rtx, const_rtx);
3361 extern void delete_for_peephole (rtx_insn *, rtx_insn *);
3362 extern int condjump_in_parallel_p (const rtx_insn *);
3364 /* In emit-rtl.c. */
3365 extern int max_reg_num (void);
3366 extern int max_label_num (void);
3367 extern int get_first_label_num (void);
3368 extern void maybe_set_first_label_num (rtx);
3369 extern void delete_insns_since (rtx_insn *);
3370 extern void mark_reg_pointer (rtx, int);
3371 extern void mark_user_reg (rtx);
3372 extern void reset_used_flags (rtx);
3373 extern void set_used_flags (rtx);
3374 extern void reorder_insns (rtx_insn *, rtx_insn *, rtx_insn *);
3375 extern void reorder_insns_nobb (rtx_insn *, rtx_insn *, rtx_insn *);
3376 extern int get_max_insn_count (void);
3377 extern int in_sequence_p (void);
3378 extern void init_emit (void);
3379 extern void init_emit_regs (void);
3380 extern void init_derived_machine_modes (void);
3381 extern void init_emit_once (void);
3382 extern void push_topmost_sequence (void);
3383 extern void pop_topmost_sequence (void);
3384 extern void set_new_first_and_last_insn (rtx_insn *, rtx_insn *);
3385 extern unsigned int unshare_all_rtl (void);
3386 extern void unshare_all_rtl_again (rtx_insn *);
3387 extern void unshare_all_rtl_in_chain (rtx_insn *);
3388 extern void verify_rtl_sharing (void);
3389 extern void add_insn (rtx_insn *);
3390 extern void add_insn_before (rtx, rtx, basic_block);
3391 extern void add_insn_after (rtx, rtx, basic_block);
3392 extern void remove_insn (rtx);
3393 extern rtx_insn *emit (rtx);
3394 extern void emit_insn_at_entry (rtx);
3395 extern rtx gen_lowpart_SUBREG (machine_mode, rtx);
3396 extern rtx gen_const_mem (machine_mode, rtx);
3397 extern rtx gen_frame_mem (machine_mode, rtx);
3398 extern rtx gen_tmp_stack_mem (machine_mode, rtx);
3399 extern bool validate_subreg (machine_mode, machine_mode,
3400 const_rtx, unsigned int);
3402 /* In combine.c */
3403 extern unsigned int extended_count (const_rtx, machine_mode, int);
3404 extern rtx remove_death (unsigned int, rtx_insn *);
3405 extern void dump_combine_stats (FILE *);
3406 extern void dump_combine_total_stats (FILE *);
3407 extern rtx make_compound_operation (rtx, enum rtx_code);
3409 /* In sched-rgn.c. */
3410 extern void schedule_insns (void);
3412 /* In sched-ebb.c. */
3413 extern void schedule_ebbs (void);
3415 /* In sel-sched-dump.c. */
3416 extern void sel_sched_fix_param (const char *param, const char *val);
3418 /* In print-rtl.c */
3419 extern const char *print_rtx_head;
3420 extern void debug (const rtx_def &ref);
3421 extern void debug (const rtx_def *ptr);
3422 extern void debug_rtx (const_rtx);
3423 extern void debug_rtx_list (const rtx_insn *, int);
3424 extern void debug_rtx_range (const rtx_insn *, const rtx_insn *);
3425 extern const_rtx debug_rtx_find (const rtx_insn *, int);
3426 extern void print_mem_expr (FILE *, const_tree);
3427 extern void print_rtl (FILE *, const_rtx);
3428 extern void print_simple_rtl (FILE *, const_rtx);
3429 extern int print_rtl_single (FILE *, const_rtx);
3430 extern int print_rtl_single_with_indent (FILE *, const_rtx, int);
3431 extern void print_inline_rtx (FILE *, const_rtx, int);
3433 /* Functions in sched-vis.c. FIXME: Ideally these functions would
3434 not be in sched-vis.c but in rtl.c, because they are not only used
3435 by the scheduler anymore but for all "slim" RTL dumping. */
3436 extern void dump_value_slim (FILE *, const_rtx, int);
3437 extern void dump_insn_slim (FILE *, const_rtx);
3438 extern void dump_rtl_slim (FILE *, const rtx_insn *, const rtx_insn *,
3439 int, int);
3440 extern void print_value (pretty_printer *, const_rtx, int);
3441 extern void print_pattern (pretty_printer *, const_rtx, int);
3442 extern void print_insn (pretty_printer *, const_rtx, int);
3443 extern void rtl_dump_bb_for_graph (pretty_printer *, basic_block);
3444 extern const char *str_pattern_slim (const_rtx);
3446 /* In stmt.c */
3447 extern void expand_null_return (void);
3448 extern void expand_naked_return (void);
3449 extern void emit_jump (rtx);
3451 /* In expr.c */
3452 extern rtx move_by_pieces (rtx, rtx, unsigned HOST_WIDE_INT,
3453 unsigned int, int);
3454 extern HOST_WIDE_INT find_args_size_adjust (rtx_insn *);
3455 extern int fixup_args_size_notes (rtx_insn *, rtx_insn *, int);
3457 /* In expmed.c */
3458 extern void init_expmed (void);
3459 extern void expand_inc (rtx, rtx);
3460 extern void expand_dec (rtx, rtx);
3462 /* In lower-subreg.c */
3463 extern void init_lower_subreg (void);
3465 /* In gcse.c */
3466 extern bool can_copy_p (machine_mode);
3467 extern bool can_assign_to_reg_without_clobbers_p (rtx);
3468 extern rtx fis_get_condition (rtx_insn *);
3470 /* In ira.c */
3471 #ifdef HARD_CONST
3472 extern HARD_REG_SET eliminable_regset;
3473 #endif
3474 extern void mark_elimination (int, int);
3476 /* In reginfo.c */
3477 extern int reg_classes_intersect_p (reg_class_t, reg_class_t);
3478 extern int reg_class_subset_p (reg_class_t, reg_class_t);
3479 extern void globalize_reg (tree, int);
3480 extern void init_reg_modes_target (void);
3481 extern void init_regs (void);
3482 extern void reinit_regs (void);
3483 extern void init_fake_stack_mems (void);
3484 extern void save_register_info (void);
3485 extern void init_reg_sets (void);
3486 extern void regclass (rtx, int);
3487 extern void reg_scan (rtx_insn *, unsigned int);
3488 extern void fix_register (const char *, int, int);
3489 #ifdef HARD_CONST
3490 extern const HARD_REG_SET *valid_mode_changes_for_regno (unsigned int);
3491 #endif
3493 /* In reload1.c */
3494 extern int function_invariant_p (const_rtx);
3496 /* In calls.c */
3497 enum libcall_type
3499 LCT_NORMAL = 0,
3500 LCT_CONST = 1,
3501 LCT_PURE = 2,
3502 LCT_NORETURN = 3,
3503 LCT_THROW = 4,
3504 LCT_RETURNS_TWICE = 5
3507 extern void emit_library_call (rtx, enum libcall_type, machine_mode, int,
3508 ...);
3509 extern rtx emit_library_call_value (rtx, rtx, enum libcall_type,
3510 machine_mode, int, ...);
3512 /* In varasm.c */
3513 extern void init_varasm_once (void);
3515 extern rtx make_debug_expr_from_rtl (const_rtx);
3517 /* In read-rtl.c */
3518 extern bool read_rtx (const char *, rtx *);
3520 /* In alias.c */
3521 extern rtx canon_rtx (rtx);
3522 extern int true_dependence (const_rtx, machine_mode, const_rtx);
3523 extern rtx get_addr (rtx);
3524 extern int canon_true_dependence (const_rtx, machine_mode, rtx,
3525 const_rtx, rtx);
3526 extern int read_dependence (const_rtx, const_rtx);
3527 extern int anti_dependence (const_rtx, const_rtx);
3528 extern int canon_anti_dependence (const_rtx, bool,
3529 const_rtx, machine_mode, rtx);
3530 extern int output_dependence (const_rtx, const_rtx);
3531 extern int may_alias_p (const_rtx, const_rtx);
3532 extern void init_alias_target (void);
3533 extern void init_alias_analysis (void);
3534 extern void end_alias_analysis (void);
3535 extern void vt_equate_reg_base_value (const_rtx, const_rtx);
3536 extern bool memory_modified_in_insn_p (const_rtx, const_rtx);
3537 extern bool memory_must_be_modified_in_insn_p (const_rtx, const_rtx);
3538 extern bool may_be_sp_based_p (rtx);
3539 extern rtx gen_hard_reg_clobber (machine_mode, unsigned int);
3540 extern rtx get_reg_known_value (unsigned int);
3541 extern bool get_reg_known_equiv_p (unsigned int);
3542 extern rtx get_reg_base_value (unsigned int);
3544 #ifdef STACK_REGS
3545 extern int stack_regs_mentioned (const_rtx insn);
3546 #endif
3548 /* In toplev.c */
3549 extern GTY(()) rtx stack_limit_rtx;
3551 /* In var-tracking.c */
3552 extern unsigned int variable_tracking_main (void);
3554 /* In stor-layout.c. */
3555 extern void get_mode_bounds (machine_mode, int, machine_mode,
3556 rtx *, rtx *);
3558 /* In loop-iv.c */
3559 extern rtx canon_condition (rtx);
3560 extern void simplify_using_condition (rtx, rtx *, bitmap);
3562 /* In final.c */
3563 extern unsigned int compute_alignments (void);
3564 extern void update_alignments (vec<rtx> &);
3565 extern int asm_str_count (const char *templ);
3567 struct rtl_hooks
3569 rtx (*gen_lowpart) (machine_mode, rtx);
3570 rtx (*gen_lowpart_no_emit) (machine_mode, rtx);
3571 rtx (*reg_nonzero_bits) (const_rtx, machine_mode, const_rtx, machine_mode,
3572 unsigned HOST_WIDE_INT, unsigned HOST_WIDE_INT *);
3573 rtx (*reg_num_sign_bit_copies) (const_rtx, machine_mode, const_rtx, machine_mode,
3574 unsigned int, unsigned int *);
3575 bool (*reg_truncated_to_mode) (machine_mode, const_rtx);
3577 /* Whenever you add entries here, make sure you adjust rtlhooks-def.h. */
3580 /* Each pass can provide its own. */
3581 extern struct rtl_hooks rtl_hooks;
3583 /* ... but then it has to restore these. */
3584 extern const struct rtl_hooks general_rtl_hooks;
3586 /* Keep this for the nonce. */
3587 #define gen_lowpart rtl_hooks.gen_lowpart
3589 extern void insn_locations_init (void);
3590 extern void insn_locations_finalize (void);
3591 extern void set_curr_insn_location (location_t);
3592 extern location_t curr_insn_location (void);
3594 /* rtl-error.c */
3595 extern void _fatal_insn_not_found (const_rtx, const char *, int, const char *)
3596 ATTRIBUTE_NORETURN;
3597 extern void _fatal_insn (const char *, const_rtx, const char *, int, const char *)
3598 ATTRIBUTE_NORETURN;
3600 #define fatal_insn(msgid, insn) \
3601 _fatal_insn (msgid, insn, __FILE__, __LINE__, __FUNCTION__)
3602 #define fatal_insn_not_found(insn) \
3603 _fatal_insn_not_found (insn, __FILE__, __LINE__, __FUNCTION__)
3605 /* reginfo.c */
3606 extern tree GTY(()) global_regs_decl[FIRST_PSEUDO_REGISTER];
3608 #endif /* ! GCC_RTL_H */