1 /* Default target hook functions.
2 Copyright (C) 2003-2016 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"
83 default_legitimate_address_p (machine_mode mode ATTRIBUTE_UNUSED
,
84 rtx addr ATTRIBUTE_UNUSED
,
85 bool strict ATTRIBUTE_UNUSED
)
87 #ifdef GO_IF_LEGITIMATE_ADDRESS
88 /* Defer to the old implementation using a goto. */
90 return strict_memory_address_p (mode
, addr
);
92 return memory_address_p (mode
, addr
);
99 default_external_libcall (rtx fun ATTRIBUTE_UNUSED
)
101 #ifdef ASM_OUTPUT_EXTERNAL_LIBCALL
102 ASM_OUTPUT_EXTERNAL_LIBCALL (asm_out_file
, fun
);
107 default_unspec_may_trap_p (const_rtx x
, unsigned flags
)
111 /* Any floating arithmetic may trap. */
112 if ((SCALAR_FLOAT_MODE_P (GET_MODE (x
)) && flag_trapping_math
))
115 for (i
= 0; i
< XVECLEN (x
, 0); ++i
)
117 if (may_trap_p_1 (XVECEXP (x
, 0, i
), flags
))
125 default_promote_function_mode (const_tree type ATTRIBUTE_UNUSED
,
127 int *punsignedp ATTRIBUTE_UNUSED
,
128 const_tree funtype ATTRIBUTE_UNUSED
,
129 int for_return ATTRIBUTE_UNUSED
)
131 if (type
!= NULL_TREE
&& for_return
== 2)
132 return promote_mode (type
, mode
, punsignedp
);
137 default_promote_function_mode_always_promote (const_tree type
,
140 const_tree funtype ATTRIBUTE_UNUSED
,
141 int for_return ATTRIBUTE_UNUSED
)
143 return promote_mode (type
, mode
, punsignedp
);
147 default_cc_modes_compatible (machine_mode m1
, machine_mode m2
)
155 default_return_in_memory (const_tree type
,
156 const_tree fntype ATTRIBUTE_UNUSED
)
158 return (TYPE_MODE (type
) == BLKmode
);
162 default_legitimize_address (rtx x
, rtx orig_x ATTRIBUTE_UNUSED
,
163 machine_mode mode ATTRIBUTE_UNUSED
)
169 default_legitimize_address_displacement (rtx
*disp ATTRIBUTE_UNUSED
,
170 rtx
*offset ATTRIBUTE_UNUSED
,
171 machine_mode mode ATTRIBUTE_UNUSED
)
177 default_expand_builtin_saveregs (void)
179 error ("__builtin_saveregs not supported by this target");
184 default_setup_incoming_varargs (cumulative_args_t ca ATTRIBUTE_UNUSED
,
185 machine_mode mode ATTRIBUTE_UNUSED
,
186 tree type ATTRIBUTE_UNUSED
,
187 int *pretend_arg_size ATTRIBUTE_UNUSED
,
188 int second_time ATTRIBUTE_UNUSED
)
192 /* The default implementation of TARGET_BUILTIN_SETJMP_FRAME_VALUE. */
195 default_builtin_setjmp_frame_value (void)
197 return virtual_stack_vars_rtx
;
200 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns false. */
203 hook_bool_CUMULATIVE_ARGS_false (cumulative_args_t ca ATTRIBUTE_UNUSED
)
209 default_pretend_outgoing_varargs_named (cumulative_args_t ca ATTRIBUTE_UNUSED
)
211 return (targetm
.calls
.setup_incoming_varargs
212 != default_setup_incoming_varargs
);
216 default_eh_return_filter_mode (void)
218 return targetm
.unwind_word_mode ();
222 default_libgcc_cmp_return_mode (void)
228 default_libgcc_shift_count_mode (void)
234 default_unwind_word_mode (void)
239 /* The default implementation of TARGET_SHIFT_TRUNCATION_MASK. */
241 unsigned HOST_WIDE_INT
242 default_shift_truncation_mask (machine_mode mode
)
244 return SHIFT_COUNT_TRUNCATED
? GET_MODE_BITSIZE (mode
) - 1 : 0;
247 /* The default implementation of TARGET_MIN_DIVISIONS_FOR_RECIP_MUL. */
250 default_min_divisions_for_recip_mul (machine_mode mode ATTRIBUTE_UNUSED
)
252 return have_insn_for (DIV
, mode
) ? 3 : 2;
255 /* The default implementation of TARGET_MODE_REP_EXTENDED. */
258 default_mode_rep_extended (machine_mode mode ATTRIBUTE_UNUSED
,
259 machine_mode mode_rep ATTRIBUTE_UNUSED
)
264 /* Generic hook that takes a CUMULATIVE_ARGS pointer and returns true. */
267 hook_bool_CUMULATIVE_ARGS_true (cumulative_args_t a ATTRIBUTE_UNUSED
)
272 /* Return machine mode for non-standard suffix
273 or VOIDmode if non-standard suffixes are unsupported. */
275 default_mode_for_suffix (char suffix ATTRIBUTE_UNUSED
)
280 /* The generic C++ ABI specifies this is a 64-bit value. */
282 default_cxx_guard_type (void)
284 return long_long_integer_type_node
;
287 /* Returns the size of the cookie to use when allocating an array
288 whose elements have the indicated TYPE. Assumes that it is already
289 known that a cookie is needed. */
292 default_cxx_get_cookie_size (tree type
)
296 /* We need to allocate an additional max (sizeof (size_t), alignof
297 (true_type)) bytes. */
301 sizetype_size
= size_in_bytes (sizetype
);
302 type_align
= size_int (TYPE_ALIGN_UNIT (type
));
303 if (tree_int_cst_lt (type_align
, sizetype_size
))
304 cookie_size
= sizetype_size
;
306 cookie_size
= type_align
;
311 /* Return true if a parameter must be passed by reference. This version
312 of the TARGET_PASS_BY_REFERENCE hook uses just MUST_PASS_IN_STACK. */
315 hook_pass_by_reference_must_pass_in_stack (cumulative_args_t c ATTRIBUTE_UNUSED
,
316 machine_mode mode ATTRIBUTE_UNUSED
, const_tree type ATTRIBUTE_UNUSED
,
317 bool named_arg ATTRIBUTE_UNUSED
)
319 return targetm
.calls
.must_pass_in_stack (mode
, type
);
322 /* Return true if a parameter follows callee copies conventions. This
323 version of the hook is true for all named arguments. */
326 hook_callee_copies_named (cumulative_args_t ca ATTRIBUTE_UNUSED
,
327 machine_mode mode ATTRIBUTE_UNUSED
,
328 const_tree type ATTRIBUTE_UNUSED
, bool named
)
333 /* Emit to STREAM the assembler syntax for insn operand X. */
336 default_print_operand (FILE *stream ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
337 int code ATTRIBUTE_UNUSED
)
340 PRINT_OPERAND (stream
, x
, code
);
346 /* Emit to STREAM the assembler syntax for an insn operand whose memory
350 default_print_operand_address (FILE *stream ATTRIBUTE_UNUSED
,
351 machine_mode
/*mode*/,
352 rtx x ATTRIBUTE_UNUSED
)
354 #ifdef PRINT_OPERAND_ADDRESS
355 PRINT_OPERAND_ADDRESS (stream
, x
);
361 /* Return true if CODE is a valid punctuation character for the
362 `print_operand' hook. */
365 default_print_operand_punct_valid_p (unsigned char code ATTRIBUTE_UNUSED
)
367 #ifdef PRINT_OPERAND_PUNCT_VALID_P
368 return PRINT_OPERAND_PUNCT_VALID_P (code
);
374 /* The default implementation of TARGET_MANGLE_ASSEMBLER_NAME. */
376 default_mangle_assembler_name (const char *name ATTRIBUTE_UNUSED
)
378 const char *skipped
= name
+ (*name
== '*' ? 1 : 0);
379 const char *stripped
= targetm
.strip_name_encoding (skipped
);
380 if (*name
!= '*' && user_label_prefix
[0])
381 stripped
= ACONCAT ((user_label_prefix
, stripped
, NULL
));
382 return get_identifier (stripped
);
385 /* True if MODE is valid for the target. By "valid", we mean able to
386 be manipulated in non-trivial ways. In particular, this means all
387 the arithmetic is supported.
389 By default we guess this means that any C type is supported. If
390 we can't map the mode back to a type that would be available in C,
391 then reject it. Special case, here, is the double-word arithmetic
392 supported by optabs.c. */
395 default_scalar_mode_supported_p (machine_mode mode
)
397 int precision
= GET_MODE_PRECISION (mode
);
399 switch (GET_MODE_CLASS (mode
))
401 case MODE_PARTIAL_INT
:
403 if (precision
== CHAR_TYPE_SIZE
)
405 if (precision
== SHORT_TYPE_SIZE
)
407 if (precision
== INT_TYPE_SIZE
)
409 if (precision
== LONG_TYPE_SIZE
)
411 if (precision
== LONG_LONG_TYPE_SIZE
)
413 if (precision
== 2 * BITS_PER_WORD
)
418 if (precision
== FLOAT_TYPE_SIZE
)
420 if (precision
== DOUBLE_TYPE_SIZE
)
422 if (precision
== LONG_DOUBLE_TYPE_SIZE
)
426 case MODE_DECIMAL_FLOAT
:
438 /* Return true if libgcc supports floating-point mode MODE (known to
439 be supported as a scalar mode). */
442 default_libgcc_floating_mode_supported_p (machine_mode mode
)
465 /* Return the machine mode to use for the type _FloatN, if EXTENDED is
466 false, or _FloatNx, if EXTENDED is true, or VOIDmode if not
469 default_floatn_mode (int n
, bool extended
)
473 machine_mode cand1
= VOIDmode
, cand2
= VOIDmode
;
495 /* Those are the only valid _FloatNx types. */
498 if (cand1
!= VOIDmode
499 && REAL_MODE_FORMAT (cand1
)->ieee_bits
> n
500 && targetm
.scalar_mode_supported_p (cand1
)
501 && targetm
.libgcc_floating_mode_supported_p (cand1
))
503 if (cand2
!= VOIDmode
504 && REAL_MODE_FORMAT (cand2
)->ieee_bits
> n
505 && targetm
.scalar_mode_supported_p (cand2
)
506 && targetm
.libgcc_floating_mode_supported_p (cand2
))
511 machine_mode cand
= VOIDmode
;
515 /* We do not use HFmode for _Float16 by default because the
516 required excess precision support is not present and the
517 interactions with promotion of the older __fp16 need to
543 && REAL_MODE_FORMAT (cand
)->ieee_bits
== n
544 && targetm
.scalar_mode_supported_p (cand
)
545 && targetm
.libgcc_floating_mode_supported_p (cand
))
551 /* Make some target macros useable by target-independent code. */
553 targhook_words_big_endian (void)
555 return !!WORDS_BIG_ENDIAN
;
559 targhook_float_words_big_endian (void)
561 return !!FLOAT_WORDS_BIG_ENDIAN
;
564 /* True if the target supports floating-point exceptions and rounding
568 default_float_exceptions_rounding_supported_p (void)
577 /* True if the target supports decimal floating point. */
580 default_decimal_float_supported_p (void)
582 return ENABLE_DECIMAL_FLOAT
;
585 /* True if the target supports fixed-point arithmetic. */
588 default_fixed_point_supported_p (void)
590 return ENABLE_FIXED_POINT
;
593 /* True if the target supports GNU indirect functions. */
596 default_has_ifunc_p (void)
598 return HAVE_GNU_INDIRECT_FUNCTION
;
601 /* NULL if INSN insn is valid within a low-overhead loop, otherwise returns
604 This function checks whether a given INSN is valid within a low-overhead
605 loop. If INSN is invalid it returns the reason for that, otherwise it
606 returns NULL. A called function may clobber any special registers required
607 for low-overhead looping. Additionally, some targets (eg, PPC) use the count
608 register for branch on table instructions. We reject the doloop pattern in
612 default_invalid_within_doloop (const rtx_insn
*insn
)
615 return "Function call in loop.";
617 if (tablejump_p (insn
, NULL
, NULL
) || computed_jump_p (insn
))
618 return "Computed branch in the loop.";
623 /* Mapping of builtin functions to vectorized variants. */
626 default_builtin_vectorized_function (unsigned int, tree
, tree
)
631 /* Mapping of target builtin functions to vectorized variants. */
634 default_builtin_md_vectorized_function (tree
, tree
, tree
)
639 /* Vectorized conversion. */
642 default_builtin_vectorized_conversion (unsigned int code ATTRIBUTE_UNUSED
,
643 tree dest_type ATTRIBUTE_UNUSED
,
644 tree src_type ATTRIBUTE_UNUSED
)
649 /* Default vectorizer cost model values. */
652 default_builtin_vectorization_cost (enum vect_cost_for_stmt type_of_cost
,
654 int misalign ATTRIBUTE_UNUSED
)
656 switch (type_of_cost
)
666 case cond_branch_not_taken
:
668 case vec_promote_demote
:
672 case unaligned_store
:
675 case cond_branch_taken
:
679 return TYPE_VECTOR_SUBPARTS (vectype
) - 1;
689 default_builtin_reciprocal (tree
)
695 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_false (
696 cumulative_args_t ca ATTRIBUTE_UNUSED
,
697 machine_mode mode ATTRIBUTE_UNUSED
,
698 const_tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
704 hook_bool_CUMULATIVE_ARGS_mode_tree_bool_true (
705 cumulative_args_t ca ATTRIBUTE_UNUSED
,
706 machine_mode mode ATTRIBUTE_UNUSED
,
707 const_tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
713 hook_int_CUMULATIVE_ARGS_mode_tree_bool_0 (
714 cumulative_args_t ca ATTRIBUTE_UNUSED
,
715 machine_mode mode ATTRIBUTE_UNUSED
,
716 tree type ATTRIBUTE_UNUSED
, bool named ATTRIBUTE_UNUSED
)
722 default_function_arg_advance (cumulative_args_t ca ATTRIBUTE_UNUSED
,
723 machine_mode mode ATTRIBUTE_UNUSED
,
724 const_tree type ATTRIBUTE_UNUSED
,
725 bool named ATTRIBUTE_UNUSED
)
731 default_function_arg (cumulative_args_t ca ATTRIBUTE_UNUSED
,
732 machine_mode mode ATTRIBUTE_UNUSED
,
733 const_tree type ATTRIBUTE_UNUSED
,
734 bool named ATTRIBUTE_UNUSED
)
740 default_function_incoming_arg (cumulative_args_t ca ATTRIBUTE_UNUSED
,
741 machine_mode mode ATTRIBUTE_UNUSED
,
742 const_tree type ATTRIBUTE_UNUSED
,
743 bool named ATTRIBUTE_UNUSED
)
749 default_function_arg_boundary (machine_mode mode ATTRIBUTE_UNUSED
,
750 const_tree type ATTRIBUTE_UNUSED
)
752 return PARM_BOUNDARY
;
756 default_function_arg_round_boundary (machine_mode mode ATTRIBUTE_UNUSED
,
757 const_tree type ATTRIBUTE_UNUSED
)
759 return PARM_BOUNDARY
;
763 hook_void_bitmap (bitmap regs ATTRIBUTE_UNUSED
)
768 hook_invalid_arg_for_unprototyped_fn (
769 const_tree typelist ATTRIBUTE_UNUSED
,
770 const_tree funcdecl ATTRIBUTE_UNUSED
,
771 const_tree val ATTRIBUTE_UNUSED
)
776 /* Initialize the stack protection decls. */
778 /* Stack protection related decls living in libgcc. */
779 static GTY(()) tree stack_chk_guard_decl
;
782 default_stack_protect_guard (void)
784 tree t
= stack_chk_guard_decl
;
790 t
= build_decl (UNKNOWN_LOCATION
,
791 VAR_DECL
, get_identifier ("__stack_chk_guard"),
795 DECL_EXTERNAL (t
) = 1;
797 TREE_THIS_VOLATILE (t
) = 1;
798 DECL_ARTIFICIAL (t
) = 1;
799 DECL_IGNORED_P (t
) = 1;
801 /* Do not share RTL as the declaration is visible outside of
804 RTX_FLAG (x
, used
) = 1;
806 stack_chk_guard_decl
= t
;
812 static GTY(()) tree stack_chk_fail_decl
;
815 default_external_stack_protect_fail (void)
817 tree t
= stack_chk_fail_decl
;
821 t
= build_function_type_list (void_type_node
, NULL_TREE
);
822 t
= build_decl (UNKNOWN_LOCATION
,
823 FUNCTION_DECL
, get_identifier ("__stack_chk_fail"), t
);
826 DECL_EXTERNAL (t
) = 1;
828 TREE_THIS_VOLATILE (t
) = 1;
829 TREE_NOTHROW (t
) = 1;
830 DECL_ARTIFICIAL (t
) = 1;
831 DECL_IGNORED_P (t
) = 1;
832 DECL_VISIBILITY (t
) = VISIBILITY_DEFAULT
;
833 DECL_VISIBILITY_SPECIFIED (t
) = 1;
835 stack_chk_fail_decl
= t
;
838 return build_call_expr (t
, 0);
842 default_hidden_stack_protect_fail (void)
844 #ifndef HAVE_GAS_HIDDEN
845 return default_external_stack_protect_fail ();
847 tree t
= stack_chk_fail_decl
;
850 return default_external_stack_protect_fail ();
854 t
= build_function_type_list (void_type_node
, NULL_TREE
);
855 t
= build_decl (UNKNOWN_LOCATION
, FUNCTION_DECL
,
856 get_identifier ("__stack_chk_fail_local"), t
);
859 DECL_EXTERNAL (t
) = 1;
861 TREE_THIS_VOLATILE (t
) = 1;
862 TREE_NOTHROW (t
) = 1;
863 DECL_ARTIFICIAL (t
) = 1;
864 DECL_IGNORED_P (t
) = 1;
865 DECL_VISIBILITY_SPECIFIED (t
) = 1;
866 DECL_VISIBILITY (t
) = VISIBILITY_HIDDEN
;
868 stack_chk_fail_decl
= t
;
871 return build_call_expr (t
, 0);
876 hook_bool_const_rtx_commutative_p (const_rtx x
,
877 int outer_code ATTRIBUTE_UNUSED
)
879 return COMMUTATIVE_P (x
);
883 default_function_value (const_tree ret_type ATTRIBUTE_UNUSED
,
884 const_tree fn_decl_or_type
,
885 bool outgoing ATTRIBUTE_UNUSED
)
887 /* The old interface doesn't handle receiving the function type. */
889 && !DECL_P (fn_decl_or_type
))
890 fn_decl_or_type
= NULL
;
892 #ifdef FUNCTION_VALUE
893 return FUNCTION_VALUE (ret_type
, fn_decl_or_type
);
900 default_libcall_value (machine_mode mode ATTRIBUTE_UNUSED
,
901 const_rtx fun ATTRIBUTE_UNUSED
)
904 return LIBCALL_VALUE (mode
);
910 /* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */
913 default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED
)
915 #ifdef FUNCTION_VALUE_REGNO_P
916 return FUNCTION_VALUE_REGNO_P (regno
);
923 default_internal_arg_pointer (void)
925 /* If the reg that the virtual arg pointer will be translated into is
926 not a fixed reg or is the stack pointer, make a copy of the virtual
927 arg pointer, and address parms via the copy. The frame pointer is
928 considered fixed even though it is not marked as such. */
929 if ((ARG_POINTER_REGNUM
== STACK_POINTER_REGNUM
930 || ! (fixed_regs
[ARG_POINTER_REGNUM
]
931 || ARG_POINTER_REGNUM
== FRAME_POINTER_REGNUM
)))
932 return copy_to_reg (virtual_incoming_args_rtx
);
934 return virtual_incoming_args_rtx
;
938 default_static_chain (const_tree
ARG_UNUSED (fndecl_or_type
), bool incoming_p
)
942 #ifdef STATIC_CHAIN_INCOMING_REGNUM
943 return gen_rtx_REG (Pmode
, STATIC_CHAIN_INCOMING_REGNUM
);
947 #ifdef STATIC_CHAIN_REGNUM
948 return gen_rtx_REG (Pmode
, STATIC_CHAIN_REGNUM
);
952 static bool issued_error
;
956 sorry ("nested functions not supported on this target");
959 /* It really doesn't matter what we return here, so long at it
960 doesn't cause the rest of the compiler to crash. */
961 return gen_rtx_MEM (Pmode
, stack_pointer_rtx
);
966 default_trampoline_init (rtx
ARG_UNUSED (m_tramp
), tree
ARG_UNUSED (t_func
),
967 rtx
ARG_UNUSED (r_chain
))
969 sorry ("nested function trampolines not supported on this target");
973 default_return_pops_args (tree fundecl ATTRIBUTE_UNUSED
,
974 tree funtype ATTRIBUTE_UNUSED
,
975 int size ATTRIBUTE_UNUSED
)
981 default_branch_target_register_class (void)
987 default_ira_change_pseudo_allocno_class (int regno ATTRIBUTE_UNUSED
,
989 reg_class_t best_cl ATTRIBUTE_UNUSED
)
1001 default_register_priority (int hard_regno ATTRIBUTE_UNUSED
)
1007 default_register_usage_leveling_p (void)
1013 default_different_addr_displacement_p (void)
1019 default_secondary_reload (bool in_p ATTRIBUTE_UNUSED
, rtx x ATTRIBUTE_UNUSED
,
1020 reg_class_t reload_class_i ATTRIBUTE_UNUSED
,
1021 machine_mode reload_mode ATTRIBUTE_UNUSED
,
1022 secondary_reload_info
*sri
)
1024 enum reg_class rclass
= NO_REGS
;
1025 enum reg_class reload_class
= (enum reg_class
) reload_class_i
;
1027 if (sri
->prev_sri
&& sri
->prev_sri
->t_icode
!= CODE_FOR_nothing
)
1029 sri
->icode
= sri
->prev_sri
->t_icode
;
1032 #ifdef SECONDARY_INPUT_RELOAD_CLASS
1034 rclass
= SECONDARY_INPUT_RELOAD_CLASS (reload_class
, reload_mode
, x
);
1036 #ifdef SECONDARY_OUTPUT_RELOAD_CLASS
1038 rclass
= SECONDARY_OUTPUT_RELOAD_CLASS (reload_class
, reload_mode
, x
);
1040 if (rclass
!= NO_REGS
)
1042 enum insn_code icode
1043 = direct_optab_handler (in_p
? reload_in_optab
: reload_out_optab
,
1046 if (icode
!= CODE_FOR_nothing
1047 && !insn_operand_matches (icode
, in_p
, x
))
1048 icode
= CODE_FOR_nothing
;
1049 else if (icode
!= CODE_FOR_nothing
)
1051 const char *insn_constraint
, *scratch_constraint
;
1052 enum reg_class insn_class
, scratch_class
;
1054 gcc_assert (insn_data
[(int) icode
].n_operands
== 3);
1055 insn_constraint
= insn_data
[(int) icode
].operand
[!in_p
].constraint
;
1056 if (!*insn_constraint
)
1057 insn_class
= ALL_REGS
;
1062 gcc_assert (*insn_constraint
== '=');
1065 insn_class
= (reg_class_for_constraint
1066 (lookup_constraint (insn_constraint
)));
1067 gcc_assert (insn_class
!= NO_REGS
);
1070 scratch_constraint
= insn_data
[(int) icode
].operand
[2].constraint
;
1071 /* The scratch register's constraint must start with "=&",
1072 except for an input reload, where only "=" is necessary,
1073 and where it might be beneficial to re-use registers from
1075 gcc_assert (scratch_constraint
[0] == '='
1076 && (in_p
|| scratch_constraint
[1] == '&'));
1077 scratch_constraint
++;
1078 if (*scratch_constraint
== '&')
1079 scratch_constraint
++;
1080 scratch_class
= (reg_class_for_constraint
1081 (lookup_constraint (scratch_constraint
)));
1083 if (reg_class_subset_p (reload_class
, insn_class
))
1085 gcc_assert (scratch_class
== rclass
);
1089 rclass
= insn_class
;
1092 if (rclass
== NO_REGS
)
1095 sri
->t_icode
= icode
;
1100 /* By default, if flag_pic is true, then neither local nor global relocs
1101 should be placed in readonly memory. */
1104 default_reloc_rw_mask (void)
1106 return flag_pic
? 3 : 0;
1109 /* By default, do no modification. */
1110 tree
default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED
,
1116 /* Default to natural alignment for vector types. */
1118 default_vector_alignment (const_tree type
)
1120 HOST_WIDE_INT align
= tree_to_shwi (TYPE_SIZE (type
));
1121 if (align
> MAX_OFILE_ALIGNMENT
)
1122 align
= MAX_OFILE_ALIGNMENT
;
1127 default_builtin_vector_alignment_reachable (const_tree type
, bool is_packed
)
1132 /* Assuming that types whose size is > pointer-size are not guaranteed to be
1133 naturally aligned. */
1134 if (tree_int_cst_compare (TYPE_SIZE (type
), bitsize_int (POINTER_SIZE
)) > 0)
1137 /* Assuming that types whose size is <= pointer-size
1138 are naturally aligned. */
1142 /* By default, assume that a target supports any factor of misalignment
1143 memory access if it supports movmisalign patten.
1144 is_packed is true if the memory access is defined in a packed struct. */
1146 default_builtin_support_vector_misalignment (machine_mode mode
,
1154 if (optab_handler (movmisalign_optab
, mode
) != CODE_FOR_nothing
)
1159 /* By default, only attempt to parallelize bitwise operations, and
1160 possibly adds/subtracts using bit-twiddling. */
1163 default_preferred_simd_mode (machine_mode mode ATTRIBUTE_UNUSED
)
1168 /* By default only the size derived from the preferred vector mode
1172 default_autovectorize_vector_sizes (void)
1177 /* By defaults a vector of integers is used as a mask. */
1180 default_get_mask_mode (unsigned nunits
, unsigned vector_size
)
1182 unsigned elem_size
= vector_size
/ nunits
;
1183 machine_mode elem_mode
1184 = smallest_mode_for_size (elem_size
* BITS_PER_UNIT
, MODE_INT
);
1185 machine_mode vector_mode
;
1187 gcc_assert (elem_size
* nunits
== vector_size
);
1189 vector_mode
= mode_for_vector (elem_mode
, nunits
);
1190 if (!VECTOR_MODE_P (vector_mode
)
1191 || !targetm
.vector_mode_supported_p (vector_mode
))
1192 vector_mode
= BLKmode
;
1197 /* By default, the cost model accumulates three separate costs (prologue,
1198 loop body, and epilogue) for a vectorized loop or block. So allocate an
1199 array of three unsigned ints, set it to zero, and return its address. */
1202 default_init_cost (struct loop
*loop_info ATTRIBUTE_UNUSED
)
1204 unsigned *cost
= XNEWVEC (unsigned, 3);
1205 cost
[vect_prologue
] = cost
[vect_body
] = cost
[vect_epilogue
] = 0;
1209 /* By default, the cost model looks up the cost of the given statement
1210 kind and mode, multiplies it by the occurrence count, accumulates
1211 it into the cost specified by WHERE, and returns the cost added. */
1214 default_add_stmt_cost (void *data
, int count
, enum vect_cost_for_stmt kind
,
1215 struct _stmt_vec_info
*stmt_info
, int misalign
,
1216 enum vect_cost_model_location where
)
1218 unsigned *cost
= (unsigned *) data
;
1219 unsigned retval
= 0;
1221 tree vectype
= stmt_info
? stmt_vectype (stmt_info
) : NULL_TREE
;
1222 int stmt_cost
= targetm
.vectorize
.builtin_vectorization_cost (kind
, vectype
,
1224 /* Statements in an inner loop relative to the loop being
1225 vectorized are weighted more heavily. The value here is
1226 arbitrary and could potentially be improved with analysis. */
1227 if (where
== vect_body
&& stmt_info
&& stmt_in_inner_loop_p (stmt_info
))
1228 count
*= 50; /* FIXME. */
1230 retval
= (unsigned) (count
* stmt_cost
);
1231 cost
[where
] += retval
;
1236 /* By default, the cost model just returns the accumulated costs. */
1239 default_finish_cost (void *data
, unsigned *prologue_cost
,
1240 unsigned *body_cost
, unsigned *epilogue_cost
)
1242 unsigned *cost
= (unsigned *) data
;
1243 *prologue_cost
= cost
[vect_prologue
];
1244 *body_cost
= cost
[vect_body
];
1245 *epilogue_cost
= cost
[vect_epilogue
];
1248 /* Free the cost data. */
1251 default_destroy_cost_data (void *data
)
1256 /* Determine whether or not a pointer mode is valid. Assume defaults
1257 of ptr_mode or Pmode - can be overridden. */
1259 default_valid_pointer_mode (machine_mode mode
)
1261 return (mode
== ptr_mode
|| mode
== Pmode
);
1264 /* Determine whether the memory reference specified by REF may alias
1265 the C libraries errno location. */
1267 default_ref_may_alias_errno (ao_ref
*ref
)
1269 tree base
= ao_ref_base (ref
);
1270 /* The default implementation assumes the errno location is
1271 a declaration of type int or is always accessed via a
1272 pointer to int. We assume that accesses to errno are
1273 not deliberately obfuscated (even in conforming ways). */
1274 if (TYPE_UNSIGNED (TREE_TYPE (base
))
1275 || TYPE_MODE (TREE_TYPE (base
)) != TYPE_MODE (integer_type_node
))
1277 /* The default implementation assumes an errno location
1278 declaration is never defined in the current compilation unit. */
1280 && !TREE_STATIC (base
))
1282 else if (TREE_CODE (base
) == MEM_REF
1283 && TREE_CODE (TREE_OPERAND (base
, 0)) == SSA_NAME
)
1285 struct ptr_info_def
*pi
= SSA_NAME_PTR_INFO (TREE_OPERAND (base
, 0));
1286 return !pi
|| pi
->pt
.anything
|| pi
->pt
.nonlocal
;
1291 /* Return the mode for a pointer to a given ADDRSPACE,
1292 defaulting to ptr_mode for all address spaces. */
1295 default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1300 /* Return the mode for an address in a given ADDRSPACE,
1301 defaulting to Pmode for all address spaces. */
1304 default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED
)
1309 /* Named address space version of valid_pointer_mode.
1310 To match the above, the same modes apply to all address spaces. */
1313 default_addr_space_valid_pointer_mode (machine_mode mode
,
1314 addr_space_t as ATTRIBUTE_UNUSED
)
1316 return targetm
.valid_pointer_mode (mode
);
1319 /* Some places still assume that all pointer or address modes are the
1320 standard Pmode and ptr_mode. These optimizations become invalid if
1321 the target actually supports multiple different modes. For now,
1322 we disable such optimizations on such targets, using this function. */
1325 target_default_pointer_address_modes_p (void)
1327 if (targetm
.addr_space
.address_mode
!= default_addr_space_address_mode
)
1329 if (targetm
.addr_space
.pointer_mode
!= default_addr_space_pointer_mode
)
1335 /* Named address space version of legitimate_address_p.
1336 By default, all address spaces have the same form. */
1339 default_addr_space_legitimate_address_p (machine_mode mode
, rtx mem
,
1341 addr_space_t as ATTRIBUTE_UNUSED
)
1343 return targetm
.legitimate_address_p (mode
, mem
, strict
);
1346 /* Named address space version of LEGITIMIZE_ADDRESS.
1347 By default, all address spaces have the same form. */
1350 default_addr_space_legitimize_address (rtx x
, rtx oldx
, machine_mode mode
,
1351 addr_space_t as ATTRIBUTE_UNUSED
)
1353 return targetm
.legitimize_address (x
, oldx
, mode
);
1356 /* The default hook for determining if one named address space is a subset of
1357 another and to return which address space to use as the common address
1361 default_addr_space_subset_p (addr_space_t subset
, addr_space_t superset
)
1363 return (subset
== superset
);
1366 /* The default hook for determining if 0 within a named address
1367 space is a valid address. */
1370 default_addr_space_zero_address_valid (addr_space_t as ATTRIBUTE_UNUSED
)
1375 /* The default hook for debugging the address space is to return the
1376 address space number to indicate DW_AT_address_class. */
1378 default_addr_space_debug (addr_space_t as
)
1383 /* The default hook implementation for TARGET_ADDR_SPACE_DIAGNOSE_USAGE.
1384 Don't complain about any address space. */
1387 default_addr_space_diagnose_usage (addr_space_t
, location_t
)
1392 /* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be
1393 called for targets with only a generic address space. */
1396 default_addr_space_convert (rtx op ATTRIBUTE_UNUSED
,
1397 tree from_type ATTRIBUTE_UNUSED
,
1398 tree to_type ATTRIBUTE_UNUSED
)
1404 default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED
)
1409 /* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */
1412 default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED
,
1413 addr_space_t addrspace ATTRIBUTE_UNUSED
)
1419 default_target_option_valid_attribute_p (tree
ARG_UNUSED (fndecl
),
1420 tree
ARG_UNUSED (name
),
1421 tree
ARG_UNUSED (args
),
1422 int ARG_UNUSED (flags
))
1424 warning (OPT_Wattributes
,
1425 "target attribute is not supported on this machine");
1431 default_target_option_pragma_parse (tree
ARG_UNUSED (args
),
1432 tree
ARG_UNUSED (pop_target
))
1434 /* If args is NULL the caller is handle_pragma_pop_options (). In that case,
1435 emit no warning because "#pragma GCC pop_target" is valid on targets that
1436 do not have the "target" pragma. */
1438 warning (OPT_Wpragmas
,
1439 "#pragma GCC target is not supported for this machine");
1445 default_target_can_inline_p (tree caller
, tree callee
)
1448 tree callee_opts
= DECL_FUNCTION_SPECIFIC_TARGET (callee
);
1449 tree caller_opts
= DECL_FUNCTION_SPECIFIC_TARGET (caller
);
1451 /* If callee has no option attributes, then it is ok to inline */
1455 /* If caller has no option attributes, but callee does then it is not ok to
1457 else if (!caller_opts
)
1460 /* If both caller and callee have attributes, assume that if the
1461 pointer is different, the two functions have different target
1462 options since build_target_option_node uses a hash table for the
1465 ret
= (callee_opts
== caller_opts
);
1470 /* If the machine does not have a case insn that compares the bounds,
1471 this means extra overhead for dispatch tables, which raises the
1472 threshold for using them. */
1475 default_case_values_threshold (void)
1477 return (targetm
.have_casesi () ? 4 : 5);
1481 default_have_conditional_execution (void)
1483 return HAVE_conditional_execution
;
1486 /* By default we assume that c99 functions are present at the runtime,
1487 but sincos is not. */
1489 default_libc_has_function (enum function_class fn_class
)
1491 if (fn_class
== function_c94
1492 || fn_class
== function_c99_misc
1493 || fn_class
== function_c99_math_complex
)
1500 gnu_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED
)
1506 no_c99_libc_has_function (enum function_class fn_class ATTRIBUTE_UNUSED
)
1512 default_builtin_tm_load_store (tree
ARG_UNUSED (type
))
1517 /* Compute cost of moving registers to/from memory. */
1520 default_memory_move_cost (machine_mode mode ATTRIBUTE_UNUSED
,
1521 reg_class_t rclass ATTRIBUTE_UNUSED
,
1522 bool in ATTRIBUTE_UNUSED
)
1524 #ifndef MEMORY_MOVE_COST
1525 return (4 + memory_move_secondary_cost (mode
, (enum reg_class
) rclass
, in
));
1527 return MEMORY_MOVE_COST (mode
, (enum reg_class
) rclass
, in
);
1531 /* Compute cost of moving data from a register of class FROM to one of
1535 default_register_move_cost (machine_mode mode ATTRIBUTE_UNUSED
,
1536 reg_class_t from ATTRIBUTE_UNUSED
,
1537 reg_class_t to ATTRIBUTE_UNUSED
)
1539 #ifndef REGISTER_MOVE_COST
1542 return REGISTER_MOVE_COST (mode
, (enum reg_class
) from
, (enum reg_class
) to
);
1546 /* For hooks which use the MOVE_RATIO macro, this gives the legacy default
1547 behavior. SPEED_P is true if we are compiling for speed. */
1550 get_move_ratio (bool speed_p ATTRIBUTE_UNUSED
)
1552 unsigned int move_ratio
;
1554 move_ratio
= (unsigned int) MOVE_RATIO (speed_p
);
1556 #if defined (HAVE_movmemqi) || defined (HAVE_movmemhi) || defined (HAVE_movmemsi) || defined (HAVE_movmemdi) || defined (HAVE_movmemti)
1558 #else /* No movmem patterns, pick a default. */
1559 move_ratio
= ((speed_p
) ? 15 : 3);
1565 /* Return TRUE if the move_by_pieces/set_by_pieces infrastructure should be
1566 used; return FALSE if the movmem/setmem optab should be expanded, or
1567 a call to memcpy emitted. */
1570 default_use_by_pieces_infrastructure_p (unsigned HOST_WIDE_INT size
,
1571 unsigned int alignment
,
1572 enum by_pieces_operation op
,
1575 unsigned int max_size
= 0;
1576 unsigned int ratio
= 0;
1580 case CLEAR_BY_PIECES
:
1581 max_size
= STORE_MAX_PIECES
;
1582 ratio
= CLEAR_RATIO (speed_p
);
1584 case MOVE_BY_PIECES
:
1585 max_size
= MOVE_MAX_PIECES
;
1586 ratio
= get_move_ratio (speed_p
);
1589 max_size
= STORE_MAX_PIECES
;
1590 ratio
= SET_RATIO (speed_p
);
1592 case STORE_BY_PIECES
:
1593 max_size
= STORE_MAX_PIECES
;
1594 ratio
= get_move_ratio (speed_p
);
1596 case COMPARE_BY_PIECES
:
1597 max_size
= COMPARE_MAX_PIECES
;
1598 /* Pick a likely default, just as in get_move_ratio. */
1599 ratio
= speed_p
? 15 : 3;
1603 return by_pieces_ninsns (size
, alignment
, max_size
+ 1, op
) < ratio
;
1606 /* This hook controls code generation for expanding a memcmp operation by
1607 pieces. Return 1 for the normal pattern of compare/jump after each pair
1608 of loads, or a higher number to reduce the number of branches. */
1611 default_compare_by_pieces_branch_ratio (machine_mode
)
1617 default_profile_before_prologue (void)
1619 #ifdef PROFILE_BEFORE_PROLOGUE
1626 /* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */
1629 default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED
,
1632 #ifdef PREFERRED_RELOAD_CLASS
1633 return (reg_class_t
) PREFERRED_RELOAD_CLASS (x
, (enum reg_class
) rclass
);
1639 /* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */
1642 default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED
,
1648 /* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */
1650 default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED
)
1655 /* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */
1658 default_class_likely_spilled_p (reg_class_t rclass
)
1660 return (reg_class_size
[(int) rclass
] == 1);
1663 /* The default implementation of TARGET_CLASS_MAX_NREGS. */
1666 default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED
,
1667 machine_mode mode ATTRIBUTE_UNUSED
)
1669 #ifdef CLASS_MAX_NREGS
1670 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class
) rclass
, mode
);
1672 return ((GET_MODE_SIZE (mode
) + UNITS_PER_WORD
- 1) / UNITS_PER_WORD
);
1676 /* Determine the debugging unwind mechanism for the target. */
1678 enum unwind_info_type
1679 default_debug_unwind_info (void)
1681 /* If the target wants to force the use of dwarf2 unwind info, let it. */
1682 /* ??? Change all users to the hook, then poison this. */
1683 #ifdef DWARF2_FRAME_INFO
1684 if (DWARF2_FRAME_INFO
)
1688 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */
1689 #ifdef DWARF2_DEBUGGING_INFO
1690 if (write_symbols
== DWARF2_DEBUG
|| write_symbols
== VMS_AND_DWARF2_DEBUG
)
1697 /* Determine the correct mode for a Dwarf frame register that represents
1701 default_dwarf_frame_reg_mode (int regno
)
1703 machine_mode save_mode
= reg_raw_mode
[regno
];
1705 if (HARD_REGNO_CALL_PART_CLOBBERED (regno
, save_mode
))
1706 save_mode
= choose_hard_reg_mode (regno
, 1, true);
1710 /* To be used by targets where reg_raw_mode doesn't return the right
1711 mode for registers used in apply_builtin_return and apply_builtin_arg. */
1714 default_get_reg_raw_mode (int regno
)
1716 return reg_raw_mode
[regno
];
1719 /* Return true if a leaf function should stay leaf even with profiling
1723 default_keep_leaf_when_profiled ()
1728 /* Return true if the state of option OPTION should be stored in PCH files
1729 and checked by default_pch_valid_p. Store the option's current state
1733 option_affects_pch_p (int option
, struct cl_option_state
*state
)
1735 if ((cl_options
[option
].flags
& CL_TARGET
) == 0)
1737 if ((cl_options
[option
].flags
& CL_PCH_IGNORE
) != 0)
1739 if (option_flag_var (option
, &global_options
) == &target_flags
)
1740 if (targetm
.check_pch_target_flags
)
1742 return get_option_state (&global_options
, option
, state
);
1745 /* Default version of get_pch_validity.
1746 By default, every flag difference is fatal; that will be mostly right for
1747 most targets, but completely right for very few. */
1750 default_get_pch_validity (size_t *sz
)
1752 struct cl_option_state state
;
1757 if (targetm
.check_pch_target_flags
)
1758 *sz
+= sizeof (target_flags
);
1759 for (i
= 0; i
< cl_options_count
; i
++)
1760 if (option_affects_pch_p (i
, &state
))
1763 result
= r
= XNEWVEC (char, *sz
);
1767 if (targetm
.check_pch_target_flags
)
1769 memcpy (r
, &target_flags
, sizeof (target_flags
));
1770 r
+= sizeof (target_flags
);
1773 for (i
= 0; i
< cl_options_count
; i
++)
1774 if (option_affects_pch_p (i
, &state
))
1776 memcpy (r
, state
.data
, state
.size
);
1783 /* Return a message which says that a PCH file was created with a different
1784 setting of OPTION. */
1787 pch_option_mismatch (const char *option
)
1789 return xasprintf (_("created and used with differing settings of '%s'"),
1793 /* Default version of pch_valid_p. */
1796 default_pch_valid_p (const void *data_p
, size_t len
)
1798 struct cl_option_state state
;
1799 const char *data
= (const char *)data_p
;
1802 /* -fpic and -fpie also usually make a PCH invalid. */
1803 if (data
[0] != flag_pic
)
1804 return _("created and used with different settings of -fpic");
1805 if (data
[1] != flag_pie
)
1806 return _("created and used with different settings of -fpie");
1809 /* Check target_flags. */
1810 if (targetm
.check_pch_target_flags
)
1815 memcpy (&tf
, data
, sizeof (target_flags
));
1816 data
+= sizeof (target_flags
);
1817 len
-= sizeof (target_flags
);
1818 r
= targetm
.check_pch_target_flags (tf
);
1823 for (i
= 0; i
< cl_options_count
; i
++)
1824 if (option_affects_pch_p (i
, &state
))
1826 if (memcmp (data
, state
.data
, state
.size
) != 0)
1827 return pch_option_mismatch (cl_options
[i
].opt_text
);
1835 /* Default version of cstore_mode. */
1838 default_cstore_mode (enum insn_code icode
)
1840 return insn_data
[(int) icode
].operand
[0].mode
;
1843 /* Default version of member_type_forces_blk. */
1846 default_member_type_forces_blk (const_tree
, machine_mode
)
1852 default_load_bounds_for_arg (rtx addr ATTRIBUTE_UNUSED
,
1853 rtx ptr ATTRIBUTE_UNUSED
,
1854 rtx bnd ATTRIBUTE_UNUSED
)
1860 default_store_bounds_for_arg (rtx val ATTRIBUTE_UNUSED
,
1861 rtx addr ATTRIBUTE_UNUSED
,
1862 rtx bounds ATTRIBUTE_UNUSED
,
1863 rtx to ATTRIBUTE_UNUSED
)
1869 default_load_returned_bounds (rtx slot ATTRIBUTE_UNUSED
)
1875 default_store_returned_bounds (rtx slot ATTRIBUTE_UNUSED
,
1876 rtx bounds ATTRIBUTE_UNUSED
)
1881 /* Default version of canonicalize_comparison. */
1884 default_canonicalize_comparison (int *, rtx
*, rtx
*, bool)
1888 /* Default implementation of TARGET_ATOMIC_ASSIGN_EXPAND_FENV. */
1891 default_atomic_assign_expand_fenv (tree
*, tree
*, tree
*)
1895 #ifndef PAD_VARARGS_DOWN
1896 #define PAD_VARARGS_DOWN BYTES_BIG_ENDIAN
1899 /* Build an indirect-ref expression over the given TREE, which represents a
1900 piece of a va_arg() expansion. */
1902 build_va_arg_indirect_ref (tree addr
)
1904 addr
= build_simple_mem_ref_loc (EXPR_LOCATION (addr
), addr
);
1908 /* The "standard" implementation of va_arg: read the value from the
1909 current (padded) address and increment by the (padded) size. */
1912 std_gimplify_va_arg_expr (tree valist
, tree type
, gimple_seq
*pre_p
,
1915 tree addr
, t
, type_size
, rounded_size
, valist_tmp
;
1916 unsigned HOST_WIDE_INT align
, boundary
;
1919 /* All of the alignment and movement below is for args-grow-up machines.
1920 As of 2004, there are only 3 ARGS_GROW_DOWNWARD targets, and they all
1921 implement their own specialized gimplify_va_arg_expr routines. */
1922 if (ARGS_GROW_DOWNWARD
)
1925 indirect
= pass_by_reference (NULL
, TYPE_MODE (type
), type
, false);
1927 type
= build_pointer_type (type
);
1929 align
= PARM_BOUNDARY
/ BITS_PER_UNIT
;
1930 boundary
= targetm
.calls
.function_arg_boundary (TYPE_MODE (type
), type
);
1932 /* When we align parameter on stack for caller, if the parameter
1933 alignment is beyond MAX_SUPPORTED_STACK_ALIGNMENT, it will be
1934 aligned at MAX_SUPPORTED_STACK_ALIGNMENT. We will match callee
1935 here with caller. */
1936 if (boundary
> MAX_SUPPORTED_STACK_ALIGNMENT
)
1937 boundary
= MAX_SUPPORTED_STACK_ALIGNMENT
;
1939 boundary
/= BITS_PER_UNIT
;
1941 /* Hoist the valist value into a temporary for the moment. */
1942 valist_tmp
= get_initialized_tmp_var (valist
, pre_p
, NULL
);
1944 /* va_list pointer is aligned to PARM_BOUNDARY. If argument actually
1945 requires greater alignment, we must perform dynamic alignment. */
1946 if (boundary
> align
1947 && !integer_zerop (TYPE_SIZE (type
)))
1949 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist_tmp
,
1950 fold_build_pointer_plus_hwi (valist_tmp
, boundary
- 1));
1951 gimplify_and_add (t
, pre_p
);
1953 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist_tmp
,
1954 fold_build2 (BIT_AND_EXPR
, TREE_TYPE (valist
),
1956 build_int_cst (TREE_TYPE (valist
), -boundary
)));
1957 gimplify_and_add (t
, pre_p
);
1962 /* If the actual alignment is less than the alignment of the type,
1963 adjust the type accordingly so that we don't assume strict alignment
1964 when dereferencing the pointer. */
1965 boundary
*= BITS_PER_UNIT
;
1966 if (boundary
< TYPE_ALIGN (type
))
1968 type
= build_variant_type_copy (type
);
1969 SET_TYPE_ALIGN (type
, boundary
);
1972 /* Compute the rounded size of the type. */
1973 type_size
= size_in_bytes (type
);
1974 rounded_size
= round_up (type_size
, align
);
1976 /* Reduce rounded_size so it's sharable with the postqueue. */
1977 gimplify_expr (&rounded_size
, pre_p
, post_p
, is_gimple_val
, fb_rvalue
);
1981 if (PAD_VARARGS_DOWN
&& !integer_zerop (rounded_size
))
1983 /* Small args are padded downward. */
1984 t
= fold_build2_loc (input_location
, GT_EXPR
, sizetype
,
1985 rounded_size
, size_int (align
));
1986 t
= fold_build3 (COND_EXPR
, sizetype
, t
, size_zero_node
,
1987 size_binop (MINUS_EXPR
, rounded_size
, type_size
));
1988 addr
= fold_build_pointer_plus (addr
, t
);
1991 /* Compute new value for AP. */
1992 t
= fold_build_pointer_plus (valist_tmp
, rounded_size
);
1993 t
= build2 (MODIFY_EXPR
, TREE_TYPE (valist
), valist
, t
);
1994 gimplify_and_add (t
, pre_p
);
1996 addr
= fold_convert (build_pointer_type (type
), addr
);
1999 addr
= build_va_arg_indirect_ref (addr
);
2001 return build_va_arg_indirect_ref (addr
);
2005 default_chkp_bound_type (void)
2007 tree res
= make_node (POINTER_BOUNDS_TYPE
);
2008 TYPE_PRECISION (res
) = TYPE_PRECISION (size_type_node
) * 2;
2009 TYPE_NAME (res
) = get_identifier ("__bounds_type");
2010 SET_TYPE_MODE (res
, targetm
.chkp_bound_mode ());
2016 default_chkp_bound_mode (void)
2022 default_builtin_chkp_function (unsigned int fcode ATTRIBUTE_UNUSED
)
2028 default_chkp_function_value_bounds (const_tree ret_type ATTRIBUTE_UNUSED
,
2029 const_tree fn_decl_or_type ATTRIBUTE_UNUSED
,
2030 bool outgoing ATTRIBUTE_UNUSED
)
2036 default_chkp_make_bounds_constant (HOST_WIDE_INT lb ATTRIBUTE_UNUSED
,
2037 HOST_WIDE_INT ub ATTRIBUTE_UNUSED
)
2043 default_chkp_initialize_bounds (tree var ATTRIBUTE_UNUSED
,
2044 tree lb ATTRIBUTE_UNUSED
,
2045 tree ub ATTRIBUTE_UNUSED
,
2046 tree
*stmts ATTRIBUTE_UNUSED
)
2052 default_setup_incoming_vararg_bounds (cumulative_args_t ca ATTRIBUTE_UNUSED
,
2053 enum machine_mode mode ATTRIBUTE_UNUSED
,
2054 tree type ATTRIBUTE_UNUSED
,
2055 int *pretend_arg_size ATTRIBUTE_UNUSED
,
2056 int second_time ATTRIBUTE_UNUSED
)
2060 /* An implementation of TARGET_CAN_USE_DOLOOP_P for targets that do
2061 not support nested low-overhead loops. */
2064 can_use_doloop_if_innermost (const widest_int
&, const widest_int
&,
2065 unsigned int loop_depth
, bool)
2067 return loop_depth
== 1;
2070 /* Default implementation of TARGET_OPTAB_SUPPORTED_P. */
2073 default_optab_supported_p (int, machine_mode
, machine_mode
, optimization_type
)
2078 /* Default implementation of TARGET_MAX_NOCE_IFCVT_SEQ_COST. */
2081 default_max_noce_ifcvt_seq_cost (edge e
)
2083 bool predictable_p
= predictable_edge_p (e
);
2085 enum compiler_param param
2087 ? PARAM_MAX_RTL_IF_CONVERSION_PREDICTABLE_COST
2088 : PARAM_MAX_RTL_IF_CONVERSION_UNPREDICTABLE_COST
);
2090 /* If we have a parameter set, use that, otherwise take a guess using
2092 if (global_options_set
.x_param_values
[param
])
2093 return PARAM_VALUE (param
);
2095 return BRANCH_COST (true, predictable_p
) * COSTS_N_INSNS (3);
2098 #include "gt-targhooks.h"