1 /* Default target hook functions.
2 Copyright (C) 2003-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
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
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 /* The migration of target macros to target hooks works as follows:
22 1. Create a target hook that uses the existing target macros to
23 implement the same functionality.
25 2. Convert all the MI files to use the hook instead of the macro.
27 3. Repeat for a majority of the remaining target macros. This will
30 4. Tell target maintainers to start migrating.
32 5. Eventually convert the backends to override the hook instead of
33 defining the macros. This will take some time too.
35 6. TBD when, poison the macros. Unmigrated targets will break at
38 Note that we expect steps 1-3 to be done by the people that
39 understand what the MI does with each macro, and step 5 to be done
40 by the target maintainers for their respective targets.
42 Note that steps 1 and 2 don't have to be done together, but no
43 target can override the new hook until step 2 is complete for it.
45 Once the macros are poisoned, we will revert to the old migration
46 rules - migrate the macro, callers, and targets all at once. This
47 comment can thus be removed at that point. */
51 #include "coretypes.h"
56 #include "tree-ssa-alias.h"
57 #include "gimple-expr.h"
59 #include "stringpool.h"
60 #include "tree-ssanames.h"
64 #include "diagnostic-core.h"
65 #include "fold-const.h"
66 #include "stor-layout.h"
80 default_legitimate_address_p (machine_mode mode ATTRIBUTE_UNUSED
,
81 rtx addr ATTRIBUTE_UNUSED
,
82 bool strict ATTRIBUTE_UNUSED
)
84 #ifdef GO_IF_LEGITIMATE_ADDRESS
85 /* Defer to the old implementation using a goto. */
87 return strict_memory_address_p (mode
, addr
);
89 return memory_address_p (mode
, addr
);
96 default_external_libcall (rtx fun ATTRIBUTE_UNUSED
)
98 #ifdef ASM_OUTPUT_EXTERNAL_LIBCALL
99 ASM_OUTPUT_EXTERNAL_LIBCALL (asm_out_file
, fun
);
104 default_unspec_may_trap_p (const_rtx x
, unsigned flags
)
108 /* Any floating arithmetic may trap. */
109 if ((SCALAR_FLOAT_MODE_P (GET_MODE (x
)) && flag_trapping_math
))
112 for (i
= 0; i
< XVECLEN (x
, 0); ++i
)
114 if (may_trap_p_1 (XVECEXP (x
, 0, i
), flags
))
122 default_promote_function_mode (const_tree type ATTRIBUTE_UNUSED
,
124 int *punsignedp ATTRIBUTE_UNUSED
,
125 const_tree funtype ATTRIBUTE_UNUSED
,
126 int for_return ATTRIBUTE_UNUSED
)
128 if (type
!= NULL_TREE
&& for_return
== 2)
129 return promote_mode (type
, mode
, punsignedp
);
134 default_promote_function_mode_always_promote (const_tree type
,
137 const_tree funtype ATTRIBUTE_UNUSED
,
138 int for_return ATTRIBUTE_UNUSED
)
140 return promote_mode (type
, mode
, punsignedp
);
144 default_cc_modes_compatible (machine_mode m1
, machine_mode m2
)
152 default_return_in_memory (const_tree type
,
153 const_tree fntype ATTRIBUTE_UNUSED
)
155 return (TYPE_MODE (type
) == BLKmode
);
159 default_legitimize_address (rtx x
, rtx orig_x ATTRIBUTE_UNUSED
,
160 machine_mode mode ATTRIBUTE_UNUSED
)
166 default_legitimize_address_displacement (rtx
*disp ATTRIBUTE_UNUSED
,
167 rtx
*offset ATTRIBUTE_UNUSED
,
168 machine_mode mode ATTRIBUTE_UNUSED
)
174 default_expand_builtin_saveregs (void)
176 error ("__builtin_saveregs not supported by this target");
181 default_setup_incoming_varargs (cumulative_args_t ca ATTRIBUTE_UNUSED
,
182 machine_mode mode ATTRIBUTE_UNUSED
,
183 tree type ATTRIBUTE_UNUSED
,
184 int *pretend_arg_size ATTRIBUTE_UNUSED
,
185 int second_time ATTRIBUTE_UNUSED
)
189 /* The default implementation of TARGET_BUILTIN_SETJMP_FRAME_VALUE. */
192 default_builtin_setjmp_frame_value (void)
194 return virtual_stack_vars_rtx
;
197 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns false. */
200 hook_bool_CUMULATIVE_ARGS_false (cumulative_args_t ca ATTRIBUTE_UNUSED
)
206 default_pretend_outgoing_varargs_named (cumulative_args_t ca ATTRIBUTE_UNUSED
)
208 return (targetm
.calls
.setup_incoming_varargs
209 != default_setup_incoming_varargs
);
213 default_eh_return_filter_mode (void)
215 return targetm
.unwind_word_mode ();
219 default_libgcc_cmp_return_mode (void)
225 default_libgcc_shift_count_mode (void)
231 default_unwind_word_mode (void)
236 /* The default implementation of TARGET_SHIFT_TRUNCATION_MASK. */
238 unsigned HOST_WIDE_INT
239 default_shift_truncation_mask (machine_mode mode
)
241 return SHIFT_COUNT_TRUNCATED
? GET_MODE_BITSIZE (mode
) - 1 : 0;
244 /* The default implementation of TARGET_MIN_DIVISIONS_FOR_RECIP_MUL. */
247 default_min_divisions_for_recip_mul (machine_mode mode ATTRIBUTE_UNUSED
)
249 return have_insn_for (DIV
, mode
) ? 3 : 2;
252 /* The default implementation of TARGET_MODE_REP_EXTENDED. */
255 default_mode_rep_extended (machine_mode mode ATTRIBUTE_UNUSED
,
256 machine_mode mode_rep ATTRIBUTE_UNUSED
)
261 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns true. */
264 hook_bool_CUMULATIVE_ARGS_true (cumulative_args_t a ATTRIBUTE_UNUSED
)
269 /* Return machine mode for non-standard suffix
270 or VOIDmode if non-standard suffixes are unsupported. */
272 default_mode_for_suffix (char suffix ATTRIBUTE_UNUSED
)
277 /* The generic C++ ABI specifies this is a 64-bit value. */
279 default_cxx_guard_type (void)
281 return long_long_integer_type_node
;
284 /* Returns the size of the cookie to use when allocating an array
285 whose elements have the indicated TYPE. Assumes that it is already
286 known that a cookie is needed. */
289 default_cxx_get_cookie_size (tree type
)
293 /* We need to allocate an additional max (sizeof (size_t), alignof
294 (true_type)) bytes. */
298 sizetype_size
= size_in_bytes (sizetype
);
299 type_align
= size_int (TYPE_ALIGN_UNIT (type
));
300 if (tree_int_cst_lt (type_align
, sizetype_size
))
301 cookie_size
= sizetype_size
;
303 cookie_size
= type_align
;
308 /* Return true if a parameter must be passed by reference. This version
309 of the TARGET_PASS_BY_REFERENCE hook uses just MUST_PASS_IN_STACK. */
312 hook_pass_by_reference_must_pass_in_stack (cumulative_args_t c ATTRIBUTE_UNUSED
,
313 machine_mode mode ATTRIBUTE_UNUSED
, const_tree type ATTRIBUTE_UNUSED
,
314 bool named_arg ATTRIBUTE_UNUSED
)
316 return targetm
.calls
.must_pass_in_stack (mode
, type
);
319 /* Return true if a parameter follows callee copies conventions. This
320 version of the hook is true for all named arguments. */
323 hook_callee_copies_named (cumulative_args_t ca ATTRIBUTE_UNUSED
,
324 machine_mode mode ATTRIBUTE_UNUSED
,
325 const_tree type ATTRIBUTE_UNUSED
, bool named
)
330 /* Emit to STREAM the assembler syntax for insn operand X. */
333 default_print_operand (FILE *stream ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
334 int code ATTRIBUTE_UNUSED
)
337 PRINT_OPERAND (stream
, x
, code
);
343 /* Emit to STREAM the assembler syntax for an insn operand whose memory
347 default_print_operand_address (FILE *stream ATTRIBUTE_UNUSED
,
348 machine_mode
/*mode*/,
349 rtx x ATTRIBUTE_UNUSED
)
351 #ifdef PRINT_OPERAND_ADDRESS
352 PRINT_OPERAND_ADDRESS (stream
, x
);
358 /* Return true if CODE is a valid punctuation character for the
359 `print_operand' hook. */
362 default_print_operand_punct_valid_p (unsigned char code ATTRIBUTE_UNUSED
)
364 #ifdef PRINT_OPERAND_PUNCT_VALID_P
365 return PRINT_OPERAND_PUNCT_VALID_P (code
);
371 /* The default implementation of TARGET_MANGLE_ASSEMBLER_NAME. */
373 default_mangle_assembler_name (const char *name ATTRIBUTE_UNUSED
)
375 const char *skipped
= name
+ (*name
== '*' ? 1 : 0);
376 const char *stripped
= targetm
.strip_name_encoding (skipped
);
377 if (*name
!= '*' && user_label_prefix
[0])
378 stripped
= ACONCAT ((user_label_prefix
, stripped
, NULL
));
379 return get_identifier (stripped
);
382 /* True if MODE is valid for the target. By "valid", we mean able to
383 be manipulated in non-trivial ways. In particular, this means all
384 the arithmetic is supported.
386 By default we guess this means that any C type is supported. If
387 we can't map the mode back to a type that would be available in C,
388 then reject it. Special case, here, is the double-word arithmetic
389 supported by optabs.c. */
392 default_scalar_mode_supported_p (machine_mode mode
)
394 int precision
= GET_MODE_PRECISION (mode
);
396 switch (GET_MODE_CLASS (mode
))
398 case MODE_PARTIAL_INT
:
400 if (precision
== CHAR_TYPE_SIZE
)
402 if (precision
== SHORT_TYPE_SIZE
)
404 if (precision
== INT_TYPE_SIZE
)
406 if (precision
== LONG_TYPE_SIZE
)
408 if (precision
== LONG_LONG_TYPE_SIZE
)
410 if (precision
== 2 * BITS_PER_WORD
)
415 if (precision
== FLOAT_TYPE_SIZE
)
417 if (precision
== DOUBLE_TYPE_SIZE
)
419 if (precision
== LONG_DOUBLE_TYPE_SIZE
)
423 case MODE_DECIMAL_FLOAT
:
435 /* Return true if libgcc supports floating-point mode MODE (known to
436 be supported as a scalar mode). */
439 default_libgcc_floating_mode_supported_p (machine_mode mode
)
462 /* Make some target macros useable by target-independent code. */
464 targhook_words_big_endian (void)
466 return !!WORDS_BIG_ENDIAN
;
470 targhook_float_words_big_endian (void)
472 return !!FLOAT_WORDS_BIG_ENDIAN
;
475 /* True if the target supports floating-point exceptions and rounding
479 default_float_exceptions_rounding_supported_p (void)
488 /* True if the target supports decimal floating point. */
491 default_decimal_float_supported_p (void)
493 return ENABLE_DECIMAL_FLOAT
;
496 /* True if the target supports fixed-point arithmetic. */
499 default_fixed_point_supported_p (void)
501 return ENABLE_FIXED_POINT
;
504 /* True if the target supports GNU indirect functions. */
507 default_has_ifunc_p (void)
509 return HAVE_GNU_INDIRECT_FUNCTION
;
512 /* NULL if INSN insn is valid within a low-overhead loop, otherwise returns
515 This function checks whether a given INSN is valid within a low-overhead
516 loop. If INSN is invalid it returns the reason for that, otherwise it
517 returns NULL. A called function may clobber any special registers required
518 for low-overhead looping. Additionally, some targets (eg, PPC) use the count
519 register for branch on table instructions. We reject the doloop pattern in
523 default_invalid_within_doloop (const rtx_insn
*insn
)
526 return "Function call in loop.";
528 if (tablejump_p (insn
, NULL
, NULL
) || computed_jump_p (insn
))
529 return "Computed branch in the loop.";
534 /* Mapping of builtin functions to vectorized variants. */
537 default_builtin_vectorized_function (unsigned int, tree
, tree
)
542 /* Mapping of target builtin functions to vectorized variants. */
545 default_builtin_md_vectorized_function (tree
, tree
, tree
)
550 /* Vectorized conversion. */
553 default_builtin_vectorized_conversion (unsigned int code ATTRIBUTE_UNUSED
,
554 tree dest_type ATTRIBUTE_UNUSED
,
555 tree src_type ATTRIBUTE_UNUSED
)
560 /* Default vectorizer cost model values. */
563 default_builtin_vectorization_cost (enum vect_cost_for_stmt type_of_cost
,
565 int misalign ATTRIBUTE_UNUSED
)
569 switch (type_of_cost
)
579 case cond_branch_not_taken
:
581 case vec_promote_demote
:
585 case unaligned_store
:
588 case cond_branch_taken
:
592 elements
= TYPE_VECTOR_SUBPARTS (vectype
);
593 return elements
/ 2 + 1;
603 default_builtin_reciprocal (unsigned int fn ATTRIBUTE_UNUSED
,
604 bool md_fn ATTRIBUTE_UNUSED
,
605 bool sqrt ATTRIBUTE_UNUSED
)
611 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_false (
612 cumulative_args_t ca ATTRIBUTE_UNUSED
,
613 machine_mode mode ATTRIBUTE_UNUSED
,
614 const_tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
620 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_true (
621 cumulative_args_t ca ATTRIBUTE_UNUSED
,
622 machine_mode mode ATTRIBUTE_UNUSED
,
623 const_tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
629 hook_int_CUMULATIVE_ARGS_mode_tree_bool_0 (
630 cumulative_args_t ca ATTRIBUTE_UNUSED
,
631 machine_mode mode ATTRIBUTE_UNUSED
,
632 tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
638 default_function_arg_advance (cumulative_args_t ca ATTRIBUTE_UNUSED
,
639 machine_mode mode ATTRIBUTE_UNUSED
,
640 const_tree type ATTRIBUTE_UNUSED
,
641 bool named ATTRIBUTE_UNUSED
)
647 default_function_arg (cumulative_args_t ca ATTRIBUTE_UNUSED
,
648 machine_mode mode ATTRIBUTE_UNUSED
,
649 const_tree type ATTRIBUTE_UNUSED
,
650 bool named ATTRIBUTE_UNUSED
)
656 default_function_incoming_arg (cumulative_args_t ca ATTRIBUTE_UNUSED
,
657 machine_mode mode ATTRIBUTE_UNUSED
,
658 const_tree type ATTRIBUTE_UNUSED
,
659 bool named ATTRIBUTE_UNUSED
)
665 default_function_arg_boundary (machine_mode mode ATTRIBUTE_UNUSED
,
666 const_tree type ATTRIBUTE_UNUSED
)
668 return PARM_BOUNDARY
;
672 default_function_arg_round_boundary (machine_mode mode ATTRIBUTE_UNUSED
,
673 const_tree type ATTRIBUTE_UNUSED
)
675 return PARM_BOUNDARY
;
679 hook_void_bitmap (bitmap regs ATTRIBUTE_UNUSED
)
684 hook_invalid_arg_for_unprototyped_fn (
685 const_tree typelist ATTRIBUTE_UNUSED
,
686 const_tree funcdecl ATTRIBUTE_UNUSED
,
687 const_tree val ATTRIBUTE_UNUSED
)
692 /* Initialize the stack protection decls. */
694 /* Stack protection related decls living in libgcc. */
695 static GTY(()) tree stack_chk_guard_decl
;
698 default_stack_protect_guard (void)
700 tree t
= stack_chk_guard_decl
;
706 t
= build_decl (UNKNOWN_LOCATION
,
707 VAR_DECL
, get_identifier ("__stack_chk_guard"),
711 DECL_EXTERNAL (t
) = 1;
713 TREE_THIS_VOLATILE (t
) = 1;
714 DECL_ARTIFICIAL (t
) = 1;
715 DECL_IGNORED_P (t
) = 1;
717 /* Do not share RTL as the declaration is visible outside of
720 RTX_FLAG (x
, used
) = 1;
722 stack_chk_guard_decl
= t
;
728 static GTY(()) tree stack_chk_fail_decl
;
731 default_external_stack_protect_fail (void)
733 tree t
= stack_chk_fail_decl
;
737 t
= build_function_type_list (void_type_node
, NULL_TREE
);
738 t
= build_decl (UNKNOWN_LOCATION
,
739 FUNCTION_DECL
, get_identifier ("__stack_chk_fail"), t
);
742 DECL_EXTERNAL (t
) = 1;
744 TREE_THIS_VOLATILE (t
) = 1;
745 TREE_NOTHROW (t
) = 1;
746 DECL_ARTIFICIAL (t
) = 1;
747 DECL_IGNORED_P (t
) = 1;
748 DECL_VISIBILITY (t
) = VISIBILITY_DEFAULT
;
749 DECL_VISIBILITY_SPECIFIED (t
) = 1;
751 stack_chk_fail_decl
= t
;
754 return build_call_expr (t
, 0);
758 default_hidden_stack_protect_fail (void)
760 #ifndef HAVE_GAS_HIDDEN
761 return default_external_stack_protect_fail ();
763 tree t
= stack_chk_fail_decl
;
766 return default_external_stack_protect_fail ();
770 t
= build_function_type_list (void_type_node
, NULL_TREE
);
771 t
= build_decl (UNKNOWN_LOCATION
, FUNCTION_DECL
,
772 get_identifier ("__stack_chk_fail_local"), t
);
775 DECL_EXTERNAL (t
) = 1;
777 TREE_THIS_VOLATILE (t
) = 1;
778 TREE_NOTHROW (t
) = 1;
779 DECL_ARTIFICIAL (t
) = 1;
780 DECL_IGNORED_P (t
) = 1;
781 DECL_VISIBILITY_SPECIFIED (t
) = 1;
782 DECL_VISIBILITY (t
) = VISIBILITY_HIDDEN
;
784 stack_chk_fail_decl
= t
;
787 return build_call_expr (t
, 0);
792 hook_bool_const_rtx_commutative_p (const_rtx x
,
793 int outer_code ATTRIBUTE_UNUSED
)
795 return COMMUTATIVE_P (x
);
799 default_function_value (const_tree ret_type ATTRIBUTE_UNUSED
,
800 const_tree fn_decl_or_type
,
801 bool outgoing ATTRIBUTE_UNUSED
)
803 /* The old interface doesn't handle receiving the function type. */
805 && !DECL_P (fn_decl_or_type
))
806 fn_decl_or_type
= NULL
;
808 #ifdef FUNCTION_VALUE
809 return FUNCTION_VALUE (ret_type
, fn_decl_or_type
);
816 default_libcall_value (machine_mode mode ATTRIBUTE_UNUSED
,
817 const_rtx fun ATTRIBUTE_UNUSED
)
820 return LIBCALL_VALUE (mode
);
826 /* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */
829 default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED
)
831 #ifdef FUNCTION_VALUE_REGNO_P
832 return FUNCTION_VALUE_REGNO_P (regno
);
839 default_internal_arg_pointer (void)
841 /* If the reg that the virtual arg pointer will be translated into is
842 not a fixed reg or is the stack pointer, make a copy of the virtual
843 arg pointer, and address parms via the copy. The frame pointer is
844 considered fixed even though it is not marked as such. */
845 if ((ARG_POINTER_REGNUM
== STACK_POINTER_REGNUM
846 || ! (fixed_regs
[ARG_POINTER_REGNUM
]
847 || ARG_POINTER_REGNUM
== FRAME_POINTER_REGNUM
)))
848 return copy_to_reg (virtual_incoming_args_rtx
);
850 return virtual_incoming_args_rtx
;
854 default_static_chain (const_tree
ARG_UNUSED (fndecl_or_type
), bool incoming_p
)
858 #ifdef STATIC_CHAIN_INCOMING_REGNUM
859 return gen_rtx_REG (Pmode
, STATIC_CHAIN_INCOMING_REGNUM
);
863 #ifdef STATIC_CHAIN_REGNUM
864 return gen_rtx_REG (Pmode
, STATIC_CHAIN_REGNUM
);
868 static bool issued_error
;
872 sorry ("nested functions not supported on this target");
875 /* It really doesn't matter what we return here, so long at it
876 doesn't cause the rest of the compiler to crash. */
877 return gen_rtx_MEM (Pmode
, stack_pointer_rtx
);
882 default_trampoline_init (rtx
ARG_UNUSED (m_tramp
), tree
ARG_UNUSED (t_func
),
883 rtx
ARG_UNUSED (r_chain
))
885 sorry ("nested function trampolines not supported on this target");
889 default_return_pops_args (tree fundecl ATTRIBUTE_UNUSED
,
890 tree funtype ATTRIBUTE_UNUSED
,
891 int size ATTRIBUTE_UNUSED
)
897 default_branch_target_register_class (void)
903 default_ira_change_pseudo_allocno_class (int regno ATTRIBUTE_UNUSED
,
916 default_register_priority (int hard_regno ATTRIBUTE_UNUSED
)
922 default_register_usage_leveling_p (void)
928 default_different_addr_displacement_p (void)
934 default_secondary_reload (bool in_p ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
935 reg_class_t reload_class_i ATTRIBUTE_UNUSED
,
936 machine_mode reload_mode ATTRIBUTE_UNUSED
,
937 secondary_reload_info
*sri
)
939 enum reg_class rclass
= NO_REGS
;
940 enum reg_class reload_class
= (enum reg_class
) reload_class_i
;
942 if (sri
->prev_sri
&& sri
->prev_sri
->t_icode
!= CODE_FOR_nothing
)
944 sri
->icode
= sri
->prev_sri
->t_icode
;
947 #ifdef SECONDARY_INPUT_RELOAD_CLASS
949 rclass
= SECONDARY_INPUT_RELOAD_CLASS (reload_class
, reload_mode
, x
);
951 #ifdef SECONDARY_OUTPUT_RELOAD_CLASS
953 rclass
= SECONDARY_OUTPUT_RELOAD_CLASS (reload_class
, reload_mode
, x
);
955 if (rclass
!= NO_REGS
)
958 = direct_optab_handler (in_p
? reload_in_optab
: reload_out_optab
,
961 if (icode
!= CODE_FOR_nothing
962 && !insn_operand_matches (icode
, in_p
, x
))
963 icode
= CODE_FOR_nothing
;
964 else if (icode
!= CODE_FOR_nothing
)
966 const char *insn_constraint
, *scratch_constraint
;
967 enum reg_class insn_class
, scratch_class
;
969 gcc_assert (insn_data
[(int) icode
].n_operands
== 3);
970 insn_constraint
= insn_data
[(int) icode
].operand
[!in_p
].constraint
;
971 if (!*insn_constraint
)
972 insn_class
= ALL_REGS
;
977 gcc_assert (*insn_constraint
== '=');
980 insn_class
= (reg_class_for_constraint
981 (lookup_constraint (insn_constraint
)));
982 gcc_assert (insn_class
!= NO_REGS
);
985 scratch_constraint
= insn_data
[(int) icode
].operand
[2].constraint
;
986 /* The scratch register's constraint must start with "=&",
987 except for an input reload, where only "=" is necessary,
988 and where it might be beneficial to re-use registers from
990 gcc_assert (scratch_constraint
[0] == '='
991 && (in_p
|| scratch_constraint
[1] == '&'));
992 scratch_constraint
++;
993 if (*scratch_constraint
== '&')
994 scratch_constraint
++;
995 scratch_class
= (reg_class_for_constraint
996 (lookup_constraint (scratch_constraint
)));
998 if (reg_class_subset_p (reload_class
, insn_class
))
1000 gcc_assert (scratch_class
== rclass
);
1004 rclass
= insn_class
;
1007 if (rclass
== NO_REGS
)
1010 sri
->t_icode
= icode
;
1015 /* By default, if flag_pic is true, then neither local nor global relocs
1016 should be placed in readonly memory. */
1019 default_reloc_rw_mask (void)
1021 return flag_pic
? 3 : 0;
1024 /* By default, do no modification. */
1025 tree
default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED
,
1031 /* Default to natural alignment for vector types. */
1033 default_vector_alignment (const_tree type
)
1035 return tree_to_shwi (TYPE_SIZE (type
));
1039 default_builtin_vector_alignment_reachable (const_tree type
, bool is_packed
)
1044 /* Assuming that types whose size is > pointer-size are not guaranteed to be
1045 naturally aligned. */
1046 if (tree_int_cst_compare (TYPE_SIZE (type
), bitsize_int (POINTER_SIZE
)) > 0)
1049 /* Assuming that types whose size is <= pointer-size
1050 are naturally aligned. */
1054 /* By default, assume that a target supports any factor of misalignment
1055 memory access if it supports movmisalign patten.
1056 is_packed is true if the memory access is defined in a packed struct. */
1058 default_builtin_support_vector_misalignment (machine_mode mode
,
1066 if (optab_handler (movmisalign_optab
, mode
) != CODE_FOR_nothing
)
1071 /* By default, only attempt to parallelize bitwise operations, and
1072 possibly adds/subtracts using bit-twiddling. */
1075 default_preferred_simd_mode (machine_mode mode ATTRIBUTE_UNUSED
)
1080 /* By default only the size derived from the preferred vector mode
1084 default_autovectorize_vector_sizes (void)
1089 /* By defaults a vector of integers is used as a mask. */
1092 default_get_mask_mode (unsigned nunits
, unsigned vector_size
)
1094 unsigned elem_size
= vector_size
/ nunits
;
1095 machine_mode elem_mode
1096 = smallest_mode_for_size (elem_size
* BITS_PER_UNIT
, MODE_INT
);
1097 machine_mode vector_mode
;
1099 gcc_assert (elem_size
* nunits
== vector_size
);
1101 vector_mode
= mode_for_vector (elem_mode
, nunits
);
1102 if (!VECTOR_MODE_P (vector_mode
)
1103 || !targetm
.vector_mode_supported_p (vector_mode
))
1104 vector_mode
= BLKmode
;
1109 /* By default, the cost model accumulates three separate costs (prologue,
1110 loop body, and epilogue) for a vectorized loop or block. So allocate an
1111 array of three unsigned ints, set it to zero, and return its address. */
1114 default_init_cost (struct loop
*loop_info ATTRIBUTE_UNUSED
)
1116 unsigned *cost
= XNEWVEC (unsigned, 3);
1117 cost
[vect_prologue
] = cost
[vect_body
] = cost
[vect_epilogue
] = 0;
1121 /* By default, the cost model looks up the cost of the given statement
1122 kind and mode, multiplies it by the occurrence count, accumulates
1123 it into the cost specified by WHERE, and returns the cost added. */
1126 default_add_stmt_cost (void *data
, int count
, enum vect_cost_for_stmt kind
,
1127 struct _stmt_vec_info
*stmt_info
, int misalign
,
1128 enum vect_cost_model_location where
)
1130 unsigned *cost
= (unsigned *) data
;
1131 unsigned retval
= 0;
1133 tree vectype
= stmt_info
? stmt_vectype (stmt_info
) : NULL_TREE
;
1134 int stmt_cost
= targetm
.vectorize
.builtin_vectorization_cost (kind
, vectype
,
1136 /* Statements in an inner loop relative to the loop being
1137 vectorized are weighted more heavily. The value here is
1138 arbitrary and could potentially be improved with analysis. */
1139 if (where
== vect_body
&& stmt_info
&& stmt_in_inner_loop_p (stmt_info
))
1140 count
*= 50; /* FIXME. */
1142 retval
= (unsigned) (count
* stmt_cost
);
1143 cost
[where
] += retval
;
1148 /* By default, the cost model just returns the accumulated costs. */
1151 default_finish_cost (void *data
, unsigned *prologue_cost
,
1152 unsigned *body_cost
, unsigned *epilogue_cost
)
1154 unsigned *cost
= (unsigned *) data
;
1155 *prologue_cost
= cost
[vect_prologue
];
1156 *body_cost
= cost
[vect_body
];
1157 *epilogue_cost
= cost
[vect_epilogue
];
1160 /* Free the cost data. */
1163 default_destroy_cost_data (void *data
)
1168 /* Determine whether or not a pointer mode is valid. Assume defaults
1169 of ptr_mode or Pmode - can be overridden. */
1171 default_valid_pointer_mode (machine_mode mode
)
1173 return (mode
== ptr_mode
|| mode
== Pmode
);
1176 /* Determine whether the memory reference specified by REF may alias
1177 the C libraries errno location. */
1179 default_ref_may_alias_errno (ao_ref
*ref
)
1181 tree base
= ao_ref_base (ref
);
1182 /* The default implementation assumes the errno location is
1183 a declaration of type int or is always accessed via a
1184 pointer to int. We assume that accesses to errno are
1185 not deliberately obfuscated (even in conforming ways). */
1186 if (TYPE_UNSIGNED (TREE_TYPE (base
))
1187 || TYPE_MODE (TREE_TYPE (base
)) != TYPE_MODE (integer_type_node
))
1189 /* The default implementation assumes an errno location
1190 declaration is never defined in the current compilation unit. */
1192 && !TREE_STATIC (base
))
1194 else if (TREE_CODE (base
) == MEM_REF
1195 && TREE_CODE (TREE_OPERAND (base
, 0)) == SSA_NAME
)
1197 struct ptr_info_def
*pi
= SSA_NAME_PTR_INFO (TREE_OPERAND (base
, 0));
1198 return !pi
|| pi
->pt
.anything
|| pi
->pt
.nonlocal
;
1203 /* Return the mode for a pointer to a given ADDRSPACE,
1204 defaulting to ptr_mode for all address spaces. */
1207 default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1212 /* Return the mode for an address in a given ADDRSPACE,
1213 defaulting to Pmode for all address spaces. */
1216 default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1221 /* Named address space version of valid_pointer_mode.
1222 To match the above, the same modes apply to all address spaces. */
1225 default_addr_space_valid_pointer_mode (machine_mode mode
,
1226 addr_space_t as ATTRIBUTE_UNUSED
)
1228 return targetm
.valid_pointer_mode (mode
);
1231 /* Some places still assume that all pointer or address modes are the
1232 standard Pmode and ptr_mode. These optimizations become invalid if
1233 the target actually supports multiple different modes. For now,
1234 we disable such optimizations on such targets, using this function. */
1237 target_default_pointer_address_modes_p (void)
1239 if (targetm
.addr_space
.address_mode
!= default_addr_space_address_mode
)
1241 if (targetm
.addr_space
.pointer_mode
!= default_addr_space_pointer_mode
)
1247 /* Named address space version of legitimate_address_p.
1248 By default, all address spaces have the same form. */
1251 default_addr_space_legitimate_address_p (machine_mode mode
, rtx mem
,
1253 addr_space_t as ATTRIBUTE_UNUSED
)
1255 return targetm
.legitimate_address_p (mode
, mem
, strict
);
1258 /* Named address space version of LEGITIMIZE_ADDRESS.
1259 By default, all address spaces have the same form. */
1262 default_addr_space_legitimize_address (rtx x
, rtx oldx
, machine_mode mode
,
1263 addr_space_t as ATTRIBUTE_UNUSED
)
1265 return targetm
.legitimize_address (x
, oldx
, mode
);
1268 /* The default hook for determining if one named address space is a subset of
1269 another and to return which address space to use as the common address
1273 default_addr_space_subset_p (addr_space_t subset
, addr_space_t superset
)
1275 return (subset
== superset
);
1278 /* The default hook for determining if 0 within a named address
1279 space is a valid address. */
1282 default_addr_space_zero_address_valid (addr_space_t as ATTRIBUTE_UNUSED
)
1287 /* The default hook for debugging the address space is to return the
1288 address space number to indicate DW_AT_address_class. */
1290 default_addr_space_debug (addr_space_t as
)
1295 /* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be
1296 called for targets with only a generic address space. */
1299 default_addr_space_convert (rtx op ATTRIBUTE_UNUSED
,
1300 tree from_type ATTRIBUTE_UNUSED
,
1301 tree to_type ATTRIBUTE_UNUSED
)
1307 default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED
)
1312 /* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */
1315 default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED
,
1316 addr_space_t addrspace ATTRIBUTE_UNUSED
)
1322 default_target_option_valid_attribute_p (tree
ARG_UNUSED (fndecl
),
1323 tree
ARG_UNUSED (name
),
1324 tree
ARG_UNUSED (args
),
1325 int ARG_UNUSED (flags
))
1327 warning (OPT_Wattributes
,
1328 "target attribute is not supported on this machine");
1334 default_target_option_pragma_parse (tree
ARG_UNUSED (args
),
1335 tree
ARG_UNUSED (pop_target
))
1337 /* If args is NULL the caller is handle_pragma_pop_options (). In that case,
1338 emit no warning because "#pragma GCC pop_target" is valid on targets that
1339 do not have the "target" pragma. */
1341 warning (OPT_Wpragmas
,
1342 "#pragma GCC target is not supported for this machine");
1348 default_target_can_inline_p (tree caller
, tree callee
)
1351 tree callee_opts
= DECL_FUNCTION_SPECIFIC_TARGET (callee
);
1352 tree caller_opts
= DECL_FUNCTION_SPECIFIC_TARGET (caller
);
1354 /* If callee has no option attributes, then it is ok to inline */
1358 /* If caller has no option attributes, but callee does then it is not ok to
1360 else if (!caller_opts
)
1363 /* If both caller and callee have attributes, assume that if the
1364 pointer is different, the two functions have different target
1365 options since build_target_option_node uses a hash table for the
1368 ret
= (callee_opts
== caller_opts
);
1373 /* If the machine does not have a case insn that compares the bounds,
1374 this means extra overhead for dispatch tables, which raises the
1375 threshold for using them. */
1378 default_case_values_threshold (void)
1380 return (targetm
.have_casesi () ? 4 : 5);
1384 default_have_conditional_execution (void)
1386 return HAVE_conditional_execution
;
1389 /* By default we assume that c99 functions are present at the runtime,
1390 but sincos is not. */
1392 default_libc_has_function (enum function_class fn_class
)
1394 if (fn_class
== function_c94
1395 || fn_class
== function_c99_misc
1396 || fn_class
== function_c99_math_complex
)
1403 gnu_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED
)
1409 no_c99_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED
)
1415 default_builtin_tm_load_store (tree
ARG_UNUSED (type
))
1420 /* Compute cost of moving registers to/from memory. */
1423 default_memory_move_cost (machine_mode mode ATTRIBUTE_UNUSED
,
1424 reg_class_t rclass ATTRIBUTE_UNUSED
,
1425 bool in ATTRIBUTE_UNUSED
)
1427 #ifndef MEMORY_MOVE_COST
1428 return (4 + memory_move_secondary_cost (mode
, (enum reg_class
) rclass
, in
));
1430 return MEMORY_MOVE_COST (mode
, (enum reg_class
) rclass
, in
);
1434 /* Compute cost of moving data from a register of class FROM to one of
1438 default_register_move_cost (machine_mode mode ATTRIBUTE_UNUSED
,
1439 reg_class_t from ATTRIBUTE_UNUSED
,
1440 reg_class_t to ATTRIBUTE_UNUSED
)
1442 #ifndef REGISTER_MOVE_COST
1445 return REGISTER_MOVE_COST (mode
, (enum reg_class
) from
, (enum reg_class
) to
);
1449 /* For hooks which use the MOVE_RATIO macro, this gives the legacy default
1450 behaviour. SPEED_P is true if we are compiling for speed. */
1453 get_move_ratio (bool speed_p ATTRIBUTE_UNUSED
)
1455 unsigned int move_ratio
;
1457 move_ratio
= (unsigned int) MOVE_RATIO (speed_p
);
1459 #if defined (HAVE_movmemqi) || defined (HAVE_movmemhi) || defined (HAVE_movmemsi) || defined (HAVE_movmemdi) || defined (HAVE_movmemti)
1461 #else /* No movmem patterns, pick a default. */
1462 move_ratio
= ((speed_p
) ? 15 : 3);
1468 /* Return TRUE if the move_by_pieces/set_by_pieces infrastructure should be
1469 used; return FALSE if the movmem/setmem optab should be expanded, or
1470 a call to memcpy emitted. */
1473 default_use_by_pieces_infrastructure_p (unsigned HOST_WIDE_INT size
,
1474 unsigned int alignment
,
1475 enum by_pieces_operation op
,
1478 unsigned int max_size
= 0;
1479 unsigned int ratio
= 0;
1483 case CLEAR_BY_PIECES
:
1484 max_size
= STORE_MAX_PIECES
;
1485 ratio
= CLEAR_RATIO (speed_p
);
1487 case MOVE_BY_PIECES
:
1488 max_size
= MOVE_MAX_PIECES
;
1489 ratio
= get_move_ratio (speed_p
);
1492 max_size
= STORE_MAX_PIECES
;
1493 ratio
= SET_RATIO (speed_p
);
1495 case STORE_BY_PIECES
:
1496 max_size
= STORE_MAX_PIECES
;
1497 ratio
= get_move_ratio (speed_p
);
1501 return move_by_pieces_ninsns (size
, alignment
, max_size
+ 1) < ratio
;
1505 default_profile_before_prologue (void)
1507 #ifdef PROFILE_BEFORE_PROLOGUE
1514 /* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */
1517 default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED
,
1520 #ifdef PREFERRED_RELOAD_CLASS
1521 return (reg_class_t
) PREFERRED_RELOAD_CLASS (x
, (enum reg_class
) rclass
);
1527 /* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */
1530 default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED
,
1536 /* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */
1538 default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED
)
1543 /* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */
1546 default_class_likely_spilled_p (reg_class_t rclass
)
1548 return (reg_class_size
[(int) rclass
] == 1);
1551 /* The default implementation of TARGET_CLASS_MAX_NREGS. */
1554 default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED
,
1555 machine_mode mode ATTRIBUTE_UNUSED
)
1557 #ifdef CLASS_MAX_NREGS
1558 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class
) rclass
, mode
);
1560 return ((GET_MODE_SIZE (mode
) + UNITS_PER_WORD
- 1) / UNITS_PER_WORD
);
1564 /* Determine the debugging unwind mechanism for the target. */
1566 enum unwind_info_type
1567 default_debug_unwind_info (void)
1569 /* If the target wants to force the use of dwarf2 unwind info, let it. */
1570 /* ??? Change all users to the hook, then poison this. */
1571 #ifdef DWARF2_FRAME_INFO
1572 if (DWARF2_FRAME_INFO
)
1576 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */
1577 #ifdef DWARF2_DEBUGGING_INFO
1578 if (write_symbols
== DWARF2_DEBUG
|| write_symbols
== VMS_AND_DWARF2_DEBUG
)
1585 /* Determine the correct mode for a Dwarf frame register that represents
1589 default_dwarf_frame_reg_mode (int regno
)
1591 machine_mode save_mode
= reg_raw_mode
[regno
];
1593 if (HARD_REGNO_CALL_PART_CLOBBERED (regno
, save_mode
))
1594 save_mode
= choose_hard_reg_mode (regno
, 1, true);
1598 /* To be used by targets where reg_raw_mode doesn't return the right
1599 mode for registers used in apply_builtin_return and apply_builtin_arg. */
1602 default_get_reg_raw_mode (int regno
)
1604 return reg_raw_mode
[regno
];
1607 /* Return true if a leaf function should stay leaf even with profiling
1611 default_keep_leaf_when_profiled ()
1616 /* Return true if the state of option OPTION should be stored in PCH files
1617 and checked by default_pch_valid_p. Store the option's current state
1621 option_affects_pch_p (int option
, struct cl_option_state
*state
)
1623 if ((cl_options
[option
].flags
& CL_TARGET
) == 0)
1625 if ((cl_options
[option
].flags
& CL_PCH_IGNORE
) != 0)
1627 if (option_flag_var (option
, &global_options
) == &target_flags
)
1628 if (targetm
.check_pch_target_flags
)
1630 return get_option_state (&global_options
, option
, state
);
1633 /* Default version of get_pch_validity.
1634 By default, every flag difference is fatal; that will be mostly right for
1635 most targets, but completely right for very few. */
1638 default_get_pch_validity (size_t *sz
)
1640 struct cl_option_state state
;
1645 if (targetm
.check_pch_target_flags
)
1646 *sz
+= sizeof (target_flags
);
1647 for (i
= 0; i
< cl_options_count
; i
++)
1648 if (option_affects_pch_p (i
, &state
))
1651 result
= r
= XNEWVEC (char, *sz
);
1655 if (targetm
.check_pch_target_flags
)
1657 memcpy (r
, &target_flags
, sizeof (target_flags
));
1658 r
+= sizeof (target_flags
);
1661 for (i
= 0; i
< cl_options_count
; i
++)
1662 if (option_affects_pch_p (i
, &state
))
1664 memcpy (r
, state
.data
, state
.size
);
1671 /* Return a message which says that a PCH file was created with a different
1672 setting of OPTION. */
1675 pch_option_mismatch (const char *option
)
1677 return xasprintf (_("created and used with differing settings of '%s'"),
1681 /* Default version of pch_valid_p. */
1684 default_pch_valid_p (const void *data_p
, size_t len
)
1686 struct cl_option_state state
;
1687 const char *data
= (const char *)data_p
;
1690 /* -fpic and -fpie also usually make a PCH invalid. */
1691 if (data
[0] != flag_pic
)
1692 return _("created and used with different settings of -fpic");
1693 if (data
[1] != flag_pie
)
1694 return _("created and used with different settings of -fpie");
1697 /* Check target_flags. */
1698 if (targetm
.check_pch_target_flags
)
1703 memcpy (&tf
, data
, sizeof (target_flags
));
1704 data
+= sizeof (target_flags
);
1705 len
-= sizeof (target_flags
);
1706 r
= targetm
.check_pch_target_flags (tf
);
1711 for (i
= 0; i
< cl_options_count
; i
++)
1712 if (option_affects_pch_p (i
, &state
))
1714 if (memcmp (data
, state
.data
, state
.size
) != 0)
1715 return pch_option_mismatch (cl_options
[i
].opt_text
);
1723 /* Default version of cstore_mode. */
1726 default_cstore_mode (enum insn_code icode
)
1728 return insn_data
[(int) icode
].operand
[0].mode
;
1731 /* Default version of member_type_forces_blk. */
1734 default_member_type_forces_blk (const_tree
, machine_mode
)
1740 default_load_bounds_for_arg (rtx addr ATTRIBUTE_UNUSED
,
1741 rtx ptr ATTRIBUTE_UNUSED
,
1742 rtx bnd ATTRIBUTE_UNUSED
)
1748 default_store_bounds_for_arg (rtx val ATTRIBUTE_UNUSED
,
1749 rtx addr ATTRIBUTE_UNUSED
,
1750 rtx bounds ATTRIBUTE_UNUSED
,
1751 rtx to ATTRIBUTE_UNUSED
)
1757 default_load_returned_bounds (rtx slot ATTRIBUTE_UNUSED
)
1763 default_store_returned_bounds (rtx slot ATTRIBUTE_UNUSED
,
1764 rtx bounds ATTRIBUTE_UNUSED
)
1769 /* Default version of canonicalize_comparison. */
1772 default_canonicalize_comparison (int *, rtx
*, rtx
*, bool)
1776 /* Default implementation of TARGET_ATOMIC_ASSIGN_EXPAND_FENV. */
1779 default_atomic_assign_expand_fenv (tree
*, tree
*, tree
*)
1783 #ifndef PAD_VARARGS_DOWN
1784 #define PAD_VARARGS_DOWN BYTES_BIG_ENDIAN
1787 /* Build an indirect-ref expression over the given TREE, which represents a
1788 piece of a va_arg() expansion. */
1790 build_va_arg_indirect_ref (tree addr
)
1792 addr
= build_simple_mem_ref_loc (EXPR_LOCATION (addr
), addr
);
1796 /* The "standard" implementation of va_arg: read the value from the
1797 current (padded) address and increment by the (padded) size. */
1800 std_gimplify_va_arg_expr (tree valist
, tree type
, gimple_seq
*pre_p
,
1803 tree addr
, t
, type_size
, rounded_size
, valist_tmp
;
1804 unsigned HOST_WIDE_INT align
, boundary
;
1807 /* All of the alignment and movement below is for args-grow-up machines.
1808 As of 2004, there are only 3 ARGS_GROW_DOWNWARD targets, and they all
1809 implement their own specialized gimplify_va_arg_expr routines. */
1810 if (ARGS_GROW_DOWNWARD
)
1813 indirect
= pass_by_reference (NULL
, TYPE_MODE (type
), type
, false);
1815 type
= build_pointer_type (type
);
1817 align
= PARM_BOUNDARY
/ BITS_PER_UNIT
;
1818 boundary
= targetm
.calls
.function_arg_boundary (TYPE_MODE (type
), type
);
1820 /* When we align parameter on stack for caller, if the parameter
1821 alignment is beyond MAX_SUPPORTED_STACK_ALIGNMENT, it will be
1822 aligned at MAX_SUPPORTED_STACK_ALIGNMENT. We will match callee
1823 here with caller. */
1824 if (boundary
> MAX_SUPPORTED_STACK_ALIGNMENT
)
1825 boundary
= MAX_SUPPORTED_STACK_ALIGNMENT
;
1827 boundary
/= BITS_PER_UNIT
;
1829 /* Hoist the valist value into a temporary for the moment. */
1830 valist_tmp
= get_initialized_tmp_var (valist
, pre_p
, NULL
);
1832 /* va_list pointer is aligned to PARM_BOUNDARY. If argument actually
1833 requires greater alignment, we must perform dynamic alignment. */
1834 if (boundary
> align
1835 && !integer_zerop (TYPE_SIZE (type
)))
1837 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist_tmp
,
1838 fold_build_pointer_plus_hwi (valist_tmp
, boundary
- 1));
1839 gimplify_and_add (t
, pre_p
);
1841 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist_tmp
,
1842 fold_build2 (BIT_AND_EXPR
, TREE_TYPE (valist
),
1844 build_int_cst (TREE_TYPE (valist
), -boundary
)));
1845 gimplify_and_add (t
, pre_p
);
1850 /* If the actual alignment is less than the alignment of the type,
1851 adjust the type accordingly so that we don't assume strict alignment
1852 when dereferencing the pointer. */
1853 boundary
*= BITS_PER_UNIT
;
1854 if (boundary
< TYPE_ALIGN (type
))
1856 type
= build_variant_type_copy (type
);
1857 TYPE_ALIGN (type
) = boundary
;
1860 /* Compute the rounded size of the type. */
1861 type_size
= size_in_bytes (type
);
1862 rounded_size
= round_up (type_size
, align
);
1864 /* Reduce rounded_size so it's sharable with the postqueue. */
1865 gimplify_expr (&rounded_size
, pre_p
, post_p
, is_gimple_val
, fb_rvalue
);
1869 if (PAD_VARARGS_DOWN
&& !integer_zerop (rounded_size
))
1871 /* Small args are padded downward. */
1872 t
= fold_build2_loc (input_location
, GT_EXPR
, sizetype
,
1873 rounded_size
, size_int (align
));
1874 t
= fold_build3 (COND_EXPR
, sizetype
, t
, size_zero_node
,
1875 size_binop (MINUS_EXPR
, rounded_size
, type_size
));
1876 addr
= fold_build_pointer_plus (addr
, t
);
1879 /* Compute new value for AP. */
1880 t
= fold_build_pointer_plus (valist_tmp
, rounded_size
);
1881 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist
, t
);
1882 gimplify_and_add (t
, pre_p
);
1884 addr
= fold_convert (build_pointer_type (type
), addr
);
1887 addr
= build_va_arg_indirect_ref (addr
);
1889 return build_va_arg_indirect_ref (addr
);
1893 default_chkp_bound_type (void)
1895 tree res
= make_node (POINTER_BOUNDS_TYPE
);
1896 TYPE_PRECISION (res
) = TYPE_PRECISION (size_type_node
) * 2;
1897 TYPE_NAME (res
) = get_identifier ("__bounds_type");
1898 SET_TYPE_MODE (res
, targetm
.chkp_bound_mode ());
1904 default_chkp_bound_mode (void)
1910 default_builtin_chkp_function (unsigned int fcode ATTRIBUTE_UNUSED
)
1916 default_chkp_function_value_bounds (const_tree ret_type ATTRIBUTE_UNUSED
,
1917 const_tree fn_decl_or_type ATTRIBUTE_UNUSED
,
1918 bool outgoing ATTRIBUTE_UNUSED
)
1924 default_chkp_make_bounds_constant (HOST_WIDE_INT lb ATTRIBUTE_UNUSED
,
1925 HOST_WIDE_INT ub ATTRIBUTE_UNUSED
)
1931 default_chkp_initialize_bounds (tree var ATTRIBUTE_UNUSED
,
1932 tree lb ATTRIBUTE_UNUSED
,
1933 tree ub ATTRIBUTE_UNUSED
,
1934 tree
*stmts ATTRIBUTE_UNUSED
)
1940 default_setup_incoming_vararg_bounds (cumulative_args_t ca ATTRIBUTE_UNUSED
,
1941 enum machine_mode mode ATTRIBUTE_UNUSED
,
1942 tree type ATTRIBUTE_UNUSED
,
1943 int *pretend_arg_size ATTRIBUTE_UNUSED
,
1944 int second_time ATTRIBUTE_UNUSED
)
1948 /* An implementation of TARGET_CAN_USE_DOLOOP_P for targets that do
1949 not support nested low-overhead loops. */
1952 can_use_doloop_if_innermost (const widest_int
&, const widest_int
&,
1953 unsigned int loop_depth
, bool)
1955 return loop_depth
== 1;
1958 #include "gt-targhooks.h"