targhooks.c revision 1.3
1/* Default target hook functions. 2 Copyright (C) 2003-2013 Free Software Foundation, Inc. 3 4This file is part of GCC. 5 6GCC is free software; you can redistribute it and/or modify it under 7the terms of the GNU General Public License as published by the Free 8Software Foundation; either version 3, or (at your option) any later 9version. 10 11GCC is distributed in the hope that it will be useful, but WITHOUT ANY 12WARRANTY; without even the implied warranty of MERCHANTABILITY or 13FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 14for more details. 15 16You should have received a copy of the GNU General Public License 17along with GCC; see the file COPYING3. If not see 18<http://www.gnu.org/licenses/>. */ 19 20/* The migration of target macros to target hooks works as follows: 21 22 1. Create a target hook that uses the existing target macros to 23 implement the same functionality. 24 25 2. Convert all the MI files to use the hook instead of the macro. 26 27 3. Repeat for a majority of the remaining target macros. This will 28 take some time. 29 30 4. Tell target maintainers to start migrating. 31 32 5. Eventually convert the backends to override the hook instead of 33 defining the macros. This will take some time too. 34 35 6. TBD when, poison the macros. Unmigrated targets will break at 36 this point. 37 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. 41 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. 44 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. */ 48 49#include "config.h" 50#include "system.h" 51#include "coretypes.h" 52#include "tm.h" 53#include "machmode.h" 54#include "rtl.h" 55#include "tree.h" 56#include "expr.h" 57#include "output.h" 58#include "diagnostic-core.h" 59#include "function.h" 60#include "target.h" 61#include "tm_p.h" 62#include "target-def.h" 63#include "ggc.h" 64#include "hard-reg-set.h" 65#include "regs.h" 66#include "reload.h" 67#include "optabs.h" 68#include "recog.h" 69#include "intl.h" 70#include "opts.h" 71#include "tree-flow.h" 72#include "tree-ssa-alias.h" 73 74 75bool 76default_legitimate_address_p (enum machine_mode mode ATTRIBUTE_UNUSED, 77 rtx addr ATTRIBUTE_UNUSED, 78 bool strict ATTRIBUTE_UNUSED) 79{ 80#ifdef GO_IF_LEGITIMATE_ADDRESS 81 /* Defer to the old implementation using a goto. */ 82 if (strict) 83 return strict_memory_address_p (mode, addr); 84 else 85 return memory_address_p (mode, addr); 86#else 87 gcc_unreachable (); 88#endif 89} 90 91void 92default_external_libcall (rtx fun ATTRIBUTE_UNUSED) 93{ 94#ifdef ASM_OUTPUT_EXTERNAL_LIBCALL 95 ASM_OUTPUT_EXTERNAL_LIBCALL(asm_out_file, fun); 96#endif 97} 98 99int 100default_unspec_may_trap_p (const_rtx x, unsigned flags) 101{ 102 int i; 103 104 /* Any floating arithmetic may trap. */ 105 if ((SCALAR_FLOAT_MODE_P (GET_MODE (x)) && flag_trapping_math)) 106 return 1; 107 108 for (i = 0; i < XVECLEN (x, 0); ++i) 109 { 110 if (may_trap_p_1 (XVECEXP (x, 0, i), flags)) 111 return 1; 112 } 113 114 return 0; 115} 116 117enum machine_mode 118default_promote_function_mode (const_tree type ATTRIBUTE_UNUSED, 119 enum machine_mode mode, 120 int *punsignedp ATTRIBUTE_UNUSED, 121 const_tree funtype ATTRIBUTE_UNUSED, 122 int for_return ATTRIBUTE_UNUSED) 123{ 124 if (type != NULL_TREE && for_return == 2) 125 return promote_mode (type, mode, punsignedp); 126 return mode; 127} 128 129enum machine_mode 130default_promote_function_mode_always_promote (const_tree type, 131 enum machine_mode mode, 132 int *punsignedp, 133 const_tree funtype ATTRIBUTE_UNUSED, 134 int for_return ATTRIBUTE_UNUSED) 135{ 136 return promote_mode (type, mode, punsignedp); 137} 138 139 140enum machine_mode 141default_cc_modes_compatible (enum machine_mode m1, enum machine_mode m2) 142{ 143 if (m1 == m2) 144 return m1; 145 return VOIDmode; 146} 147 148bool 149default_return_in_memory (const_tree type, 150 const_tree fntype ATTRIBUTE_UNUSED) 151{ 152 return (TYPE_MODE (type) == BLKmode); 153} 154 155rtx 156default_legitimize_address (rtx x, rtx orig_x ATTRIBUTE_UNUSED, 157 enum machine_mode mode ATTRIBUTE_UNUSED) 158{ 159 return x; 160} 161 162rtx 163default_expand_builtin_saveregs (void) 164{ 165 error ("__builtin_saveregs not supported by this target"); 166 return const0_rtx; 167} 168 169void 170default_setup_incoming_varargs (cumulative_args_t ca ATTRIBUTE_UNUSED, 171 enum machine_mode mode ATTRIBUTE_UNUSED, 172 tree type ATTRIBUTE_UNUSED, 173 int *pretend_arg_size ATTRIBUTE_UNUSED, 174 int second_time ATTRIBUTE_UNUSED) 175{ 176} 177 178/* The default implementation of TARGET_BUILTIN_SETJMP_FRAME_VALUE. */ 179 180rtx 181default_builtin_setjmp_frame_value (void) 182{ 183 return virtual_stack_vars_rtx; 184} 185 186/* Generic hook that takes a CUMULATIVE_ARGS pointer and returns false. */ 187 188bool 189hook_bool_CUMULATIVE_ARGS_false (cumulative_args_t ca ATTRIBUTE_UNUSED) 190{ 191 return false; 192} 193 194bool 195default_pretend_outgoing_varargs_named (cumulative_args_t ca ATTRIBUTE_UNUSED) 196{ 197 return (targetm.calls.setup_incoming_varargs 198 != default_setup_incoming_varargs); 199} 200 201enum machine_mode 202default_eh_return_filter_mode (void) 203{ 204 return targetm.unwind_word_mode (); 205} 206 207enum machine_mode 208default_libgcc_cmp_return_mode (void) 209{ 210 return word_mode; 211} 212 213enum machine_mode 214default_libgcc_shift_count_mode (void) 215{ 216 return word_mode; 217} 218 219enum machine_mode 220default_unwind_word_mode (void) 221{ 222 return word_mode; 223} 224 225/* The default implementation of TARGET_SHIFT_TRUNCATION_MASK. */ 226 227unsigned HOST_WIDE_INT 228default_shift_truncation_mask (enum machine_mode mode) 229{ 230 return SHIFT_COUNT_TRUNCATED ? GET_MODE_BITSIZE (mode) - 1 : 0; 231} 232 233/* The default implementation of TARGET_MIN_DIVISIONS_FOR_RECIP_MUL. */ 234 235unsigned int 236default_min_divisions_for_recip_mul (enum machine_mode mode ATTRIBUTE_UNUSED) 237{ 238 return have_insn_for (DIV, mode) ? 3 : 2; 239} 240 241/* The default implementation of TARGET_MODE_REP_EXTENDED. */ 242 243int 244default_mode_rep_extended (enum machine_mode mode ATTRIBUTE_UNUSED, 245 enum machine_mode mode_rep ATTRIBUTE_UNUSED) 246{ 247 return UNKNOWN; 248} 249 250/* Generic hook that takes a CUMULATIVE_ARGS pointer and returns true. */ 251 252bool 253hook_bool_CUMULATIVE_ARGS_true (cumulative_args_t a ATTRIBUTE_UNUSED) 254{ 255 return true; 256} 257 258/* Return machine mode for non-standard suffix 259 or VOIDmode if non-standard suffixes are unsupported. */ 260enum machine_mode 261default_mode_for_suffix (char suffix ATTRIBUTE_UNUSED) 262{ 263 return VOIDmode; 264} 265 266/* The generic C++ ABI specifies this is a 64-bit value. */ 267tree 268default_cxx_guard_type (void) 269{ 270 return long_long_integer_type_node; 271} 272 273 274/* Returns the size of the cookie to use when allocating an array 275 whose elements have the indicated TYPE. Assumes that it is already 276 known that a cookie is needed. */ 277 278tree 279default_cxx_get_cookie_size (tree type) 280{ 281 tree cookie_size; 282 283 /* We need to allocate an additional max (sizeof (size_t), alignof 284 (true_type)) bytes. */ 285 tree sizetype_size; 286 tree type_align; 287 288 sizetype_size = size_in_bytes (sizetype); 289 type_align = size_int (TYPE_ALIGN_UNIT (type)); 290 if (INT_CST_LT_UNSIGNED (type_align, sizetype_size)) 291 cookie_size = sizetype_size; 292 else 293 cookie_size = type_align; 294 295 return cookie_size; 296} 297 298/* Return true if a parameter must be passed by reference. This version 299 of the TARGET_PASS_BY_REFERENCE hook uses just MUST_PASS_IN_STACK. */ 300 301bool 302hook_pass_by_reference_must_pass_in_stack (cumulative_args_t c ATTRIBUTE_UNUSED, 303 enum machine_mode mode ATTRIBUTE_UNUSED, const_tree type ATTRIBUTE_UNUSED, 304 bool named_arg ATTRIBUTE_UNUSED) 305{ 306 return targetm.calls.must_pass_in_stack (mode, type); 307} 308 309/* Return true if a parameter follows callee copies conventions. This 310 version of the hook is true for all named arguments. */ 311 312bool 313hook_callee_copies_named (cumulative_args_t ca ATTRIBUTE_UNUSED, 314 enum machine_mode mode ATTRIBUTE_UNUSED, 315 const_tree type ATTRIBUTE_UNUSED, bool named) 316{ 317 return named; 318} 319 320/* Emit to STREAM the assembler syntax for insn operand X. */ 321 322void 323default_print_operand (FILE *stream ATTRIBUTE_UNUSED, rtx x ATTRIBUTE_UNUSED, 324 int code ATTRIBUTE_UNUSED) 325{ 326#ifdef PRINT_OPERAND 327 PRINT_OPERAND (stream, x, code); 328#else 329 gcc_unreachable (); 330#endif 331} 332 333/* Emit to STREAM the assembler syntax for an insn operand whose memory 334 address is X. */ 335 336void 337default_print_operand_address (FILE *stream ATTRIBUTE_UNUSED, 338 rtx x ATTRIBUTE_UNUSED) 339{ 340#ifdef PRINT_OPERAND_ADDRESS 341 PRINT_OPERAND_ADDRESS (stream, x); 342#else 343 gcc_unreachable (); 344#endif 345} 346 347/* Return true if CODE is a valid punctuation character for the 348 `print_operand' hook. */ 349 350bool 351default_print_operand_punct_valid_p (unsigned char code ATTRIBUTE_UNUSED) 352{ 353#ifdef PRINT_OPERAND_PUNCT_VALID_P 354 return PRINT_OPERAND_PUNCT_VALID_P (code); 355#else 356 return false; 357#endif 358} 359 360/* The default implementation of TARGET_MANGLE_ASSEMBLER_NAME. */ 361tree 362default_mangle_assembler_name (const char *name ATTRIBUTE_UNUSED) 363{ 364 const char *skipped = name + (*name == '*' ? 1 : 0); 365 const char *stripped = targetm.strip_name_encoding (skipped); 366 if (*name != '*' && user_label_prefix[0]) 367 stripped = ACONCAT ((user_label_prefix, stripped, NULL)); 368 return get_identifier (stripped); 369} 370 371/* True if MODE is valid for the target. By "valid", we mean able to 372 be manipulated in non-trivial ways. In particular, this means all 373 the arithmetic is supported. 374 375 By default we guess this means that any C type is supported. If 376 we can't map the mode back to a type that would be available in C, 377 then reject it. Special case, here, is the double-word arithmetic 378 supported by optabs.c. */ 379 380bool 381default_scalar_mode_supported_p (enum machine_mode mode) 382{ 383 int precision = GET_MODE_PRECISION (mode); 384 385 switch (GET_MODE_CLASS (mode)) 386 { 387 case MODE_PARTIAL_INT: 388 case MODE_INT: 389 if (precision == CHAR_TYPE_SIZE) 390 return true; 391 if (precision == SHORT_TYPE_SIZE) 392 return true; 393 if (precision == INT_TYPE_SIZE) 394 return true; 395 if (precision == LONG_TYPE_SIZE) 396 return true; 397 if (precision == LONG_LONG_TYPE_SIZE) 398 return true; 399 if (precision == 2 * BITS_PER_WORD) 400 return true; 401 return false; 402 403 case MODE_FLOAT: 404 if (precision == FLOAT_TYPE_SIZE) 405 return true; 406 if (precision == DOUBLE_TYPE_SIZE) 407 return true; 408 if (precision == LONG_DOUBLE_TYPE_SIZE) 409 return true; 410 return false; 411 412 case MODE_DECIMAL_FLOAT: 413 case MODE_FRACT: 414 case MODE_UFRACT: 415 case MODE_ACCUM: 416 case MODE_UACCUM: 417 return false; 418 419 default: 420 gcc_unreachable (); 421 } 422} 423 424/* Make some target macros useable by target-independent code. */ 425bool 426targhook_words_big_endian (void) 427{ 428 return !!WORDS_BIG_ENDIAN; 429} 430 431bool 432targhook_float_words_big_endian (void) 433{ 434 return !!FLOAT_WORDS_BIG_ENDIAN; 435} 436 437/* True if the target supports decimal floating point. */ 438 439bool 440default_decimal_float_supported_p (void) 441{ 442 return ENABLE_DECIMAL_FLOAT; 443} 444 445/* True if the target supports fixed-point arithmetic. */ 446 447bool 448default_fixed_point_supported_p (void) 449{ 450 return ENABLE_FIXED_POINT; 451} 452 453/* NULL if INSN insn is valid within a low-overhead loop, otherwise returns 454 an error message. 455 456 This function checks whether a given INSN is valid within a low-overhead 457 loop. If INSN is invalid it returns the reason for that, otherwise it 458 returns NULL. A called function may clobber any special registers required 459 for low-overhead looping. Additionally, some targets (eg, PPC) use the count 460 register for branch on table instructions. We reject the doloop pattern in 461 these cases. */ 462 463const char * 464default_invalid_within_doloop (const_rtx insn) 465{ 466 if (CALL_P (insn)) 467 return "Function call in loop."; 468 469 if (JUMP_TABLE_DATA_P (insn)) 470 return "Computed branch in the loop."; 471 472 return NULL; 473} 474 475/* Mapping of builtin functions to vectorized variants. */ 476 477tree 478default_builtin_vectorized_function (tree fndecl ATTRIBUTE_UNUSED, 479 tree type_out ATTRIBUTE_UNUSED, 480 tree type_in ATTRIBUTE_UNUSED) 481{ 482 return NULL_TREE; 483} 484 485/* Vectorized conversion. */ 486 487tree 488default_builtin_vectorized_conversion (unsigned int code ATTRIBUTE_UNUSED, 489 tree dest_type ATTRIBUTE_UNUSED, 490 tree src_type ATTRIBUTE_UNUSED) 491{ 492 return NULL_TREE; 493} 494 495/* Default vectorizer cost model values. */ 496 497int 498default_builtin_vectorization_cost (enum vect_cost_for_stmt type_of_cost, 499 tree vectype, 500 int misalign ATTRIBUTE_UNUSED) 501{ 502 unsigned elements; 503 504 switch (type_of_cost) 505 { 506 case scalar_stmt: 507 case scalar_load: 508 case scalar_store: 509 case vector_stmt: 510 case vector_load: 511 case vector_store: 512 case vec_to_scalar: 513 case scalar_to_vec: 514 case cond_branch_not_taken: 515 case vec_perm: 516 case vec_promote_demote: 517 return 1; 518 519 case unaligned_load: 520 case unaligned_store: 521 return 2; 522 523 case cond_branch_taken: 524 return 3; 525 526 case vec_construct: 527 elements = TYPE_VECTOR_SUBPARTS (vectype); 528 return elements / 2 + 1; 529 530 default: 531 gcc_unreachable (); 532 } 533} 534 535/* Reciprocal. */ 536 537tree 538default_builtin_reciprocal (unsigned int fn ATTRIBUTE_UNUSED, 539 bool md_fn ATTRIBUTE_UNUSED, 540 bool sqrt ATTRIBUTE_UNUSED) 541{ 542 return NULL_TREE; 543} 544 545bool 546hook_bool_CUMULATIVE_ARGS_mode_tree_bool_false ( 547 cumulative_args_t ca ATTRIBUTE_UNUSED, 548 enum machine_mode mode ATTRIBUTE_UNUSED, 549 const_tree type ATTRIBUTE_UNUSED, bool named ATTRIBUTE_UNUSED) 550{ 551 return false; 552} 553 554bool 555hook_bool_CUMULATIVE_ARGS_mode_tree_bool_true ( 556 cumulative_args_t ca ATTRIBUTE_UNUSED, 557 enum machine_mode mode ATTRIBUTE_UNUSED, 558 const_tree type ATTRIBUTE_UNUSED, bool named ATTRIBUTE_UNUSED) 559{ 560 return true; 561} 562 563int 564hook_int_CUMULATIVE_ARGS_mode_tree_bool_0 ( 565 cumulative_args_t ca ATTRIBUTE_UNUSED, 566 enum machine_mode mode ATTRIBUTE_UNUSED, 567 tree type ATTRIBUTE_UNUSED, bool named ATTRIBUTE_UNUSED) 568{ 569 return 0; 570} 571 572void 573default_function_arg_advance (cumulative_args_t ca ATTRIBUTE_UNUSED, 574 enum machine_mode mode ATTRIBUTE_UNUSED, 575 const_tree type ATTRIBUTE_UNUSED, 576 bool named ATTRIBUTE_UNUSED) 577{ 578 gcc_unreachable (); 579} 580 581rtx 582default_function_arg (cumulative_args_t ca ATTRIBUTE_UNUSED, 583 enum machine_mode mode ATTRIBUTE_UNUSED, 584 const_tree type ATTRIBUTE_UNUSED, 585 bool named ATTRIBUTE_UNUSED) 586{ 587 gcc_unreachable (); 588} 589 590rtx 591default_function_incoming_arg (cumulative_args_t ca ATTRIBUTE_UNUSED, 592 enum machine_mode mode ATTRIBUTE_UNUSED, 593 const_tree type ATTRIBUTE_UNUSED, 594 bool named ATTRIBUTE_UNUSED) 595{ 596 gcc_unreachable (); 597} 598 599unsigned int 600default_function_arg_boundary (enum machine_mode mode ATTRIBUTE_UNUSED, 601 const_tree type ATTRIBUTE_UNUSED) 602{ 603 return PARM_BOUNDARY; 604} 605 606unsigned int 607default_function_arg_round_boundary (enum machine_mode mode ATTRIBUTE_UNUSED, 608 const_tree type ATTRIBUTE_UNUSED) 609{ 610 return PARM_BOUNDARY; 611} 612 613void 614hook_void_bitmap (bitmap regs ATTRIBUTE_UNUSED) 615{ 616} 617 618const char * 619hook_invalid_arg_for_unprototyped_fn ( 620 const_tree typelist ATTRIBUTE_UNUSED, 621 const_tree funcdecl ATTRIBUTE_UNUSED, 622 const_tree val ATTRIBUTE_UNUSED) 623{ 624 return NULL; 625} 626 627/* Initialize the stack protection decls. */ 628 629/* Stack protection related decls living in libgcc. */ 630static GTY(()) tree stack_chk_guard_decl; 631 632tree 633default_stack_protect_guard (void) 634{ 635 tree t = stack_chk_guard_decl; 636 637 if (t == NULL) 638 { 639 rtx x; 640 641 t = build_decl (UNKNOWN_LOCATION, 642 VAR_DECL, get_identifier ("__stack_chk_guard"), 643 ptr_type_node); 644 TREE_STATIC (t) = 1; 645 TREE_PUBLIC (t) = 1; 646 DECL_EXTERNAL (t) = 1; 647 TREE_USED (t) = 1; 648 TREE_THIS_VOLATILE (t) = 1; 649 DECL_ARTIFICIAL (t) = 1; 650 DECL_IGNORED_P (t) = 1; 651 652 /* Do not share RTL as the declaration is visible outside of 653 current function. */ 654 x = DECL_RTL (t); 655 RTX_FLAG (x, used) = 1; 656 657 stack_chk_guard_decl = t; 658 } 659 660 return t; 661} 662 663static GTY(()) tree stack_chk_fail_decl; 664 665tree 666default_external_stack_protect_fail (void) 667{ 668 tree t = stack_chk_fail_decl; 669 670 if (t == NULL_TREE) 671 { 672 t = build_function_type_list (void_type_node, NULL_TREE); 673 t = build_decl (UNKNOWN_LOCATION, 674 FUNCTION_DECL, get_identifier ("__stack_chk_fail"), t); 675 TREE_STATIC (t) = 1; 676 TREE_PUBLIC (t) = 1; 677 DECL_EXTERNAL (t) = 1; 678 TREE_USED (t) = 1; 679 TREE_THIS_VOLATILE (t) = 1; 680 TREE_NOTHROW (t) = 1; 681 DECL_ARTIFICIAL (t) = 1; 682 DECL_IGNORED_P (t) = 1; 683 DECL_VISIBILITY (t) = VISIBILITY_DEFAULT; 684 DECL_VISIBILITY_SPECIFIED (t) = 1; 685 686 stack_chk_fail_decl = t; 687 } 688 689 return build_call_expr (t, 0); 690} 691 692tree 693default_hidden_stack_protect_fail (void) 694{ 695#ifndef HAVE_GAS_HIDDEN 696 return default_external_stack_protect_fail (); 697#else 698 tree t = stack_chk_fail_decl; 699 700 if (!flag_pic) 701 return default_external_stack_protect_fail (); 702 703 if (t == NULL_TREE) 704 { 705 t = build_function_type_list (void_type_node, NULL_TREE); 706 t = build_decl (UNKNOWN_LOCATION, FUNCTION_DECL, 707 get_identifier ("__stack_chk_fail_local"), t); 708 TREE_STATIC (t) = 1; 709 TREE_PUBLIC (t) = 1; 710 DECL_EXTERNAL (t) = 1; 711 TREE_USED (t) = 1; 712 TREE_THIS_VOLATILE (t) = 1; 713 TREE_NOTHROW (t) = 1; 714 DECL_ARTIFICIAL (t) = 1; 715 DECL_IGNORED_P (t) = 1; 716 DECL_VISIBILITY_SPECIFIED (t) = 1; 717#if 1 718 /* 719 * This is a hack: 720 * It appears that our gas does not generate @PLT for hidden 721 * symbols. It could be that we need a newer version, or that 722 * this local function is handled differently on linux. 723 */ 724 DECL_VISIBILITY (t) = VISIBILITY_DEFAULT; 725#else 726 DECL_VISIBILITY (t) = VISIBILITY_HIDDEN; 727#endif 728 729 stack_chk_fail_decl = t; 730 } 731 732 return build_call_expr (t, 0); 733#endif 734} 735 736bool 737hook_bool_const_rtx_commutative_p (const_rtx x, 738 int outer_code ATTRIBUTE_UNUSED) 739{ 740 return COMMUTATIVE_P (x); 741} 742 743rtx 744default_function_value (const_tree ret_type ATTRIBUTE_UNUSED, 745 const_tree fn_decl_or_type, 746 bool outgoing ATTRIBUTE_UNUSED) 747{ 748 /* The old interface doesn't handle receiving the function type. */ 749 if (fn_decl_or_type 750 && !DECL_P (fn_decl_or_type)) 751 fn_decl_or_type = NULL; 752 753#ifdef FUNCTION_VALUE 754 return FUNCTION_VALUE (ret_type, fn_decl_or_type); 755#else 756 gcc_unreachable (); 757#endif 758} 759 760rtx 761default_libcall_value (enum machine_mode mode ATTRIBUTE_UNUSED, 762 const_rtx fun ATTRIBUTE_UNUSED) 763{ 764#ifdef LIBCALL_VALUE 765 return LIBCALL_VALUE (mode); 766#else 767 gcc_unreachable (); 768#endif 769} 770 771/* The default hook for TARGET_FUNCTION_VALUE_REGNO_P. */ 772 773bool 774default_function_value_regno_p (const unsigned int regno ATTRIBUTE_UNUSED) 775{ 776#ifdef FUNCTION_VALUE_REGNO_P 777 return FUNCTION_VALUE_REGNO_P (regno); 778#else 779 gcc_unreachable (); 780#endif 781} 782 783rtx 784default_internal_arg_pointer (void) 785{ 786 /* If the reg that the virtual arg pointer will be translated into is 787 not a fixed reg or is the stack pointer, make a copy of the virtual 788 arg pointer, and address parms via the copy. The frame pointer is 789 considered fixed even though it is not marked as such. */ 790 if ((ARG_POINTER_REGNUM == STACK_POINTER_REGNUM 791 || ! (fixed_regs[ARG_POINTER_REGNUM] 792 || ARG_POINTER_REGNUM == FRAME_POINTER_REGNUM))) 793 return copy_to_reg (virtual_incoming_args_rtx); 794 else 795 return virtual_incoming_args_rtx; 796} 797 798rtx 799default_static_chain (const_tree fndecl, bool incoming_p) 800{ 801 if (!DECL_STATIC_CHAIN (fndecl)) 802 return NULL; 803 804 if (incoming_p) 805 { 806#ifdef STATIC_CHAIN_INCOMING_REGNUM 807 return gen_rtx_REG (Pmode, STATIC_CHAIN_INCOMING_REGNUM); 808#endif 809 } 810 811#ifdef STATIC_CHAIN_REGNUM 812 return gen_rtx_REG (Pmode, STATIC_CHAIN_REGNUM); 813#endif 814 815 { 816 static bool issued_error; 817 if (!issued_error) 818 { 819 issued_error = true; 820 sorry ("nested functions not supported on this target"); 821 } 822 823 /* It really doesn't matter what we return here, so long at it 824 doesn't cause the rest of the compiler to crash. */ 825 return gen_rtx_MEM (Pmode, stack_pointer_rtx); 826 } 827} 828 829void 830default_trampoline_init (rtx ARG_UNUSED (m_tramp), tree ARG_UNUSED (t_func), 831 rtx ARG_UNUSED (r_chain)) 832{ 833 sorry ("nested function trampolines not supported on this target"); 834} 835 836int 837default_return_pops_args (tree fundecl ATTRIBUTE_UNUSED, 838 tree funtype ATTRIBUTE_UNUSED, 839 int size ATTRIBUTE_UNUSED) 840{ 841 return 0; 842} 843 844reg_class_t 845default_branch_target_register_class (void) 846{ 847 return NO_REGS; 848} 849 850extern bool 851default_lra_p (void) 852{ 853 return false; 854} 855 856int 857default_register_priority (int hard_regno ATTRIBUTE_UNUSED) 858{ 859 return 0; 860} 861 862extern bool 863default_different_addr_displacement_p (void) 864{ 865 return false; 866} 867 868reg_class_t 869default_secondary_reload (bool in_p ATTRIBUTE_UNUSED, rtx x ATTRIBUTE_UNUSED, 870 reg_class_t reload_class_i ATTRIBUTE_UNUSED, 871 enum machine_mode reload_mode ATTRIBUTE_UNUSED, 872 secondary_reload_info *sri) 873{ 874 enum reg_class rclass = NO_REGS; 875 enum reg_class reload_class = (enum reg_class) reload_class_i; 876 877 if (sri->prev_sri && sri->prev_sri->t_icode != CODE_FOR_nothing) 878 { 879 sri->icode = sri->prev_sri->t_icode; 880 return NO_REGS; 881 } 882#ifdef SECONDARY_INPUT_RELOAD_CLASS 883 if (in_p) 884 rclass = SECONDARY_INPUT_RELOAD_CLASS (reload_class, reload_mode, x); 885#endif 886#ifdef SECONDARY_OUTPUT_RELOAD_CLASS 887 if (! in_p) 888 rclass = SECONDARY_OUTPUT_RELOAD_CLASS (reload_class, reload_mode, x); 889#endif 890 if (rclass != NO_REGS) 891 { 892 enum insn_code icode 893 = direct_optab_handler (in_p ? reload_in_optab : reload_out_optab, 894 reload_mode); 895 896 if (icode != CODE_FOR_nothing 897 && !insn_operand_matches (icode, in_p, x)) 898 icode = CODE_FOR_nothing; 899 else if (icode != CODE_FOR_nothing) 900 { 901 const char *insn_constraint, *scratch_constraint; 902 char insn_letter, scratch_letter; 903 enum reg_class insn_class, scratch_class; 904 905 gcc_assert (insn_data[(int) icode].n_operands == 3); 906 insn_constraint = insn_data[(int) icode].operand[!in_p].constraint; 907 if (!*insn_constraint) 908 insn_class = ALL_REGS; 909 else 910 { 911 if (in_p) 912 { 913 gcc_assert (*insn_constraint == '='); 914 insn_constraint++; 915 } 916 insn_letter = *insn_constraint; 917 insn_class 918 = (insn_letter == 'r' ? GENERAL_REGS 919 : REG_CLASS_FROM_CONSTRAINT ((unsigned char) insn_letter, 920 insn_constraint)); 921 gcc_assert (insn_class != NO_REGS); 922 } 923 924 scratch_constraint = insn_data[(int) icode].operand[2].constraint; 925 /* The scratch register's constraint must start with "=&", 926 except for an input reload, where only "=" is necessary, 927 and where it might be beneficial to re-use registers from 928 the input. */ 929 gcc_assert (scratch_constraint[0] == '=' 930 && (in_p || scratch_constraint[1] == '&')); 931 scratch_constraint++; 932 if (*scratch_constraint == '&') 933 scratch_constraint++; 934 scratch_letter = *scratch_constraint; 935 scratch_class 936 = (scratch_letter == 'r' ? GENERAL_REGS 937 : REG_CLASS_FROM_CONSTRAINT ((unsigned char) scratch_letter, 938 scratch_constraint)); 939 940 if (reg_class_subset_p (reload_class, insn_class)) 941 { 942 gcc_assert (scratch_class == rclass); 943 rclass = NO_REGS; 944 } 945 else 946 rclass = insn_class; 947 948 } 949 if (rclass == NO_REGS) 950 sri->icode = icode; 951 else 952 sri->t_icode = icode; 953 } 954 return rclass; 955} 956 957/* By default, if flag_pic is true, then neither local nor global relocs 958 should be placed in readonly memory. */ 959 960int 961default_reloc_rw_mask (void) 962{ 963 return flag_pic ? 3 : 0; 964} 965 966/* By default, do no modification. */ 967tree default_mangle_decl_assembler_name (tree decl ATTRIBUTE_UNUSED, 968 tree id) 969{ 970 return id; 971} 972 973/* Default to natural alignment for vector types. */ 974HOST_WIDE_INT 975default_vector_alignment (const_tree type) 976{ 977 return tree_low_cst (TYPE_SIZE (type), 0); 978} 979 980bool 981default_builtin_vector_alignment_reachable (const_tree type, bool is_packed) 982{ 983 if (is_packed) 984 return false; 985 986 /* Assuming that types whose size is > pointer-size are not guaranteed to be 987 naturally aligned. */ 988 if (tree_int_cst_compare (TYPE_SIZE (type), bitsize_int (POINTER_SIZE)) > 0) 989 return false; 990 991 /* Assuming that types whose size is <= pointer-size 992 are naturally aligned. */ 993 return true; 994} 995 996/* By default, assume that a target supports any factor of misalignment 997 memory access if it supports movmisalign patten. 998 is_packed is true if the memory access is defined in a packed struct. */ 999bool 1000default_builtin_support_vector_misalignment (enum machine_mode mode, 1001 const_tree type 1002 ATTRIBUTE_UNUSED, 1003 int misalignment 1004 ATTRIBUTE_UNUSED, 1005 bool is_packed 1006 ATTRIBUTE_UNUSED) 1007{ 1008 if (optab_handler (movmisalign_optab, mode) != CODE_FOR_nothing) 1009 return true; 1010 return false; 1011} 1012 1013/* By default, only attempt to parallelize bitwise operations, and 1014 possibly adds/subtracts using bit-twiddling. */ 1015 1016enum machine_mode 1017default_preferred_simd_mode (enum machine_mode mode ATTRIBUTE_UNUSED) 1018{ 1019 return word_mode; 1020} 1021 1022/* By default only the size derived from the preferred vector mode 1023 is tried. */ 1024 1025unsigned int 1026default_autovectorize_vector_sizes (void) 1027{ 1028 return 0; 1029} 1030 1031/* By default, the cost model accumulates three separate costs (prologue, 1032 loop body, and epilogue) for a vectorized loop or block. So allocate an 1033 array of three unsigned ints, set it to zero, and return its address. */ 1034 1035void * 1036default_init_cost (struct loop *loop_info ATTRIBUTE_UNUSED) 1037{ 1038 unsigned *cost = XNEWVEC (unsigned, 3); 1039 cost[vect_prologue] = cost[vect_body] = cost[vect_epilogue] = 0; 1040 return cost; 1041} 1042 1043/* By default, the cost model looks up the cost of the given statement 1044 kind and mode, multiplies it by the occurrence count, accumulates 1045 it into the cost specified by WHERE, and returns the cost added. */ 1046 1047unsigned 1048default_add_stmt_cost (void *data, int count, enum vect_cost_for_stmt kind, 1049 struct _stmt_vec_info *stmt_info, int misalign, 1050 enum vect_cost_model_location where) 1051{ 1052 unsigned *cost = (unsigned *) data; 1053 unsigned retval = 0; 1054 1055 if (flag_vect_cost_model) 1056 { 1057 tree vectype = stmt_info ? stmt_vectype (stmt_info) : NULL_TREE; 1058 int stmt_cost = default_builtin_vectorization_cost (kind, vectype, 1059 misalign); 1060 /* Statements in an inner loop relative to the loop being 1061 vectorized are weighted more heavily. The value here is 1062 arbitrary and could potentially be improved with analysis. */ 1063 if (where == vect_body && stmt_info && stmt_in_inner_loop_p (stmt_info)) 1064 count *= 50; /* FIXME. */ 1065 1066 retval = (unsigned) (count * stmt_cost); 1067 cost[where] += retval; 1068 } 1069 1070 return retval; 1071} 1072 1073/* By default, the cost model just returns the accumulated costs. */ 1074 1075void 1076default_finish_cost (void *data, unsigned *prologue_cost, 1077 unsigned *body_cost, unsigned *epilogue_cost) 1078{ 1079 unsigned *cost = (unsigned *) data; 1080 *prologue_cost = cost[vect_prologue]; 1081 *body_cost = cost[vect_body]; 1082 *epilogue_cost = cost[vect_epilogue]; 1083} 1084 1085/* Free the cost data. */ 1086 1087void 1088default_destroy_cost_data (void *data) 1089{ 1090 free (data); 1091} 1092 1093/* Determine whether or not a pointer mode is valid. Assume defaults 1094 of ptr_mode or Pmode - can be overridden. */ 1095bool 1096default_valid_pointer_mode (enum machine_mode mode) 1097{ 1098 return (mode == ptr_mode || mode == Pmode); 1099} 1100 1101/* Determine whether the memory reference specified by REF may alias 1102 the C libraries errno location. */ 1103bool 1104default_ref_may_alias_errno (ao_ref *ref) 1105{ 1106 tree base = ao_ref_base (ref); 1107 /* The default implementation assumes the errno location is 1108 a declaration of type int or is always accessed via a 1109 pointer to int. We assume that accesses to errno are 1110 not deliberately obfuscated (even in conforming ways). */ 1111 if (TYPE_UNSIGNED (TREE_TYPE (base)) 1112 || TYPE_MODE (TREE_TYPE (base)) != TYPE_MODE (integer_type_node)) 1113 return false; 1114 /* The default implementation assumes an errno location 1115 declaration is never defined in the current compilation unit. */ 1116 if (DECL_P (base) 1117 && !TREE_STATIC (base)) 1118 return true; 1119 else if (TREE_CODE (base) == MEM_REF 1120 && TREE_CODE (TREE_OPERAND (base, 0)) == SSA_NAME) 1121 { 1122 struct ptr_info_def *pi = SSA_NAME_PTR_INFO (TREE_OPERAND (base, 0)); 1123 return !pi || pi->pt.anything || pi->pt.nonlocal; 1124 } 1125 return false; 1126} 1127 1128/* Return the mode for a pointer to a given ADDRSPACE, defaulting to ptr_mode 1129 for the generic address space only. */ 1130 1131enum machine_mode 1132default_addr_space_pointer_mode (addr_space_t addrspace ATTRIBUTE_UNUSED) 1133{ 1134 gcc_assert (ADDR_SPACE_GENERIC_P (addrspace)); 1135 return ptr_mode; 1136} 1137 1138/* Return the mode for an address in a given ADDRSPACE, defaulting to Pmode 1139 for the generic address space only. */ 1140 1141enum machine_mode 1142default_addr_space_address_mode (addr_space_t addrspace ATTRIBUTE_UNUSED) 1143{ 1144 gcc_assert (ADDR_SPACE_GENERIC_P (addrspace)); 1145 return Pmode; 1146} 1147 1148/* Named address space version of valid_pointer_mode. */ 1149 1150bool 1151default_addr_space_valid_pointer_mode (enum machine_mode mode, addr_space_t as) 1152{ 1153 if (!ADDR_SPACE_GENERIC_P (as)) 1154 return (mode == targetm.addr_space.pointer_mode (as) 1155 || mode == targetm.addr_space.address_mode (as)); 1156 1157 return targetm.valid_pointer_mode (mode); 1158} 1159 1160/* Some places still assume that all pointer or address modes are the 1161 standard Pmode and ptr_mode. These optimizations become invalid if 1162 the target actually supports multiple different modes. For now, 1163 we disable such optimizations on such targets, using this function. */ 1164 1165bool 1166target_default_pointer_address_modes_p (void) 1167{ 1168 if (targetm.addr_space.address_mode != default_addr_space_address_mode) 1169 return false; 1170 if (targetm.addr_space.pointer_mode != default_addr_space_pointer_mode) 1171 return false; 1172 1173 return true; 1174} 1175 1176/* Named address space version of legitimate_address_p. */ 1177 1178bool 1179default_addr_space_legitimate_address_p (enum machine_mode mode, rtx mem, 1180 bool strict, addr_space_t as) 1181{ 1182 if (!ADDR_SPACE_GENERIC_P (as)) 1183 gcc_unreachable (); 1184 1185 return targetm.legitimate_address_p (mode, mem, strict); 1186} 1187 1188/* Named address space version of LEGITIMIZE_ADDRESS. */ 1189 1190rtx 1191default_addr_space_legitimize_address (rtx x, rtx oldx, 1192 enum machine_mode mode, addr_space_t as) 1193{ 1194 if (!ADDR_SPACE_GENERIC_P (as)) 1195 return x; 1196 1197 return targetm.legitimize_address (x, oldx, mode); 1198} 1199 1200/* The default hook for determining if one named address space is a subset of 1201 another and to return which address space to use as the common address 1202 space. */ 1203 1204bool 1205default_addr_space_subset_p (addr_space_t subset, addr_space_t superset) 1206{ 1207 return (subset == superset); 1208} 1209 1210/* The default hook for TARGET_ADDR_SPACE_CONVERT. This hook should never be 1211 called for targets with only a generic address space. */ 1212 1213rtx 1214default_addr_space_convert (rtx op ATTRIBUTE_UNUSED, 1215 tree from_type ATTRIBUTE_UNUSED, 1216 tree to_type ATTRIBUTE_UNUSED) 1217{ 1218 gcc_unreachable (); 1219} 1220 1221bool 1222default_hard_regno_scratch_ok (unsigned int regno ATTRIBUTE_UNUSED) 1223{ 1224 return true; 1225} 1226 1227/* The default implementation of TARGET_MODE_DEPENDENT_ADDRESS_P. */ 1228 1229bool 1230default_mode_dependent_address_p (const_rtx addr ATTRIBUTE_UNUSED, 1231 addr_space_t addrspace ATTRIBUTE_UNUSED) 1232{ 1233 return false; 1234} 1235 1236bool 1237default_target_option_valid_attribute_p (tree ARG_UNUSED (fndecl), 1238 tree ARG_UNUSED (name), 1239 tree ARG_UNUSED (args), 1240 int ARG_UNUSED (flags)) 1241{ 1242 warning (OPT_Wattributes, 1243 "target attribute is not supported on this machine"); 1244 1245 return false; 1246} 1247 1248bool 1249default_target_option_pragma_parse (tree ARG_UNUSED (args), 1250 tree ARG_UNUSED (pop_target)) 1251{ 1252 warning (OPT_Wpragmas, 1253 "#pragma GCC target is not supported for this machine"); 1254 1255 return false; 1256} 1257 1258bool 1259default_target_can_inline_p (tree caller, tree callee) 1260{ 1261 bool ret = false; 1262 tree callee_opts = DECL_FUNCTION_SPECIFIC_TARGET (callee); 1263 tree caller_opts = DECL_FUNCTION_SPECIFIC_TARGET (caller); 1264 1265 /* If callee has no option attributes, then it is ok to inline */ 1266 if (!callee_opts) 1267 ret = true; 1268 1269 /* If caller has no option attributes, but callee does then it is not ok to 1270 inline */ 1271 else if (!caller_opts) 1272 ret = false; 1273 1274 /* If both caller and callee have attributes, assume that if the 1275 pointer is different, the two functions have different target 1276 options since build_target_option_node uses a hash table for the 1277 options. */ 1278 else 1279 ret = (callee_opts == caller_opts); 1280 1281 return ret; 1282} 1283 1284#ifndef HAVE_casesi 1285# define HAVE_casesi 0 1286#endif 1287 1288/* If the machine does not have a case insn that compares the bounds, 1289 this means extra overhead for dispatch tables, which raises the 1290 threshold for using them. */ 1291 1292unsigned int 1293default_case_values_threshold (void) 1294{ 1295 return (HAVE_casesi ? 4 : 5); 1296} 1297 1298bool 1299default_have_conditional_execution (void) 1300{ 1301#ifdef HAVE_conditional_execution 1302 return HAVE_conditional_execution; 1303#else 1304 return false; 1305#endif 1306} 1307 1308tree 1309default_builtin_tm_load_store (tree ARG_UNUSED (type)) 1310{ 1311 return NULL_TREE; 1312} 1313 1314/* Compute cost of moving registers to/from memory. */ 1315 1316int 1317default_memory_move_cost (enum machine_mode mode ATTRIBUTE_UNUSED, 1318 reg_class_t rclass ATTRIBUTE_UNUSED, 1319 bool in ATTRIBUTE_UNUSED) 1320{ 1321#ifndef MEMORY_MOVE_COST 1322 return (4 + memory_move_secondary_cost (mode, (enum reg_class) rclass, in)); 1323#else 1324 return MEMORY_MOVE_COST (mode, (enum reg_class) rclass, in); 1325#endif 1326} 1327 1328/* Compute cost of moving data from a register of class FROM to one of 1329 TO, using MODE. */ 1330 1331int 1332default_register_move_cost (enum machine_mode mode ATTRIBUTE_UNUSED, 1333 reg_class_t from ATTRIBUTE_UNUSED, 1334 reg_class_t to ATTRIBUTE_UNUSED) 1335{ 1336#ifndef REGISTER_MOVE_COST 1337 return 2; 1338#else 1339 return REGISTER_MOVE_COST (mode, (enum reg_class) from, (enum reg_class) to); 1340#endif 1341} 1342 1343bool 1344default_profile_before_prologue (void) 1345{ 1346#ifdef PROFILE_BEFORE_PROLOGUE 1347 return true; 1348#else 1349 return false; 1350#endif 1351} 1352 1353/* The default implementation of TARGET_PREFERRED_RELOAD_CLASS. */ 1354 1355reg_class_t 1356default_preferred_reload_class (rtx x ATTRIBUTE_UNUSED, 1357 reg_class_t rclass) 1358{ 1359#ifdef PREFERRED_RELOAD_CLASS 1360 return (reg_class_t) PREFERRED_RELOAD_CLASS (x, (enum reg_class) rclass); 1361#else 1362 return rclass; 1363#endif 1364} 1365 1366/* The default implementation of TARGET_OUTPUT_PREFERRED_RELOAD_CLASS. */ 1367 1368reg_class_t 1369default_preferred_output_reload_class (rtx x ATTRIBUTE_UNUSED, 1370 reg_class_t rclass) 1371{ 1372 return rclass; 1373} 1374 1375/* The default implementation of TARGET_PREFERRED_RENAME_CLASS. */ 1376reg_class_t 1377default_preferred_rename_class (reg_class_t rclass ATTRIBUTE_UNUSED) 1378{ 1379 return NO_REGS; 1380} 1381 1382/* The default implementation of TARGET_CLASS_LIKELY_SPILLED_P. */ 1383 1384bool 1385default_class_likely_spilled_p (reg_class_t rclass) 1386{ 1387 return (reg_class_size[(int) rclass] == 1); 1388} 1389 1390/* The default implementation of TARGET_CLASS_MAX_NREGS. */ 1391 1392unsigned char 1393default_class_max_nregs (reg_class_t rclass ATTRIBUTE_UNUSED, 1394 enum machine_mode mode ATTRIBUTE_UNUSED) 1395{ 1396#ifdef CLASS_MAX_NREGS 1397 return (unsigned char) CLASS_MAX_NREGS ((enum reg_class) rclass, mode); 1398#else 1399 return ((GET_MODE_SIZE (mode) + UNITS_PER_WORD - 1) / UNITS_PER_WORD); 1400#endif 1401} 1402 1403/* Determine the debugging unwind mechanism for the target. */ 1404 1405enum unwind_info_type 1406default_debug_unwind_info (void) 1407{ 1408 /* If the target wants to force the use of dwarf2 unwind info, let it. */ 1409 /* ??? Change all users to the hook, then poison this. */ 1410#ifdef DWARF2_FRAME_INFO 1411 if (DWARF2_FRAME_INFO) 1412 return UI_DWARF2; 1413#endif 1414 1415 /* Otherwise, only turn it on if dwarf2 debugging is enabled. */ 1416#ifdef DWARF2_DEBUGGING_INFO 1417 if (write_symbols == DWARF2_DEBUG || write_symbols == VMS_AND_DWARF2_DEBUG) 1418 return UI_DWARF2; 1419#endif 1420 1421 return UI_NONE; 1422} 1423 1424/* To be used by targets where reg_raw_mode doesn't return the right 1425 mode for registers used in apply_builtin_return and apply_builtin_arg. */ 1426 1427enum machine_mode 1428default_get_reg_raw_mode(int regno) 1429{ 1430 return reg_raw_mode[regno]; 1431} 1432 1433/* Return true if the state of option OPTION should be stored in PCH files 1434 and checked by default_pch_valid_p. Store the option's current state 1435 in STATE if so. */ 1436 1437static inline bool 1438option_affects_pch_p (int option, struct cl_option_state *state) 1439{ 1440 if ((cl_options[option].flags & CL_TARGET) == 0) 1441 return false; 1442 if (option_flag_var (option, &global_options) == &target_flags) 1443 if (targetm.check_pch_target_flags) 1444 return false; 1445 return get_option_state (&global_options, option, state); 1446} 1447 1448/* Default version of get_pch_validity. 1449 By default, every flag difference is fatal; that will be mostly right for 1450 most targets, but completely right for very few. */ 1451 1452void * 1453default_get_pch_validity (size_t *sz) 1454{ 1455 struct cl_option_state state; 1456 size_t i; 1457 char *result, *r; 1458 1459 *sz = 2; 1460 if (targetm.check_pch_target_flags) 1461 *sz += sizeof (target_flags); 1462 for (i = 0; i < cl_options_count; i++) 1463 if (option_affects_pch_p (i, &state)) 1464 *sz += state.size; 1465 1466 result = r = XNEWVEC (char, *sz); 1467 r[0] = flag_pic; 1468 r[1] = flag_pie; 1469 r += 2; 1470 if (targetm.check_pch_target_flags) 1471 { 1472 memcpy (r, &target_flags, sizeof (target_flags)); 1473 r += sizeof (target_flags); 1474 } 1475 1476 for (i = 0; i < cl_options_count; i++) 1477 if (option_affects_pch_p (i, &state)) 1478 { 1479 memcpy (r, state.data, state.size); 1480 r += state.size; 1481 } 1482 1483 return result; 1484} 1485 1486/* Return a message which says that a PCH file was created with a different 1487 setting of OPTION. */ 1488 1489static const char * 1490pch_option_mismatch (const char *option) 1491{ 1492 char *r; 1493 1494 asprintf (&r, _("created and used with differing settings of '%s'"), option); 1495 if (r == NULL) 1496 return _("out of memory"); 1497 return r; 1498} 1499 1500/* Default version of pch_valid_p. */ 1501 1502const char * 1503default_pch_valid_p (const void *data_p, size_t len) 1504{ 1505 struct cl_option_state state; 1506 const char *data = (const char *)data_p; 1507 size_t i; 1508 1509 /* -fpic and -fpie also usually make a PCH invalid. */ 1510 if (data[0] != flag_pic) 1511 return _("created and used with different settings of -fpic"); 1512 if (data[1] != flag_pie) 1513 return _("created and used with different settings of -fpie"); 1514 data += 2; 1515 1516 /* Check target_flags. */ 1517 if (targetm.check_pch_target_flags) 1518 { 1519 int tf; 1520 const char *r; 1521 1522 memcpy (&tf, data, sizeof (target_flags)); 1523 data += sizeof (target_flags); 1524 len -= sizeof (target_flags); 1525 r = targetm.check_pch_target_flags (tf); 1526 if (r != NULL) 1527 return r; 1528 } 1529 1530 for (i = 0; i < cl_options_count; i++) 1531 if (option_affects_pch_p (i, &state)) 1532 { 1533 if (memcmp (data, state.data, state.size) != 0) 1534 return pch_option_mismatch (cl_options[i].opt_text); 1535 data += state.size; 1536 len -= state.size; 1537 } 1538 1539 return NULL; 1540} 1541 1542/* Default version of member_type_forces_blk. */ 1543 1544bool 1545default_member_type_forces_blk (const_tree, enum machine_mode) 1546{ 1547 return false; 1548} 1549 1550/* Default version of canonicalize_comparison. */ 1551 1552void 1553default_canonicalize_comparison (int *, rtx *, rtx *, bool) 1554{ 1555} 1556 1557#include "gt-targhooks.h" 1558