27a4cd485d
gcc/ Patch autogenerated by refactor_passes.py from https://github.com/davidmalcolm/gcc-refactoring-scripts revision 03fe39476a4c4ea450b49e087cfa817b5f92021e * asan.c (pass_asan): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_asan): ...new pass_data instance and... (make_pass_asan): ...new function. (pass_asan_O0): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_asan_O0): ...new pass_data instance and... (make_pass_asan_O0): ...new function. * auto-inc-dec.c (pass_inc_dec): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_inc_dec): ...new pass_data instance and... (make_pass_inc_dec): ...new function. * bb-reorder.c (pass_reorder_blocks): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_reorder_blocks): ...new pass_data instance and... (make_pass_reorder_blocks): ...new function. (pass_duplicate_computed_gotos): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_duplicate_computed_gotos): ...new pass_data instance and... (make_pass_duplicate_computed_gotos): ...new function. (pass_partition_blocks): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_partition_blocks): ...new pass_data instance and... (make_pass_partition_blocks): ...new function. * bt-load.c (pass_branch_target_load_optimize1): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_branch_target_load_optimize1): ...new pass_data instance and... (make_pass_branch_target_load_optimize1): ...new function. (pass_branch_target_load_optimize2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_branch_target_load_optimize2): ...new pass_data instance and... (make_pass_branch_target_load_optimize2): ...new function. * cfgcleanup.c (pass_jump): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_jump): ...new pass_data instance and... (make_pass_jump): ...new function. (pass_jump2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_jump2): ...new pass_data instance and... (make_pass_jump2): ...new function. * cfgexpand.c (pass_expand): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_expand): ...new pass_data instance and... (make_pass_expand): ...new function. * cfgrtl.c (pass_free_cfg): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_free_cfg): ...new pass_data instance and... (make_pass_free_cfg): ...new function. (pass_into_cfg_layout_mode): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_into_cfg_layout_mode): ...new pass_data instance and... (make_pass_into_cfg_layout_mode): ...new function. (pass_outof_cfg_layout_mode): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_outof_cfg_layout_mode): ...new pass_data instance and... (make_pass_outof_cfg_layout_mode): ...new function. * cgraphbuild.c (pass_build_cgraph_edges): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_build_cgraph_edges): ...new pass_data instance and... (make_pass_build_cgraph_edges): ...new function. (pass_rebuild_cgraph_edges): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_rebuild_cgraph_edges): ...new pass_data instance and... (make_pass_rebuild_cgraph_edges): ...new function. (pass_remove_cgraph_callee_edges): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_remove_cgraph_callee_edges): ...new pass_data instance and... (make_pass_remove_cgraph_callee_edges): ...new function. * combine-stack-adj.c (pass_stack_adjustments): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_stack_adjustments): ...new pass_data instance and... (make_pass_stack_adjustments): ...new function. * combine.c (pass_combine): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_combine): ...new pass_data instance and... (make_pass_combine): ...new function. * compare-elim.c (pass_compare_elim_after_reload): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_compare_elim_after_reload): ...new pass_data instance and... (make_pass_compare_elim_after_reload): ...new function. * cprop.c (pass_rtl_cprop): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_cprop): ...new pass_data instance and... (make_pass_rtl_cprop): ...new function. * cse.c (pass_cse): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_cse): ...new pass_data instance and... (make_pass_cse): ...new function. (pass_cse2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_cse2): ...new pass_data instance and... (make_pass_cse2): ...new function. (pass_cse_after_global_opts): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_cse_after_global_opts): ...new pass_data instance and... (make_pass_cse_after_global_opts): ...new function. * dce.c (pass_ud_rtl_dce): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_ud_rtl_dce): ...new pass_data instance and... (make_pass_ud_rtl_dce): ...new function. (pass_fast_rtl_dce): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_fast_rtl_dce): ...new pass_data instance and... (make_pass_fast_rtl_dce): ...new function. * df-core.c (pass_df_initialize_opt): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_df_initialize_opt): ...new pass_data instance and... (make_pass_df_initialize_opt): ...new function. (pass_df_initialize_no_opt): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_df_initialize_no_opt): ...new pass_data instance and... (make_pass_df_initialize_no_opt): ...new function. (pass_df_finish): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_df_finish): ...new pass_data instance and... (make_pass_df_finish): ...new function. * dse.c (pass_rtl_dse1): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_dse1): ...new pass_data instance and... (make_pass_rtl_dse1): ...new function. (pass_rtl_dse2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_dse2): ...new pass_data instance and... (make_pass_rtl_dse2): ...new function. * dwarf2cfi.c (pass_dwarf2_frame): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_dwarf2_frame): ...new pass_data instance and... (make_pass_dwarf2_frame): ...new function. * except.c (pass_set_nothrow_function_flags): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_set_nothrow_function_flags): ...new pass_data instance and... (make_pass_set_nothrow_function_flags): ...new function. (pass_convert_to_eh_region_ranges): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_convert_to_eh_region_ranges): ...new pass_data instance and... (make_pass_convert_to_eh_region_ranges): ...new function. * final.c (pass_compute_alignments): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_compute_alignments): ...new pass_data instance and... (make_pass_compute_alignments): ...new function. (pass_final): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_final): ...new pass_data instance and... (make_pass_final): ...new function. (pass_shorten_branches): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_shorten_branches): ...new pass_data instance and... (make_pass_shorten_branches): ...new function. (pass_clean_state): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_clean_state): ...new pass_data instance and... (make_pass_clean_state): ...new function. * function.c (pass_instantiate_virtual_regs): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_instantiate_virtual_regs): ...new pass_data instance and... (make_pass_instantiate_virtual_regs): ...new function. (pass_leaf_regs): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_leaf_regs): ...new pass_data instance and... (make_pass_leaf_regs): ...new function. (pass_thread_prologue_and_epilogue): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_thread_prologue_and_epilogue): ...new pass_data instance and... (make_pass_thread_prologue_and_epilogue): ...new function. (pass_match_asm_constraints): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_match_asm_constraints): ...new pass_data instance and... (make_pass_match_asm_constraints): ...new function. * fwprop.c (pass_rtl_fwprop): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_fwprop): ...new pass_data instance and... (make_pass_rtl_fwprop): ...new function. (pass_rtl_fwprop_addr): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_fwprop_addr): ...new pass_data instance and... (make_pass_rtl_fwprop_addr): ...new function. * gcse.c (pass_rtl_pre): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_pre): ...new pass_data instance and... (make_pass_rtl_pre): ...new function. (pass_rtl_hoist): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_hoist): ...new pass_data instance and... (make_pass_rtl_hoist): ...new function. * gimple-low.c (pass_lower_cf): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_cf): ...new pass_data instance and... (make_pass_lower_cf): ...new function. * gimple-ssa-strength-reduction.c (pass_strength_reduction): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_strength_reduction): ...new pass_data instance and... (make_pass_strength_reduction): ...new function. * ifcvt.c (pass_rtl_ifcvt): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_ifcvt): ...new pass_data instance and... (make_pass_rtl_ifcvt): ...new function. (pass_if_after_combine): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_if_after_combine): ...new pass_data instance and... (make_pass_if_after_combine): ...new function. (pass_if_after_reload): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_if_after_reload): ...new pass_data instance and... (make_pass_if_after_reload): ...new function. * init-regs.c (pass_initialize_regs): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_initialize_regs): ...new pass_data instance and... (make_pass_initialize_regs): ...new function. * ipa-cp.c (pass_ipa_cp): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_cp): ...new pass_data instance and... (make_pass_ipa_cp): ...new function. * ipa-inline-analysis.c (pass_inline_parameters): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_inline_parameters): ...new pass_data instance and... (make_pass_inline_parameters): ...new function. * ipa-inline.c (pass_early_inline): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_early_inline): ...new pass_data instance and... (make_pass_early_inline): ...new function. (pass_ipa_inline): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_inline): ...new pass_data instance and... (make_pass_ipa_inline): ...new function. * ipa-pure-const.c (pass_local_pure_const): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_local_pure_const): ...new pass_data instance and... (make_pass_local_pure_const): ...new function. (pass_ipa_pure_const): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_pure_const): ...new pass_data instance and... (make_pass_ipa_pure_const): ...new function. * ipa-reference.c (pass_ipa_reference): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_reference): ...new pass_data instance and... (make_pass_ipa_reference): ...new function. * ipa-split.c (pass_split_functions): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_split_functions): ...new pass_data instance and... (make_pass_split_functions): ...new function. (pass_feedback_split_functions): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_feedback_split_functions): ...new pass_data instance and... (make_pass_feedback_split_functions): ...new function. * ipa.c (pass_ipa_function_and_variable_visibility): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_function_and_variable_visibility): ...new pass_data instance and... (make_pass_ipa_function_and_variable_visibility): ...new function. (pass_ipa_free_inline_summary): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_free_inline_summary): ...new pass_data instance and... (make_pass_ipa_free_inline_summary): ...new function. (pass_ipa_whole_program_visibility): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_whole_program_visibility): ...new pass_data instance and... (make_pass_ipa_whole_program_visibility): ...new function. (pass_ipa_profile): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_profile): ...new pass_data instance and... (make_pass_ipa_profile): ...new function. (pass_ipa_cdtor_merge): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_cdtor_merge): ...new pass_data instance and... (make_pass_ipa_cdtor_merge): ...new function. * ira.c (pass_ira): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_ira): ...new pass_data instance and... (make_pass_ira): ...new function. (pass_reload): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_reload): ...new pass_data instance and... (make_pass_reload): ...new function. * jump.c (pass_cleanup_barriers): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_cleanup_barriers): ...new pass_data instance and... (make_pass_cleanup_barriers): ...new function. * loop-init.c (pass_loop2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_loop2): ...new pass_data instance and... (make_pass_loop2): ...new function. (pass_rtl_loop_init): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_loop_init): ...new pass_data instance and... (make_pass_rtl_loop_init): ...new function. (pass_rtl_loop_done): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_loop_done): ...new pass_data instance and... (make_pass_rtl_loop_done): ...new function. (pass_rtl_move_loop_invariants): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_move_loop_invariants): ...new pass_data instance and... (make_pass_rtl_move_loop_invariants): ...new function. (pass_rtl_unswitch): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_unswitch): ...new pass_data instance and... (make_pass_rtl_unswitch): ...new function. (pass_rtl_unroll_and_peel_loops): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_unroll_and_peel_loops): ...new pass_data instance and... (make_pass_rtl_unroll_and_peel_loops): ...new function. (pass_rtl_doloop): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_doloop): ...new pass_data instance and... (make_pass_rtl_doloop): ...new function. * lower-subreg.c (pass_lower_subreg): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_lower_subreg): ...new pass_data instance and... (make_pass_lower_subreg): ...new function. (pass_lower_subreg2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_lower_subreg2): ...new pass_data instance and... (make_pass_lower_subreg2): ...new function. * lto-streamer-out.c (pass_ipa_lto_gimple_out): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_lto_gimple_out): ...new pass_data instance and... (make_pass_ipa_lto_gimple_out): ...new function. (pass_ipa_lto_finish_out): Convert from a global struct to a subclass of ipa_opt_pass_d along with... (pass_data_ipa_lto_finish_out): ...new pass_data instance and... (make_pass_ipa_lto_finish_out): ...new function. * mode-switching.c (pass_mode_switching): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_mode_switching): ...new pass_data instance and... (make_pass_mode_switching): ...new function. * modulo-sched.c (pass_sms): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_sms): ...new pass_data instance and... (make_pass_sms): ...new function. * omp-low.c (pass_expand_omp): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_expand_omp): ...new pass_data instance and... (make_pass_expand_omp): ...new function. (pass_lower_omp): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_omp): ...new pass_data instance and... (make_pass_lower_omp): ...new function. (pass_diagnose_omp_blocks): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_diagnose_omp_blocks): ...new pass_data instance and... (make_pass_diagnose_omp_blocks): ...new function. * passes.c (pass_early_local_passes): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_early_local_passes): ...new pass_data instance and... (make_pass_early_local_passes): ...new function. (pass_all_early_optimizations): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_all_early_optimizations): ...new pass_data instance and... (make_pass_all_early_optimizations): ...new function. (pass_all_optimizations): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_all_optimizations): ...new pass_data instance and... (make_pass_all_optimizations): ...new function. (pass_all_optimizations_g): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_all_optimizations_g): ...new pass_data instance and... (make_pass_all_optimizations_g): ...new function. (pass_rest_of_compilation): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rest_of_compilation): ...new pass_data instance and... (make_pass_rest_of_compilation): ...new function. (pass_postreload): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_postreload): ...new pass_data instance and... (make_pass_postreload): ...new function. * postreload-gcse.c (pass_gcse2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_gcse2): ...new pass_data instance and... (make_pass_gcse2): ...new function. * postreload.c (pass_postreload_cse): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_postreload_cse): ...new pass_data instance and... (make_pass_postreload_cse): ...new function. * predict.c (pass_profile): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_profile): ...new pass_data instance and... (make_pass_profile): ...new function. (pass_strip_predict_hints): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_strip_predict_hints): ...new pass_data instance and... (make_pass_strip_predict_hints): ...new function. * recog.c (pass_peephole2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_peephole2): ...new pass_data instance and... (make_pass_peephole2): ...new function. (pass_split_all_insns): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_split_all_insns): ...new pass_data instance and... (make_pass_split_all_insns): ...new function. (pass_split_after_reload): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_split_after_reload): ...new pass_data instance and... (make_pass_split_after_reload): ...new function. (pass_split_before_regstack): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_split_before_regstack): ...new pass_data instance and... (make_pass_split_before_regstack): ...new function. (pass_split_before_sched2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_split_before_sched2): ...new pass_data instance and... (make_pass_split_before_sched2): ...new function. (pass_split_for_shorten_branches): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_split_for_shorten_branches): ...new pass_data instance and... (make_pass_split_for_shorten_branches): ...new function. * ree.c (pass_ree): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_ree): ...new pass_data instance and... (make_pass_ree): ...new function. * reg-stack.c (pass_stack_regs): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_stack_regs): ...new pass_data instance and... (make_pass_stack_regs): ...new function. (pass_stack_regs_run): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_stack_regs_run): ...new pass_data instance and... (make_pass_stack_regs_run): ...new function. * regcprop.c (pass_cprop_hardreg): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_cprop_hardreg): ...new pass_data instance and... (make_pass_cprop_hardreg): ...new function. * reginfo.c (pass_reginfo_init): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_reginfo_init): ...new pass_data instance and... (make_pass_reginfo_init): ...new function. * regmove.c (pass_regmove): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_regmove): ...new pass_data instance and... (make_pass_regmove): ...new function. * regrename.c (pass_regrename): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_regrename): ...new pass_data instance and... (make_pass_regrename): ...new function. * reorg.c (pass_delay_slots): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_delay_slots): ...new pass_data instance and... (make_pass_delay_slots): ...new function. (pass_machine_reorg): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_machine_reorg): ...new pass_data instance and... (make_pass_machine_reorg): ...new function. * sched-rgn.c (pass_sched): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_sched): ...new pass_data instance and... (make_pass_sched): ...new function. (pass_sched2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_sched2): ...new pass_data instance and... (make_pass_sched2): ...new function. * stack-ptr-mod.c (pass_stack_ptr_mod): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_stack_ptr_mod): ...new pass_data instance and... (make_pass_stack_ptr_mod): ...new function. * store-motion.c (pass_rtl_store_motion): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_rtl_store_motion): ...new pass_data instance and... (make_pass_rtl_store_motion): ...new function. * tracer.c (pass_tracer): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tracer): ...new pass_data instance and... (make_pass_tracer): ...new function. * trans-mem.c (pass_diagnose_tm_blocks): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_diagnose_tm_blocks): ...new pass_data instance and... (make_pass_diagnose_tm_blocks): ...new function. (pass_lower_tm): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_tm): ...new pass_data instance and... (make_pass_lower_tm): ...new function. (pass_tm_init): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tm_init): ...new pass_data instance and... (make_pass_tm_init): ...new function. (pass_tm_mark): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tm_mark): ...new pass_data instance and... (make_pass_tm_mark): ...new function. (pass_tm_edges): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tm_edges): ...new pass_data instance and... (make_pass_tm_edges): ...new function. (pass_tm_memopt): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tm_memopt): ...new pass_data instance and... (make_pass_tm_memopt): ...new function. (pass_ipa_tm): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_tm): ...new pass_data instance and... (make_pass_ipa_tm): ...new function. * tree-call-cdce.c (pass_call_cdce): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_call_cdce): ...new pass_data instance and... (make_pass_call_cdce): ...new function. * tree-cfg.c (pass_build_cfg): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_build_cfg): ...new pass_data instance and... (make_pass_build_cfg): ...new function. (pass_split_crit_edges): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_split_crit_edges): ...new pass_data instance and... (make_pass_split_crit_edges): ...new function. (pass_warn_function_return): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_warn_function_return): ...new pass_data instance and... (make_pass_warn_function_return): ...new function. (pass_warn_function_noreturn): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_warn_function_noreturn): ...new pass_data instance and... (make_pass_warn_function_noreturn): ...new function. (pass_warn_unused_result): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_warn_unused_result): ...new pass_data instance and... (make_pass_warn_unused_result): ...new function. * tree-cfgcleanup.c (pass_merge_phi): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_merge_phi): ...new pass_data instance and... (make_pass_merge_phi): ...new function. * tree-complex.c (pass_lower_complex): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_complex): ...new pass_data instance and... (make_pass_lower_complex): ...new function. (pass_lower_complex_O0): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_complex_O0): ...new pass_data instance and... (make_pass_lower_complex_O0): ...new function. * tree-eh.c (pass_lower_eh): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_eh): ...new pass_data instance and... (make_pass_lower_eh): ...new function. (pass_refactor_eh): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_refactor_eh): ...new pass_data instance and... (make_pass_refactor_eh): ...new function. (pass_lower_resx): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_resx): ...new pass_data instance and... (make_pass_lower_resx): ...new function. (pass_lower_eh_dispatch): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_eh_dispatch): ...new pass_data instance and... (make_pass_lower_eh_dispatch): ...new function. (pass_cleanup_eh): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_cleanup_eh): ...new pass_data instance and... (make_pass_cleanup_eh): ...new function. * tree-emutls.c (pass_ipa_lower_emutls): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_lower_emutls): ...new pass_data instance and... (make_pass_ipa_lower_emutls): ...new function. * tree-if-conv.c (pass_if_conversion): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_if_conversion): ...new pass_data instance and... (make_pass_if_conversion): ...new function. * tree-into-ssa.c (pass_build_ssa): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_build_ssa): ...new pass_data instance and... (make_pass_build_ssa): ...new function. * tree-loop-distribution.c (pass_loop_distribution): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_loop_distribution): ...new pass_data instance and... (make_pass_loop_distribution): ...new function. * tree-mudflap.c (pass_mudflap_1): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_mudflap_1): ...new pass_data instance and... (make_pass_mudflap_1): ...new function. (pass_mudflap_2): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_mudflap_2): ...new pass_data instance and... (make_pass_mudflap_2): ...new function. * tree-nomudflap.c (pass_mudflap_1): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_mudflap_1): ...new pass_data instance and... (make_pass_mudflap_1): ...new function. (pass_mudflap_2): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_mudflap_2): ...new pass_data instance and... (make_pass_mudflap_2): ...new function. * tree-nrv.c (pass_nrv): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_nrv): ...new pass_data instance and... (make_pass_nrv): ...new function. (pass_return_slot): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_return_slot): ...new pass_data instance and... (make_pass_return_slot): ...new function. * tree-object-size.c (pass_object_sizes): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_object_sizes): ...new pass_data instance and... (make_pass_object_sizes): ...new function. * tree-optimize.c (pass_cleanup_cfg_post_optimizing): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_cleanup_cfg_post_optimizing): ...new pass_data instance and... (make_pass_cleanup_cfg_post_optimizing): ...new function. (pass_fixup_cfg): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_fixup_cfg): ...new pass_data instance and... (make_pass_fixup_cfg): ...new function. * tree-pass.h (pass_mudflap_1): Replace declaration with that of... (make_pass_mudflap_1): ...new function. (pass_mudflap_2): Replace declaration with that of... (make_pass_mudflap_2): ...new function. (pass_asan): Replace declaration with that of... (make_pass_asan): ...new function. (pass_asan_O0): Replace declaration with that of... (make_pass_asan_O0): ...new function. (pass_tsan): Replace declaration with that of... (make_pass_tsan): ...new function. (pass_tsan_O0): Replace declaration with that of... (make_pass_tsan_O0): ...new function. (pass_lower_cf): Replace declaration with that of... (make_pass_lower_cf): ...new function. (pass_refactor_eh): Replace declaration with that of... (make_pass_refactor_eh): ...new function. (pass_lower_eh): Replace declaration with that of... (make_pass_lower_eh): ...new function. (pass_lower_eh_dispatch): Replace declaration with that of... (make_pass_lower_eh_dispatch): ...new function. (pass_lower_resx): Replace declaration with that of... (make_pass_lower_resx): ...new function. (pass_build_cfg): Replace declaration with that of... (make_pass_build_cfg): ...new function. (pass_early_tree_profile): Replace declaration with that of... (make_pass_early_tree_profile): ...new function. (pass_cleanup_eh): Replace declaration with that of... (make_pass_cleanup_eh): ...new function. (pass_sra): Replace declaration with that of... (make_pass_sra): ...new function. (pass_sra_early): Replace declaration with that of... (make_pass_sra_early): ...new function. (pass_early_ipa_sra): Replace declaration with that of... (make_pass_early_ipa_sra): ...new function. (pass_tail_recursion): Replace declaration with that of... (make_pass_tail_recursion): ...new function. (pass_tail_calls): Replace declaration with that of... (make_pass_tail_calls): ...new function. (pass_tree_loop): Replace declaration with that of... (make_pass_tree_loop): ...new function. (pass_tree_loop_init): Replace declaration with that of... (make_pass_tree_loop_init): ...new function. (pass_lim): Replace declaration with that of... (make_pass_lim): ...new function. (pass_tree_unswitch): Replace declaration with that of... (make_pass_tree_unswitch): ...new function. (pass_predcom): Replace declaration with that of... (make_pass_predcom): ...new function. (pass_iv_canon): Replace declaration with that of... (make_pass_iv_canon): ...new function. (pass_scev_cprop): Replace declaration with that of... (make_pass_scev_cprop): ...new function. (pass_empty_loop): Replace declaration with that of... (make_pass_empty_loop): ...new function. (pass_record_bounds): Replace declaration with that of... (make_pass_record_bounds): ...new function. (pass_graphite): Replace declaration with that of... (make_pass_graphite): ...new function. (pass_graphite_transforms): Replace declaration with that of... (make_pass_graphite_transforms): ...new function. (pass_if_conversion): Replace declaration with that of... (make_pass_if_conversion): ...new function. (pass_loop_distribution): Replace declaration with that of... (make_pass_loop_distribution): ...new function. (pass_vectorize): Replace declaration with that of... (make_pass_vectorize): ...new function. (pass_slp_vectorize): Replace declaration with that of... (make_pass_slp_vectorize): ...new function. (pass_complete_unroll): Replace declaration with that of... (make_pass_complete_unroll): ...new function. (pass_complete_unrolli): Replace declaration with that of... (make_pass_complete_unrolli): ...new function. (pass_parallelize_loops): Replace declaration with that of... (make_pass_parallelize_loops): ...new function. (pass_loop_prefetch): Replace declaration with that of... (make_pass_loop_prefetch): ...new function. (pass_iv_optimize): Replace declaration with that of... (make_pass_iv_optimize): ...new function. (pass_tree_loop_done): Replace declaration with that of... (make_pass_tree_loop_done): ...new function. (pass_ch): Replace declaration with that of... (make_pass_ch): ...new function. (pass_ccp): Replace declaration with that of... (make_pass_ccp): ...new function. (pass_phi_only_cprop): Replace declaration with that of... (make_pass_phi_only_cprop): ...new function. (pass_build_ssa): Replace declaration with that of... (make_pass_build_ssa): ...new function. (pass_build_alias): Replace declaration with that of... (make_pass_build_alias): ...new function. (pass_build_ealias): Replace declaration with that of... (make_pass_build_ealias): ...new function. (pass_dominator): Replace declaration with that of... (make_pass_dominator): ...new function. (pass_dce): Replace declaration with that of... (make_pass_dce): ...new function. (pass_dce_loop): Replace declaration with that of... (make_pass_dce_loop): ...new function. (pass_cd_dce): Replace declaration with that of... (make_pass_cd_dce): ...new function. (pass_call_cdce): Replace declaration with that of... (make_pass_call_cdce): ...new function. (pass_merge_phi): Replace declaration with that of... (make_pass_merge_phi): ...new function. (pass_split_crit_edges): Replace declaration with that of... (make_pass_split_crit_edges): ...new function. (pass_pre): Replace declaration with that of... (make_pass_pre): ...new function. (pass_profile): Replace declaration with that of... (make_pass_profile): ...new function. (pass_strip_predict_hints): Replace declaration with that of... (make_pass_strip_predict_hints): ...new function. (pass_lower_complex_O0): Replace declaration with that of... (make_pass_lower_complex_O0): ...new function. (pass_lower_complex): Replace declaration with that of... (make_pass_lower_complex): ...new function. (pass_lower_vector): Replace declaration with that of... (make_pass_lower_vector): ...new function. (pass_lower_vector_ssa): Replace declaration with that of... (make_pass_lower_vector_ssa): ...new function. (pass_lower_omp): Replace declaration with that of... (make_pass_lower_omp): ...new function. (pass_diagnose_omp_blocks): Replace declaration with that of... (make_pass_diagnose_omp_blocks): ...new function. (pass_expand_omp): Replace declaration with that of... (make_pass_expand_omp): ...new function. (pass_expand_omp_ssa): Replace declaration with that of... (make_pass_expand_omp_ssa): ...new function. (pass_object_sizes): Replace declaration with that of... (make_pass_object_sizes): ...new function. (pass_strlen): Replace declaration with that of... (make_pass_strlen): ...new function. (pass_fold_builtins): Replace declaration with that of... (make_pass_fold_builtins): ...new function. (pass_stdarg): Replace declaration with that of... (make_pass_stdarg): ...new function. (pass_early_warn_uninitialized): Replace declaration with that of... (make_pass_early_warn_uninitialized): ...new function. (pass_late_warn_uninitialized): Replace declaration with that of... (make_pass_late_warn_uninitialized): ...new function. (pass_cse_reciprocals): Replace declaration with that of... (make_pass_cse_reciprocals): ...new function. (pass_cse_sincos): Replace declaration with that of... (make_pass_cse_sincos): ...new function. (pass_optimize_bswap): Replace declaration with that of... (make_pass_optimize_bswap): ...new function. (pass_optimize_widening_mul): Replace declaration with that of... (make_pass_optimize_widening_mul): ...new function. (pass_warn_function_return): Replace declaration with that of... (make_pass_warn_function_return): ...new function. (pass_warn_function_noreturn): Replace declaration with that of... (make_pass_warn_function_noreturn): ...new function. (pass_cselim): Replace declaration with that of... (make_pass_cselim): ...new function. (pass_phiopt): Replace declaration with that of... (make_pass_phiopt): ...new function. (pass_forwprop): Replace declaration with that of... (make_pass_forwprop): ...new function. (pass_phiprop): Replace declaration with that of... (make_pass_phiprop): ...new function. (pass_tree_ifcombine): Replace declaration with that of... (make_pass_tree_ifcombine): ...new function. (pass_dse): Replace declaration with that of... (make_pass_dse): ...new function. (pass_nrv): Replace declaration with that of... (make_pass_nrv): ...new function. (pass_rename_ssa_copies): Replace declaration with that of... (make_pass_rename_ssa_copies): ...new function. (pass_sink_code): Replace declaration with that of... (make_pass_sink_code): ...new function. (pass_fre): Replace declaration with that of... (make_pass_fre): ...new function. (pass_check_data_deps): Replace declaration with that of... (make_pass_check_data_deps): ...new function. (pass_copy_prop): Replace declaration with that of... (make_pass_copy_prop): ...new function. (pass_vrp): Replace declaration with that of... (make_pass_vrp): ...new function. (pass_uncprop): Replace declaration with that of... (make_pass_uncprop): ...new function. (pass_return_slot): Replace declaration with that of... (make_pass_return_slot): ...new function. (pass_reassoc): Replace declaration with that of... (make_pass_reassoc): ...new function. (pass_rebuild_cgraph_edges): Replace declaration with that of... (make_pass_rebuild_cgraph_edges): ...new function. (pass_remove_cgraph_callee_edges): Replace declaration with that of... (make_pass_remove_cgraph_callee_edges): ...new function. (pass_build_cgraph_edges): Replace declaration with that of... (make_pass_build_cgraph_edges): ...new function. (pass_local_pure_const): Replace declaration with that of... (make_pass_local_pure_const): ...new function. (pass_tracer): Replace declaration with that of... (make_pass_tracer): ...new function. (pass_warn_unused_result): Replace declaration with that of... (make_pass_warn_unused_result): ...new function. (pass_diagnose_tm_blocks): Replace declaration with that of... (make_pass_diagnose_tm_blocks): ...new function. (pass_lower_tm): Replace declaration with that of... (make_pass_lower_tm): ...new function. (pass_tm_init): Replace declaration with that of... (make_pass_tm_init): ...new function. (pass_tm_mark): Replace declaration with that of... (make_pass_tm_mark): ...new function. (pass_tm_memopt): Replace declaration with that of... (make_pass_tm_memopt): ...new function. (pass_tm_edges): Replace declaration with that of... (make_pass_tm_edges): ...new function. (pass_split_functions): Replace declaration with that of... (make_pass_split_functions): ...new function. (pass_feedback_split_functions): Replace declaration with that of... (make_pass_feedback_split_functions): ...new function. (pass_strength_reduction): Replace declaration with that of... (make_pass_strength_reduction): ...new function. (pass_ipa_lower_emutls): Replace declaration with that of... (make_pass_ipa_lower_emutls): ...new function. (pass_ipa_function_and_variable_visibility): Replace declaration with that of... (make_pass_ipa_function_and_variable_visibility): ...new function. (pass_ipa_tree_profile): Replace declaration with that of... (make_pass_ipa_tree_profile): ...new function. (pass_early_local_passes): Replace declaration with that of... (make_pass_early_local_passes): ...new function. (pass_ipa_whole_program_visibility): Replace declaration with that of... (make_pass_ipa_whole_program_visibility): ...new function. (pass_ipa_lto_gimple_out): Replace declaration with that of... (make_pass_ipa_lto_gimple_out): ...new function. (pass_ipa_increase_alignment): Replace declaration with that of... (make_pass_ipa_increase_alignment): ...new function. (pass_ipa_inline): Replace declaration with that of... (make_pass_ipa_inline): ...new function. (pass_ipa_free_lang_data): Replace declaration with that of... (make_pass_ipa_free_lang_data): ...new function. (pass_ipa_free_inline_summary): Replace declaration with that of... (make_pass_ipa_free_inline_summary): ...new function. (pass_ipa_cp): Replace declaration with that of... (make_pass_ipa_cp): ...new function. (pass_ipa_reference): Replace declaration with that of... (make_pass_ipa_reference): ...new function. (pass_ipa_pure_const): Replace declaration with that of... (make_pass_ipa_pure_const): ...new function. (pass_ipa_pta): Replace declaration with that of... (make_pass_ipa_pta): ...new function. (pass_ipa_lto_finish_out): Replace declaration with that of... (make_pass_ipa_lto_finish_out): ...new function. (pass_ipa_tm): Replace declaration with that of... (make_pass_ipa_tm): ...new function. (pass_ipa_profile): Replace declaration with that of... (make_pass_ipa_profile): ...new function. (pass_ipa_cdtor_merge): Replace declaration with that of... (make_pass_ipa_cdtor_merge): ...new function. (pass_cleanup_cfg_post_optimizing): Replace declaration with that of... (make_pass_cleanup_cfg_post_optimizing): ...new function. (pass_init_datastructures): Replace declaration with that of... (make_pass_init_datastructures): ...new function. (pass_fixup_cfg): Replace declaration with that of... (make_pass_fixup_cfg): ...new function. (pass_expand): Replace declaration with that of... (make_pass_expand): ...new function. (pass_instantiate_virtual_regs): Replace declaration with that of... (make_pass_instantiate_virtual_regs): ...new function. (pass_rtl_fwprop): Replace declaration with that of... (make_pass_rtl_fwprop): ...new function. (pass_rtl_fwprop_addr): Replace declaration with that of... (make_pass_rtl_fwprop_addr): ...new function. (pass_jump): Replace declaration with that of... (make_pass_jump): ...new function. (pass_jump2): Replace declaration with that of... (make_pass_jump2): ...new function. (pass_lower_subreg): Replace declaration with that of... (make_pass_lower_subreg): ...new function. (pass_cse): Replace declaration with that of... (make_pass_cse): ...new function. (pass_fast_rtl_dce): Replace declaration with that of... (make_pass_fast_rtl_dce): ...new function. (pass_ud_rtl_dce): Replace declaration with that of... (make_pass_ud_rtl_dce): ...new function. (pass_rtl_dce): Replace declaration with that of... (make_pass_rtl_dce): ...new function. (pass_rtl_dse1): Replace declaration with that of... (make_pass_rtl_dse1): ...new function. (pass_rtl_dse2): Replace declaration with that of... (make_pass_rtl_dse2): ...new function. (pass_rtl_dse3): Replace declaration with that of... (make_pass_rtl_dse3): ...new function. (pass_rtl_cprop): Replace declaration with that of... (make_pass_rtl_cprop): ...new function. (pass_rtl_pre): Replace declaration with that of... (make_pass_rtl_pre): ...new function. (pass_rtl_hoist): Replace declaration with that of... (make_pass_rtl_hoist): ...new function. (pass_rtl_store_motion): Replace declaration with that of... (make_pass_rtl_store_motion): ...new function. (pass_cse_after_global_opts): Replace declaration with that of... (make_pass_cse_after_global_opts): ...new function. (pass_rtl_ifcvt): Replace declaration with that of... (make_pass_rtl_ifcvt): ...new function. (pass_into_cfg_layout_mode): Replace declaration with that of... (make_pass_into_cfg_layout_mode): ...new function. (pass_outof_cfg_layout_mode): Replace declaration with that of... (make_pass_outof_cfg_layout_mode): ...new function. (pass_loop2): Replace declaration with that of... (make_pass_loop2): ...new function. (pass_rtl_loop_init): Replace declaration with that of... (make_pass_rtl_loop_init): ...new function. (pass_rtl_move_loop_invariants): Replace declaration with that of... (make_pass_rtl_move_loop_invariants): ...new function. (pass_rtl_unswitch): Replace declaration with that of... (make_pass_rtl_unswitch): ...new function. (pass_rtl_unroll_and_peel_loops): Replace declaration with that of... (make_pass_rtl_unroll_and_peel_loops): ...new function. (pass_rtl_doloop): Replace declaration with that of... (make_pass_rtl_doloop): ...new function. (pass_rtl_loop_done): Replace declaration with that of... (make_pass_rtl_loop_done): ...new function. (pass_web): Replace declaration with that of... (make_pass_web): ...new function. (pass_cse2): Replace declaration with that of... (make_pass_cse2): ...new function. (pass_df_initialize_opt): Replace declaration with that of... (make_pass_df_initialize_opt): ...new function. (pass_df_initialize_no_opt): Replace declaration with that of... (make_pass_df_initialize_no_opt): ...new function. (pass_reginfo_init): Replace declaration with that of... (make_pass_reginfo_init): ...new function. (pass_inc_dec): Replace declaration with that of... (make_pass_inc_dec): ...new function. (pass_stack_ptr_mod): Replace declaration with that of... (make_pass_stack_ptr_mod): ...new function. (pass_initialize_regs): Replace declaration with that of... (make_pass_initialize_regs): ...new function. (pass_combine): Replace declaration with that of... (make_pass_combine): ...new function. (pass_if_after_combine): Replace declaration with that of... (make_pass_if_after_combine): ...new function. (pass_ree): Replace declaration with that of... (make_pass_ree): ...new function. (pass_partition_blocks): Replace declaration with that of... (make_pass_partition_blocks): ...new function. (pass_match_asm_constraints): Replace declaration with that of... (make_pass_match_asm_constraints): ...new function. (pass_regmove): Replace declaration with that of... (make_pass_regmove): ...new function. (pass_split_all_insns): Replace declaration with that of... (make_pass_split_all_insns): ...new function. (pass_fast_rtl_byte_dce): Replace declaration with that of... (make_pass_fast_rtl_byte_dce): ...new function. (pass_lower_subreg2): Replace declaration with that of... (make_pass_lower_subreg2): ...new function. (pass_mode_switching): Replace declaration with that of... (make_pass_mode_switching): ...new function. (pass_sms): Replace declaration with that of... (make_pass_sms): ...new function. (pass_sched): Replace declaration with that of... (make_pass_sched): ...new function. (pass_ira): Replace declaration with that of... (make_pass_ira): ...new function. (pass_reload): Replace declaration with that of... (make_pass_reload): ...new function. (pass_clean_state): Replace declaration with that of... (make_pass_clean_state): ...new function. (pass_branch_prob): Replace declaration with that of... (make_pass_branch_prob): ...new function. (pass_value_profile_transformations): Replace declaration with that of... (make_pass_value_profile_transformations): ...new function. (pass_postreload_cse): Replace declaration with that of... (make_pass_postreload_cse): ...new function. (pass_gcse2): Replace declaration with that of... (make_pass_gcse2): ...new function. (pass_split_after_reload): Replace declaration with that of... (make_pass_split_after_reload): ...new function. (pass_branch_target_load_optimize1): Replace declaration with that of... (make_pass_branch_target_load_optimize1): ...new function. (pass_thread_prologue_and_epilogue): Replace declaration with that of... (make_pass_thread_prologue_and_epilogue): ...new function. (pass_stack_adjustments): Replace declaration with that of... (make_pass_stack_adjustments): ...new function. (pass_peephole2): Replace declaration with that of... (make_pass_peephole2): ...new function. (pass_if_after_reload): Replace declaration with that of... (make_pass_if_after_reload): ...new function. (pass_regrename): Replace declaration with that of... (make_pass_regrename): ...new function. (pass_cprop_hardreg): Replace declaration with that of... (make_pass_cprop_hardreg): ...new function. (pass_reorder_blocks): Replace declaration with that of... (make_pass_reorder_blocks): ...new function. (pass_branch_target_load_optimize2): Replace declaration with that of... (make_pass_branch_target_load_optimize2): ...new function. (pass_leaf_regs): Replace declaration with that of... (make_pass_leaf_regs): ...new function. (pass_split_before_sched2): Replace declaration with that of... (make_pass_split_before_sched2): ...new function. (pass_compare_elim_after_reload): Replace declaration with that of... (make_pass_compare_elim_after_reload): ...new function. (pass_sched2): Replace declaration with that of... (make_pass_sched2): ...new function. (pass_stack_regs): Replace declaration with that of... (make_pass_stack_regs): ...new function. (pass_stack_regs_run): Replace declaration with that of... (make_pass_stack_regs_run): ...new function. (pass_df_finish): Replace declaration with that of... (make_pass_df_finish): ...new function. (pass_compute_alignments): Replace declaration with that of... (make_pass_compute_alignments): ...new function. (pass_duplicate_computed_gotos): Replace declaration with that of... (make_pass_duplicate_computed_gotos): ...new function. (pass_variable_tracking): Replace declaration with that of... (make_pass_variable_tracking): ...new function. (pass_free_cfg): Replace declaration with that of... (make_pass_free_cfg): ...new function. (pass_machine_reorg): Replace declaration with that of... (make_pass_machine_reorg): ...new function. (pass_cleanup_barriers): Replace declaration with that of... (make_pass_cleanup_barriers): ...new function. (pass_delay_slots): Replace declaration with that of... (make_pass_delay_slots): ...new function. (pass_split_for_shorten_branches): Replace declaration with that of... (make_pass_split_for_shorten_branches): ...new function. (pass_split_before_regstack): Replace declaration with that of... (make_pass_split_before_regstack): ...new function. (pass_convert_to_eh_region_ranges): Replace declaration with that of... (make_pass_convert_to_eh_region_ranges): ...new function. (pass_shorten_branches): Replace declaration with that of... (make_pass_shorten_branches): ...new function. (pass_set_nothrow_function_flags): Replace declaration with that of... (make_pass_set_nothrow_function_flags): ...new function. (pass_dwarf2_frame): Replace declaration with that of... (make_pass_dwarf2_frame): ...new function. (pass_final): Replace declaration with that of... (make_pass_final): ...new function. (pass_rtl_seqabstr): Replace declaration with that of... (make_pass_rtl_seqabstr): ...new function. (pass_release_ssa_names): Replace declaration with that of... (make_pass_release_ssa_names): ...new function. (pass_early_inline): Replace declaration with that of... (make_pass_early_inline): ...new function. (pass_inline_parameters): Replace declaration with that of... (make_pass_inline_parameters): ...new function. (pass_update_address_taken): Replace declaration with that of... (make_pass_update_address_taken): ...new function. (pass_convert_switch): Replace declaration with that of... (make_pass_convert_switch): ...new function. * tree-profile.c (pass_ipa_tree_profile): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_tree_profile): ...new pass_data instance and... (make_pass_ipa_tree_profile): ...new function. * tree-sra.c (pass_sra_early): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_sra_early): ...new pass_data instance and... (make_pass_sra_early): ...new function. (pass_sra): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_sra): ...new pass_data instance and... (make_pass_sra): ...new function. (pass_early_ipa_sra): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_early_ipa_sra): ...new pass_data instance and... (make_pass_early_ipa_sra): ...new function. * tree-ssa-ccp.c (pass_ccp): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_ccp): ...new pass_data instance and... (make_pass_ccp): ...new function. (pass_fold_builtins): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_fold_builtins): ...new pass_data instance and... (make_pass_fold_builtins): ...new function. * tree-ssa-copy.c (pass_copy_prop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_copy_prop): ...new pass_data instance and... (make_pass_copy_prop): ...new function. * tree-ssa-copyrename.c (pass_rename_ssa_copies): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_rename_ssa_copies): ...new pass_data instance and... (make_pass_rename_ssa_copies): ...new function. * tree-ssa-dce.c (pass_dce): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_dce): ...new pass_data instance and... (make_pass_dce): ...new function. (pass_dce_loop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_dce_loop): ...new pass_data instance and... (make_pass_dce_loop): ...new function. (pass_cd_dce): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_cd_dce): ...new pass_data instance and... (make_pass_cd_dce): ...new function. * tree-ssa-dom.c (pass_dominator): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_dominator): ...new pass_data instance and... (make_pass_dominator): ...new function. (pass_phi_only_cprop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_phi_only_cprop): ...new pass_data instance and... (make_pass_phi_only_cprop): ...new function. * tree-ssa-dse.c (pass_dse): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_dse): ...new pass_data instance and... (make_pass_dse): ...new function. * tree-ssa-forwprop.c (pass_forwprop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_forwprop): ...new pass_data instance and... (make_pass_forwprop): ...new function. * tree-ssa-ifcombine.c (pass_tree_ifcombine): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tree_ifcombine): ...new pass_data instance and... (make_pass_tree_ifcombine): ...new function. * tree-ssa-loop-ch.c (pass_ch): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_ch): ...new pass_data instance and... (make_pass_ch): ...new function. * tree-ssa-loop.c (pass_tree_loop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tree_loop): ...new pass_data instance and... (make_pass_tree_loop): ...new function. (pass_tree_loop_init): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tree_loop_init): ...new pass_data instance and... (make_pass_tree_loop_init): ...new function. (pass_lim): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lim): ...new pass_data instance and... (make_pass_lim): ...new function. (pass_tree_unswitch): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tree_unswitch): ...new pass_data instance and... (make_pass_tree_unswitch): ...new function. (pass_predcom): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_predcom): ...new pass_data instance and... (make_pass_predcom): ...new function. (pass_vectorize): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_vectorize): ...new pass_data instance and... (make_pass_vectorize): ...new function. (pass_graphite): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_graphite): ...new pass_data instance and... (make_pass_graphite): ...new function. (pass_graphite_transforms): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_graphite_transforms): ...new pass_data instance and... (make_pass_graphite_transforms): ...new function. (pass_check_data_deps): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_check_data_deps): ...new pass_data instance and... (make_pass_check_data_deps): ...new function. (pass_iv_canon): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_iv_canon): ...new pass_data instance and... (make_pass_iv_canon): ...new function. (pass_scev_cprop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_scev_cprop): ...new pass_data instance and... (make_pass_scev_cprop): ...new function. (pass_record_bounds): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_record_bounds): ...new pass_data instance and... (make_pass_record_bounds): ...new function. (pass_complete_unroll): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_complete_unroll): ...new pass_data instance and... (make_pass_complete_unroll): ...new function. (pass_complete_unrolli): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_complete_unrolli): ...new pass_data instance and... (make_pass_complete_unrolli): ...new function. (pass_parallelize_loops): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_parallelize_loops): ...new pass_data instance and... (make_pass_parallelize_loops): ...new function. (pass_loop_prefetch): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_loop_prefetch): ...new pass_data instance and... (make_pass_loop_prefetch): ...new function. (pass_iv_optimize): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_iv_optimize): ...new pass_data instance and... (make_pass_iv_optimize): ...new function. (pass_tree_loop_done): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tree_loop_done): ...new pass_data instance and... (make_pass_tree_loop_done): ...new function. * tree-ssa-math-opts.c (pass_cse_reciprocals): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_cse_reciprocals): ...new pass_data instance and... (make_pass_cse_reciprocals): ...new function. (pass_cse_sincos): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_cse_sincos): ...new pass_data instance and... (make_pass_cse_sincos): ...new function. (pass_optimize_bswap): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_optimize_bswap): ...new pass_data instance and... (make_pass_optimize_bswap): ...new function. (pass_optimize_widening_mul): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_optimize_widening_mul): ...new pass_data instance and... (make_pass_optimize_widening_mul): ...new function. * tree-ssa-phiopt.c (pass_phiopt): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_phiopt): ...new pass_data instance and... (make_pass_phiopt): ...new function. (pass_cselim): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_cselim): ...new pass_data instance and... (make_pass_cselim): ...new function. * tree-ssa-phiprop.c (pass_phiprop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_phiprop): ...new pass_data instance and... (make_pass_phiprop): ...new function. * tree-ssa-pre.c (pass_pre): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_pre): ...new pass_data instance and... (make_pass_pre): ...new function. (pass_fre): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_fre): ...new pass_data instance and... (make_pass_fre): ...new function. * tree-ssa-reassoc.c (pass_reassoc): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_reassoc): ...new pass_data instance and... (make_pass_reassoc): ...new function. * tree-ssa-sink.c (pass_sink_code): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_sink_code): ...new pass_data instance and... (make_pass_sink_code): ...new function. * tree-ssa-strlen.c (pass_strlen): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_strlen): ...new pass_data instance and... (make_pass_strlen): ...new function. * tree-ssa-structalias.c (pass_build_alias): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_build_alias): ...new pass_data instance and... (make_pass_build_alias): ...new function. (pass_build_ealias): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_build_ealias): ...new pass_data instance and... (make_pass_build_ealias): ...new function. (pass_ipa_pta): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_pta): ...new pass_data instance and... (make_pass_ipa_pta): ...new function. * tree-ssa-uncprop.c (pass_uncprop): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_uncprop): ...new pass_data instance and... (make_pass_uncprop): ...new function. * tree-ssa-uninit.c (pass_late_warn_uninitialized): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_late_warn_uninitialized): ...new pass_data instance and... (make_pass_late_warn_uninitialized): ...new function. * tree-ssa.c (pass_init_datastructures): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_init_datastructures): ...new pass_data instance and... (make_pass_init_datastructures): ...new function. (pass_early_warn_uninitialized): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_early_warn_uninitialized): ...new pass_data instance and... (make_pass_early_warn_uninitialized): ...new function. (pass_update_address_taken): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_update_address_taken): ...new pass_data instance and... (make_pass_update_address_taken): ...new function. * tree-ssanames.c (pass_release_ssa_names): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_release_ssa_names): ...new pass_data instance and... (make_pass_release_ssa_names): ...new function. * tree-stdarg.c (pass_stdarg): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_stdarg): ...new pass_data instance and... (make_pass_stdarg): ...new function. * tree-switch-conversion.c (pass_convert_switch): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_convert_switch): ...new pass_data instance and... (make_pass_convert_switch): ...new function. * tree-tailcall.c (pass_tail_recursion): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tail_recursion): ...new pass_data instance and... (make_pass_tail_recursion): ...new function. (pass_tail_calls): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tail_calls): ...new pass_data instance and... (make_pass_tail_calls): ...new function. * tree-vect-generic.c (pass_lower_vector): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_vector): ...new pass_data instance and... (make_pass_lower_vector): ...new function. (pass_lower_vector_ssa): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_lower_vector_ssa): ...new pass_data instance and... (make_pass_lower_vector_ssa): ...new function. * tree-vectorizer.c (pass_slp_vectorize): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_slp_vectorize): ...new pass_data instance and... (make_pass_slp_vectorize): ...new function. (pass_ipa_increase_alignment): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_increase_alignment): ...new pass_data instance and... (make_pass_ipa_increase_alignment): ...new function. * tree-vrp.c (pass_vrp): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_vrp): ...new pass_data instance and... (make_pass_vrp): ...new function. * tree.c (pass_ipa_free_lang_data): Convert from a global struct to a subclass of simple_ipa_opt_pass along with... (pass_data_ipa_free_lang_data): ...new pass_data instance and... (make_pass_ipa_free_lang_data): ...new function. * tsan.c (pass_tsan): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tsan): ...new pass_data instance and... (make_pass_tsan): ...new function. (pass_tsan_O0): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_tsan_O0): ...new pass_data instance and... (make_pass_tsan_O0): ...new function. * var-tracking.c (pass_variable_tracking): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_variable_tracking): ...new pass_data instance and... (make_pass_variable_tracking): ...new function. * web.c (pass_web): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_web): ...new pass_data instance and... (make_pass_web): ...new function. * config/epiphany/epiphany.h (pass_mode_switch_use): Replace declaration with that of... (make_pass_mode_switch_use): ...new function. (pass_resolve_sw_modes): Replace declaration with that of... (make_pass_resolve_sw_modes): ...new function. * config/epiphany/mode-switch-use.c (pass_mode_switch_use): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_mode_switch_use): ...new pass_data instance and... (make_pass_mode_switch_use): ...new function. * config/epiphany/resolve-sw-modes.c (pass_resolve_sw_modes): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_resolve_sw_modes): ...new pass_data instance and... (make_pass_resolve_sw_modes): ...new function. * config/i386/i386.c (pass_insert_vzeroupper): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_insert_vzeroupper): ...new pass_data instance and... (make_pass_insert_vzeroupper): ...new function. * config/sparc/sparc.c (pass_work_around_errata): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_work_around_errata): ...new pass_data instance and... (make_pass_work_around_errata): ...new function. * config/mips/mips.c (pass_mips_machine_reorg2): Convert from a global struct to a subclass of rtl_opt_pass along with... (pass_data_mips_machine_reorg2): ...new pass_data instance and... (make_pass_mips_machine_reorg2): ...new function. gcc/testsuite/ Patch autogenerated by refactor_passes.py from https://github.com/davidmalcolm/gcc-refactoring-scripts revision 03fe39476a4c4ea450b49e087cfa817b5f92021e * gcc.dg/plugin/one_time_plugin.c (one_pass): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_one_pass): ...new pass_data instance and... (make_one_pass): ...new function. * gcc.dg/plugin/selfassign.c (pass_warn_self_assign): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_warn_self_assign): ...new pass_data instance and... (make_pass_warn_self_assign): ...new function. * g++.dg/plugin/dumb_plugin.c (pass_dumb_plugin_example): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_dumb_plugin_example): ...new pass_data instance and... (make_pass_dumb_plugin_example): ...new function. * g++.dg/plugin/selfassign.c (pass_warn_self_assign): Convert from a global struct to a subclass of gimple_opt_pass along with... (pass_data_warn_self_assign): ...new pass_data instance and... (make_pass_warn_self_assign): ...new function. From-SVN: r201508
1052 lines
32 KiB
C
1052 lines
32 KiB
C
/* GIMPLE lowering pass. Converts High GIMPLE into Low GIMPLE.
|
||
|
||
Copyright (C) 2003-2013 Free Software Foundation, Inc.
|
||
|
||
This file is part of GCC.
|
||
|
||
GCC is free software; you can redistribute it and/or modify it under
|
||
the terms of the GNU General Public License as published by the Free
|
||
Software Foundation; either version 3, or (at your option) any later
|
||
version.
|
||
|
||
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
||
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
||
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
||
for more details.
|
||
|
||
You should have received a copy of the GNU General Public License
|
||
along with GCC; see the file COPYING3. If not see
|
||
<http://www.gnu.org/licenses/>. */
|
||
|
||
#include "config.h"
|
||
#include "system.h"
|
||
#include "coretypes.h"
|
||
#include "tm.h"
|
||
#include "tree.h"
|
||
#include "gimple.h"
|
||
#include "tree-iterator.h"
|
||
#include "tree-inline.h"
|
||
#include "tree-flow.h"
|
||
#include "flags.h"
|
||
#include "function.h"
|
||
#include "diagnostic-core.h"
|
||
#include "tree-pass.h"
|
||
#include "langhooks.h"
|
||
|
||
/* The differences between High GIMPLE and Low GIMPLE are the
|
||
following:
|
||
|
||
1- Lexical scopes are removed (i.e., GIMPLE_BIND disappears).
|
||
|
||
2- GIMPLE_TRY and GIMPLE_CATCH are converted to abnormal control
|
||
flow and exception regions are built as an on-the-side region
|
||
hierarchy (See tree-eh.c:lower_eh_constructs).
|
||
|
||
3- Multiple identical return statements are grouped into a single
|
||
return and gotos to the unique return site. */
|
||
|
||
/* Match a return statement with a label. During lowering, we identify
|
||
identical return statements and replace duplicates with a jump to
|
||
the corresponding label. */
|
||
struct return_statements_t
|
||
{
|
||
tree label;
|
||
gimple stmt;
|
||
};
|
||
typedef struct return_statements_t return_statements_t;
|
||
|
||
|
||
struct lower_data
|
||
{
|
||
/* Block the current statement belongs to. */
|
||
tree block;
|
||
|
||
/* A vector of label and return statements to be moved to the end
|
||
of the function. */
|
||
vec<return_statements_t> return_statements;
|
||
|
||
/* True if the current statement cannot fall through. */
|
||
bool cannot_fallthru;
|
||
|
||
/* True if the function calls __builtin_setjmp. */
|
||
bool calls_builtin_setjmp;
|
||
};
|
||
|
||
static void lower_stmt (gimple_stmt_iterator *, struct lower_data *);
|
||
static void lower_gimple_bind (gimple_stmt_iterator *, struct lower_data *);
|
||
static void lower_try_catch (gimple_stmt_iterator *, struct lower_data *);
|
||
static void lower_gimple_return (gimple_stmt_iterator *, struct lower_data *);
|
||
static void lower_builtin_setjmp (gimple_stmt_iterator *);
|
||
|
||
|
||
/* Lower the body of current_function_decl from High GIMPLE into Low
|
||
GIMPLE. */
|
||
|
||
static unsigned int
|
||
lower_function_body (void)
|
||
{
|
||
struct lower_data data;
|
||
gimple_seq body = gimple_body (current_function_decl);
|
||
gimple_seq lowered_body;
|
||
gimple_stmt_iterator i;
|
||
gimple bind;
|
||
tree t;
|
||
gimple x;
|
||
|
||
/* The gimplifier should've left a body of exactly one statement,
|
||
namely a GIMPLE_BIND. */
|
||
gcc_assert (gimple_seq_first (body) == gimple_seq_last (body)
|
||
&& gimple_code (gimple_seq_first_stmt (body)) == GIMPLE_BIND);
|
||
|
||
memset (&data, 0, sizeof (data));
|
||
data.block = DECL_INITIAL (current_function_decl);
|
||
BLOCK_SUBBLOCKS (data.block) = NULL_TREE;
|
||
BLOCK_CHAIN (data.block) = NULL_TREE;
|
||
TREE_ASM_WRITTEN (data.block) = 1;
|
||
data.return_statements.create (8);
|
||
|
||
bind = gimple_seq_first_stmt (body);
|
||
lowered_body = NULL;
|
||
gimple_seq_add_stmt (&lowered_body, bind);
|
||
i = gsi_start (lowered_body);
|
||
lower_gimple_bind (&i, &data);
|
||
|
||
i = gsi_last (lowered_body);
|
||
|
||
/* If the function falls off the end, we need a null return statement.
|
||
If we've already got one in the return_statements vector, we don't
|
||
need to do anything special. Otherwise build one by hand. */
|
||
if (gimple_seq_may_fallthru (lowered_body)
|
||
&& (data.return_statements.is_empty ()
|
||
|| gimple_return_retval (data.return_statements.last().stmt) != NULL))
|
||
{
|
||
x = gimple_build_return (NULL);
|
||
gimple_set_location (x, cfun->function_end_locus);
|
||
gimple_set_block (x, DECL_INITIAL (current_function_decl));
|
||
gsi_insert_after (&i, x, GSI_CONTINUE_LINKING);
|
||
}
|
||
|
||
/* If we lowered any return statements, emit the representative
|
||
at the end of the function. */
|
||
while (!data.return_statements.is_empty ())
|
||
{
|
||
return_statements_t t = data.return_statements.pop ();
|
||
x = gimple_build_label (t.label);
|
||
gsi_insert_after (&i, x, GSI_CONTINUE_LINKING);
|
||
gsi_insert_after (&i, t.stmt, GSI_CONTINUE_LINKING);
|
||
}
|
||
|
||
/* If the function calls __builtin_setjmp, we need to emit the computed
|
||
goto that will serve as the unique dispatcher for all the receivers. */
|
||
if (data.calls_builtin_setjmp)
|
||
{
|
||
tree disp_label, disp_var, arg;
|
||
|
||
/* Build 'DISP_LABEL:' and insert. */
|
||
disp_label = create_artificial_label (cfun->function_end_locus);
|
||
/* This mark will create forward edges from every call site. */
|
||
DECL_NONLOCAL (disp_label) = 1;
|
||
cfun->has_nonlocal_label = 1;
|
||
x = gimple_build_label (disp_label);
|
||
gsi_insert_after (&i, x, GSI_CONTINUE_LINKING);
|
||
|
||
/* Build 'DISP_VAR = __builtin_setjmp_dispatcher (DISP_LABEL);'
|
||
and insert. */
|
||
disp_var = create_tmp_var (ptr_type_node, "setjmpvar");
|
||
arg = build_addr (disp_label, current_function_decl);
|
||
t = builtin_decl_implicit (BUILT_IN_SETJMP_DISPATCHER);
|
||
x = gimple_build_call (t, 1, arg);
|
||
gimple_call_set_lhs (x, disp_var);
|
||
|
||
/* Build 'goto DISP_VAR;' and insert. */
|
||
gsi_insert_after (&i, x, GSI_CONTINUE_LINKING);
|
||
x = gimple_build_goto (disp_var);
|
||
gsi_insert_after (&i, x, GSI_CONTINUE_LINKING);
|
||
}
|
||
|
||
/* Once the old body has been lowered, replace it with the new
|
||
lowered sequence. */
|
||
gimple_set_body (current_function_decl, lowered_body);
|
||
|
||
gcc_assert (data.block == DECL_INITIAL (current_function_decl));
|
||
BLOCK_SUBBLOCKS (data.block)
|
||
= blocks_nreverse (BLOCK_SUBBLOCKS (data.block));
|
||
|
||
clear_block_marks (data.block);
|
||
data.return_statements.release ();
|
||
return 0;
|
||
}
|
||
|
||
namespace {
|
||
|
||
const pass_data pass_data_lower_cf =
|
||
{
|
||
GIMPLE_PASS, /* type */
|
||
"lower", /* name */
|
||
OPTGROUP_NONE, /* optinfo_flags */
|
||
false, /* has_gate */
|
||
true, /* has_execute */
|
||
TV_NONE, /* tv_id */
|
||
PROP_gimple_any, /* properties_required */
|
||
PROP_gimple_lcf, /* properties_provided */
|
||
0, /* properties_destroyed */
|
||
0, /* todo_flags_start */
|
||
0, /* todo_flags_finish */
|
||
};
|
||
|
||
class pass_lower_cf : public gimple_opt_pass
|
||
{
|
||
public:
|
||
pass_lower_cf(gcc::context *ctxt)
|
||
: gimple_opt_pass(pass_data_lower_cf, ctxt)
|
||
{}
|
||
|
||
/* opt_pass methods: */
|
||
unsigned int execute () { return lower_function_body (); }
|
||
|
||
}; // class pass_lower_cf
|
||
|
||
} // anon namespace
|
||
|
||
gimple_opt_pass *
|
||
make_pass_lower_cf (gcc::context *ctxt)
|
||
{
|
||
return new pass_lower_cf (ctxt);
|
||
}
|
||
|
||
|
||
|
||
/* Verify if the type of the argument matches that of the function
|
||
declaration. If we cannot verify this or there is a mismatch,
|
||
return false. */
|
||
|
||
static bool
|
||
gimple_check_call_args (gimple stmt, tree fndecl, bool args_count_match)
|
||
{
|
||
tree parms, p;
|
||
unsigned int i, nargs;
|
||
|
||
/* Calls to internal functions always match their signature. */
|
||
if (gimple_call_internal_p (stmt))
|
||
return true;
|
||
|
||
nargs = gimple_call_num_args (stmt);
|
||
|
||
/* Get argument types for verification. */
|
||
if (fndecl)
|
||
parms = TYPE_ARG_TYPES (TREE_TYPE (fndecl));
|
||
else
|
||
parms = TYPE_ARG_TYPES (gimple_call_fntype (stmt));
|
||
|
||
/* Verify if the type of the argument matches that of the function
|
||
declaration. If we cannot verify this or there is a mismatch,
|
||
return false. */
|
||
if (fndecl && DECL_ARGUMENTS (fndecl))
|
||
{
|
||
for (i = 0, p = DECL_ARGUMENTS (fndecl);
|
||
i < nargs;
|
||
i++, p = DECL_CHAIN (p))
|
||
{
|
||
tree arg;
|
||
/* We cannot distinguish a varargs function from the case
|
||
of excess parameters, still deferring the inlining decision
|
||
to the callee is possible. */
|
||
if (!p)
|
||
break;
|
||
arg = gimple_call_arg (stmt, i);
|
||
if (p == error_mark_node
|
||
|| arg == error_mark_node
|
||
|| (!types_compatible_p (DECL_ARG_TYPE (p), TREE_TYPE (arg))
|
||
&& !fold_convertible_p (DECL_ARG_TYPE (p), arg)))
|
||
return false;
|
||
}
|
||
if (args_count_match && p)
|
||
return false;
|
||
}
|
||
else if (parms)
|
||
{
|
||
for (i = 0, p = parms; i < nargs; i++, p = TREE_CHAIN (p))
|
||
{
|
||
tree arg;
|
||
/* If this is a varargs function defer inlining decision
|
||
to callee. */
|
||
if (!p)
|
||
break;
|
||
arg = gimple_call_arg (stmt, i);
|
||
if (TREE_VALUE (p) == error_mark_node
|
||
|| arg == error_mark_node
|
||
|| TREE_CODE (TREE_VALUE (p)) == VOID_TYPE
|
||
|| (!types_compatible_p (TREE_VALUE (p), TREE_TYPE (arg))
|
||
&& !fold_convertible_p (TREE_VALUE (p), arg)))
|
||
return false;
|
||
}
|
||
}
|
||
else
|
||
{
|
||
if (nargs != 0)
|
||
return false;
|
||
}
|
||
return true;
|
||
}
|
||
|
||
/* Verify if the type of the argument and lhs of CALL_STMT matches
|
||
that of the function declaration CALLEE. If ARGS_COUNT_MATCH is
|
||
true, the arg count needs to be the same.
|
||
If we cannot verify this or there is a mismatch, return false. */
|
||
|
||
bool
|
||
gimple_check_call_matching_types (gimple call_stmt, tree callee,
|
||
bool args_count_match)
|
||
{
|
||
tree lhs;
|
||
|
||
if ((DECL_RESULT (callee)
|
||
&& !DECL_BY_REFERENCE (DECL_RESULT (callee))
|
||
&& (lhs = gimple_call_lhs (call_stmt)) != NULL_TREE
|
||
&& !useless_type_conversion_p (TREE_TYPE (DECL_RESULT (callee)),
|
||
TREE_TYPE (lhs))
|
||
&& !fold_convertible_p (TREE_TYPE (DECL_RESULT (callee)), lhs))
|
||
|| !gimple_check_call_args (call_stmt, callee, args_count_match))
|
||
return false;
|
||
return true;
|
||
}
|
||
|
||
/* Lower sequence SEQ. Unlike gimplification the statements are not relowered
|
||
when they are changed -- if this has to be done, the lowering routine must
|
||
do it explicitly. DATA is passed through the recursion. */
|
||
|
||
static void
|
||
lower_sequence (gimple_seq *seq, struct lower_data *data)
|
||
{
|
||
gimple_stmt_iterator gsi;
|
||
|
||
for (gsi = gsi_start (*seq); !gsi_end_p (gsi); )
|
||
lower_stmt (&gsi, data);
|
||
}
|
||
|
||
|
||
/* Lower the OpenMP directive statement pointed by GSI. DATA is
|
||
passed through the recursion. */
|
||
|
||
static void
|
||
lower_omp_directive (gimple_stmt_iterator *gsi, struct lower_data *data)
|
||
{
|
||
gimple stmt;
|
||
|
||
stmt = gsi_stmt (*gsi);
|
||
|
||
lower_sequence (gimple_omp_body_ptr (stmt), data);
|
||
gsi_insert_seq_after (gsi, gimple_omp_body (stmt), GSI_CONTINUE_LINKING);
|
||
gimple_omp_set_body (stmt, NULL);
|
||
gsi_next (gsi);
|
||
}
|
||
|
||
|
||
/* Lower statement GSI. DATA is passed through the recursion. We try to
|
||
track the fallthruness of statements and get rid of unreachable return
|
||
statements in order to prevent the EH lowering pass from adding useless
|
||
edges that can cause bogus warnings to be issued later; this guess need
|
||
not be 100% accurate, simply be conservative and reset cannot_fallthru
|
||
to false if we don't know. */
|
||
|
||
static void
|
||
lower_stmt (gimple_stmt_iterator *gsi, struct lower_data *data)
|
||
{
|
||
gimple stmt = gsi_stmt (*gsi);
|
||
|
||
gimple_set_block (stmt, data->block);
|
||
|
||
switch (gimple_code (stmt))
|
||
{
|
||
case GIMPLE_BIND:
|
||
lower_gimple_bind (gsi, data);
|
||
/* Propagate fallthruness. */
|
||
return;
|
||
|
||
case GIMPLE_COND:
|
||
case GIMPLE_GOTO:
|
||
case GIMPLE_SWITCH:
|
||
data->cannot_fallthru = true;
|
||
gsi_next (gsi);
|
||
return;
|
||
|
||
case GIMPLE_RETURN:
|
||
if (data->cannot_fallthru)
|
||
{
|
||
gsi_remove (gsi, false);
|
||
/* Propagate fallthruness. */
|
||
}
|
||
else
|
||
{
|
||
lower_gimple_return (gsi, data);
|
||
data->cannot_fallthru = true;
|
||
}
|
||
return;
|
||
|
||
case GIMPLE_TRY:
|
||
if (gimple_try_kind (stmt) == GIMPLE_TRY_CATCH)
|
||
lower_try_catch (gsi, data);
|
||
else
|
||
{
|
||
/* It must be a GIMPLE_TRY_FINALLY. */
|
||
bool cannot_fallthru;
|
||
lower_sequence (gimple_try_eval_ptr (stmt), data);
|
||
cannot_fallthru = data->cannot_fallthru;
|
||
|
||
/* The finally clause is always executed after the try clause,
|
||
so if it does not fall through, then the try-finally will not
|
||
fall through. Otherwise, if the try clause does not fall
|
||
through, then when the finally clause falls through it will
|
||
resume execution wherever the try clause was going. So the
|
||
whole try-finally will only fall through if both the try
|
||
clause and the finally clause fall through. */
|
||
data->cannot_fallthru = false;
|
||
lower_sequence (gimple_try_cleanup_ptr (stmt), data);
|
||
data->cannot_fallthru |= cannot_fallthru;
|
||
gsi_next (gsi);
|
||
}
|
||
return;
|
||
|
||
case GIMPLE_EH_ELSE:
|
||
lower_sequence (gimple_eh_else_n_body_ptr (stmt), data);
|
||
lower_sequence (gimple_eh_else_e_body_ptr (stmt), data);
|
||
break;
|
||
|
||
case GIMPLE_NOP:
|
||
case GIMPLE_ASM:
|
||
case GIMPLE_ASSIGN:
|
||
case GIMPLE_PREDICT:
|
||
case GIMPLE_LABEL:
|
||
case GIMPLE_EH_MUST_NOT_THROW:
|
||
case GIMPLE_OMP_FOR:
|
||
case GIMPLE_OMP_SECTIONS:
|
||
case GIMPLE_OMP_SECTIONS_SWITCH:
|
||
case GIMPLE_OMP_SECTION:
|
||
case GIMPLE_OMP_SINGLE:
|
||
case GIMPLE_OMP_MASTER:
|
||
case GIMPLE_OMP_ORDERED:
|
||
case GIMPLE_OMP_CRITICAL:
|
||
case GIMPLE_OMP_RETURN:
|
||
case GIMPLE_OMP_ATOMIC_LOAD:
|
||
case GIMPLE_OMP_ATOMIC_STORE:
|
||
case GIMPLE_OMP_CONTINUE:
|
||
break;
|
||
|
||
case GIMPLE_CALL:
|
||
{
|
||
tree decl = gimple_call_fndecl (stmt);
|
||
unsigned i;
|
||
|
||
for (i = 0; i < gimple_call_num_args (stmt); i++)
|
||
{
|
||
tree arg = gimple_call_arg (stmt, i);
|
||
if (EXPR_P (arg))
|
||
TREE_SET_BLOCK (arg, data->block);
|
||
}
|
||
|
||
if (decl
|
||
&& DECL_BUILT_IN_CLASS (decl) == BUILT_IN_NORMAL
|
||
&& DECL_FUNCTION_CODE (decl) == BUILT_IN_SETJMP)
|
||
{
|
||
lower_builtin_setjmp (gsi);
|
||
data->cannot_fallthru = false;
|
||
data->calls_builtin_setjmp = true;
|
||
return;
|
||
}
|
||
|
||
if (decl && (flags_from_decl_or_type (decl) & ECF_NORETURN))
|
||
{
|
||
data->cannot_fallthru = true;
|
||
gsi_next (gsi);
|
||
return;
|
||
}
|
||
}
|
||
break;
|
||
|
||
case GIMPLE_OMP_PARALLEL:
|
||
case GIMPLE_OMP_TASK:
|
||
data->cannot_fallthru = false;
|
||
lower_omp_directive (gsi, data);
|
||
data->cannot_fallthru = false;
|
||
return;
|
||
|
||
case GIMPLE_TRANSACTION:
|
||
lower_sequence (gimple_transaction_body_ptr (stmt), data);
|
||
break;
|
||
|
||
default:
|
||
gcc_unreachable ();
|
||
}
|
||
|
||
data->cannot_fallthru = false;
|
||
gsi_next (gsi);
|
||
}
|
||
|
||
/* Lower a bind_expr TSI. DATA is passed through the recursion. */
|
||
|
||
static void
|
||
lower_gimple_bind (gimple_stmt_iterator *gsi, struct lower_data *data)
|
||
{
|
||
tree old_block = data->block;
|
||
gimple stmt = gsi_stmt (*gsi);
|
||
tree new_block = gimple_bind_block (stmt);
|
||
|
||
if (new_block)
|
||
{
|
||
if (new_block == old_block)
|
||
{
|
||
/* The outermost block of the original function may not be the
|
||
outermost statement chain of the gimplified function. So we
|
||
may see the outermost block just inside the function. */
|
||
gcc_assert (new_block == DECL_INITIAL (current_function_decl));
|
||
new_block = NULL;
|
||
}
|
||
else
|
||
{
|
||
/* We do not expect to handle duplicate blocks. */
|
||
gcc_assert (!TREE_ASM_WRITTEN (new_block));
|
||
TREE_ASM_WRITTEN (new_block) = 1;
|
||
|
||
/* Block tree may get clobbered by inlining. Normally this would
|
||
be fixed in rest_of_decl_compilation using block notes, but
|
||
since we are not going to emit them, it is up to us. */
|
||
BLOCK_CHAIN (new_block) = BLOCK_SUBBLOCKS (old_block);
|
||
BLOCK_SUBBLOCKS (old_block) = new_block;
|
||
BLOCK_SUBBLOCKS (new_block) = NULL_TREE;
|
||
BLOCK_SUPERCONTEXT (new_block) = old_block;
|
||
|
||
data->block = new_block;
|
||
}
|
||
}
|
||
|
||
record_vars (gimple_bind_vars (stmt));
|
||
lower_sequence (gimple_bind_body_ptr (stmt), data);
|
||
|
||
if (new_block)
|
||
{
|
||
gcc_assert (data->block == new_block);
|
||
|
||
BLOCK_SUBBLOCKS (new_block)
|
||
= blocks_nreverse (BLOCK_SUBBLOCKS (new_block));
|
||
data->block = old_block;
|
||
}
|
||
|
||
/* The GIMPLE_BIND no longer carries any useful information -- kill it. */
|
||
gsi_insert_seq_before (gsi, gimple_bind_body (stmt), GSI_SAME_STMT);
|
||
gsi_remove (gsi, false);
|
||
}
|
||
|
||
/* Same as above, but for a GIMPLE_TRY_CATCH. */
|
||
|
||
static void
|
||
lower_try_catch (gimple_stmt_iterator *gsi, struct lower_data *data)
|
||
{
|
||
bool cannot_fallthru;
|
||
gimple stmt = gsi_stmt (*gsi);
|
||
gimple_stmt_iterator i;
|
||
|
||
/* We don't handle GIMPLE_TRY_FINALLY. */
|
||
gcc_assert (gimple_try_kind (stmt) == GIMPLE_TRY_CATCH);
|
||
|
||
lower_sequence (gimple_try_eval_ptr (stmt), data);
|
||
cannot_fallthru = data->cannot_fallthru;
|
||
|
||
i = gsi_start (*gimple_try_cleanup_ptr (stmt));
|
||
switch (gimple_code (gsi_stmt (i)))
|
||
{
|
||
case GIMPLE_CATCH:
|
||
/* We expect to see a sequence of GIMPLE_CATCH stmts, each with a
|
||
catch expression and a body. The whole try/catch may fall
|
||
through iff any of the catch bodies falls through. */
|
||
for (; !gsi_end_p (i); gsi_next (&i))
|
||
{
|
||
data->cannot_fallthru = false;
|
||
lower_sequence (gimple_catch_handler_ptr (gsi_stmt (i)), data);
|
||
if (!data->cannot_fallthru)
|
||
cannot_fallthru = false;
|
||
}
|
||
break;
|
||
|
||
case GIMPLE_EH_FILTER:
|
||
/* The exception filter expression only matters if there is an
|
||
exception. If the exception does not match EH_FILTER_TYPES,
|
||
we will execute EH_FILTER_FAILURE, and we will fall through
|
||
if that falls through. If the exception does match
|
||
EH_FILTER_TYPES, the stack unwinder will continue up the
|
||
stack, so we will not fall through. We don't know whether we
|
||
will throw an exception which matches EH_FILTER_TYPES or not,
|
||
so we just ignore EH_FILTER_TYPES and assume that we might
|
||
throw an exception which doesn't match. */
|
||
data->cannot_fallthru = false;
|
||
lower_sequence (gimple_eh_filter_failure_ptr (gsi_stmt (i)), data);
|
||
if (!data->cannot_fallthru)
|
||
cannot_fallthru = false;
|
||
break;
|
||
|
||
default:
|
||
/* This case represents statements to be executed when an
|
||
exception occurs. Those statements are implicitly followed
|
||
by a GIMPLE_RESX to resume execution after the exception. So
|
||
in this case the try/catch never falls through. */
|
||
data->cannot_fallthru = false;
|
||
lower_sequence (gimple_try_cleanup_ptr (stmt), data);
|
||
break;
|
||
}
|
||
|
||
data->cannot_fallthru = cannot_fallthru;
|
||
gsi_next (gsi);
|
||
}
|
||
|
||
/* Try to determine whether a TRY_CATCH expression can fall through.
|
||
This is a subroutine of block_may_fallthru. */
|
||
|
||
static bool
|
||
try_catch_may_fallthru (const_tree stmt)
|
||
{
|
||
tree_stmt_iterator i;
|
||
|
||
/* If the TRY block can fall through, the whole TRY_CATCH can
|
||
fall through. */
|
||
if (block_may_fallthru (TREE_OPERAND (stmt, 0)))
|
||
return true;
|
||
|
||
i = tsi_start (TREE_OPERAND (stmt, 1));
|
||
switch (TREE_CODE (tsi_stmt (i)))
|
||
{
|
||
case CATCH_EXPR:
|
||
/* We expect to see a sequence of CATCH_EXPR trees, each with a
|
||
catch expression and a body. The whole TRY_CATCH may fall
|
||
through iff any of the catch bodies falls through. */
|
||
for (; !tsi_end_p (i); tsi_next (&i))
|
||
{
|
||
if (block_may_fallthru (CATCH_BODY (tsi_stmt (i))))
|
||
return true;
|
||
}
|
||
return false;
|
||
|
||
case EH_FILTER_EXPR:
|
||
/* The exception filter expression only matters if there is an
|
||
exception. If the exception does not match EH_FILTER_TYPES,
|
||
we will execute EH_FILTER_FAILURE, and we will fall through
|
||
if that falls through. If the exception does match
|
||
EH_FILTER_TYPES, the stack unwinder will continue up the
|
||
stack, so we will not fall through. We don't know whether we
|
||
will throw an exception which matches EH_FILTER_TYPES or not,
|
||
so we just ignore EH_FILTER_TYPES and assume that we might
|
||
throw an exception which doesn't match. */
|
||
return block_may_fallthru (EH_FILTER_FAILURE (tsi_stmt (i)));
|
||
|
||
default:
|
||
/* This case represents statements to be executed when an
|
||
exception occurs. Those statements are implicitly followed
|
||
by a RESX statement to resume execution after the exception.
|
||
So in this case the TRY_CATCH never falls through. */
|
||
return false;
|
||
}
|
||
}
|
||
|
||
|
||
/* Same as above, but for a GIMPLE_TRY_CATCH. */
|
||
|
||
static bool
|
||
gimple_try_catch_may_fallthru (gimple stmt)
|
||
{
|
||
gimple_stmt_iterator i;
|
||
|
||
/* We don't handle GIMPLE_TRY_FINALLY. */
|
||
gcc_assert (gimple_try_kind (stmt) == GIMPLE_TRY_CATCH);
|
||
|
||
/* If the TRY block can fall through, the whole TRY_CATCH can
|
||
fall through. */
|
||
if (gimple_seq_may_fallthru (gimple_try_eval (stmt)))
|
||
return true;
|
||
|
||
i = gsi_start (*gimple_try_cleanup_ptr (stmt));
|
||
switch (gimple_code (gsi_stmt (i)))
|
||
{
|
||
case GIMPLE_CATCH:
|
||
/* We expect to see a sequence of GIMPLE_CATCH stmts, each with a
|
||
catch expression and a body. The whole try/catch may fall
|
||
through iff any of the catch bodies falls through. */
|
||
for (; !gsi_end_p (i); gsi_next (&i))
|
||
{
|
||
if (gimple_seq_may_fallthru (gimple_catch_handler (gsi_stmt (i))))
|
||
return true;
|
||
}
|
||
return false;
|
||
|
||
case GIMPLE_EH_FILTER:
|
||
/* The exception filter expression only matters if there is an
|
||
exception. If the exception does not match EH_FILTER_TYPES,
|
||
we will execute EH_FILTER_FAILURE, and we will fall through
|
||
if that falls through. If the exception does match
|
||
EH_FILTER_TYPES, the stack unwinder will continue up the
|
||
stack, so we will not fall through. We don't know whether we
|
||
will throw an exception which matches EH_FILTER_TYPES or not,
|
||
so we just ignore EH_FILTER_TYPES and assume that we might
|
||
throw an exception which doesn't match. */
|
||
return gimple_seq_may_fallthru (gimple_eh_filter_failure (gsi_stmt (i)));
|
||
|
||
default:
|
||
/* This case represents statements to be executed when an
|
||
exception occurs. Those statements are implicitly followed
|
||
by a GIMPLE_RESX to resume execution after the exception. So
|
||
in this case the try/catch never falls through. */
|
||
return false;
|
||
}
|
||
}
|
||
|
||
|
||
/* Try to determine if we can fall out of the bottom of BLOCK. This guess
|
||
need not be 100% accurate; simply be conservative and return true if we
|
||
don't know. This is used only to avoid stupidly generating extra code.
|
||
If we're wrong, we'll just delete the extra code later. */
|
||
|
||
bool
|
||
block_may_fallthru (const_tree block)
|
||
{
|
||
/* This CONST_CAST is okay because expr_last returns its argument
|
||
unmodified and we assign it to a const_tree. */
|
||
const_tree stmt = expr_last (CONST_CAST_TREE(block));
|
||
|
||
switch (stmt ? TREE_CODE (stmt) : ERROR_MARK)
|
||
{
|
||
case GOTO_EXPR:
|
||
case RETURN_EXPR:
|
||
/* Easy cases. If the last statement of the block implies
|
||
control transfer, then we can't fall through. */
|
||
return false;
|
||
|
||
case SWITCH_EXPR:
|
||
/* If SWITCH_LABELS is set, this is lowered, and represents a
|
||
branch to a selected label and hence can not fall through.
|
||
Otherwise SWITCH_BODY is set, and the switch can fall
|
||
through. */
|
||
return SWITCH_LABELS (stmt) == NULL_TREE;
|
||
|
||
case COND_EXPR:
|
||
if (block_may_fallthru (COND_EXPR_THEN (stmt)))
|
||
return true;
|
||
return block_may_fallthru (COND_EXPR_ELSE (stmt));
|
||
|
||
case BIND_EXPR:
|
||
return block_may_fallthru (BIND_EXPR_BODY (stmt));
|
||
|
||
case TRY_CATCH_EXPR:
|
||
return try_catch_may_fallthru (stmt);
|
||
|
||
case TRY_FINALLY_EXPR:
|
||
/* The finally clause is always executed after the try clause,
|
||
so if it does not fall through, then the try-finally will not
|
||
fall through. Otherwise, if the try clause does not fall
|
||
through, then when the finally clause falls through it will
|
||
resume execution wherever the try clause was going. So the
|
||
whole try-finally will only fall through if both the try
|
||
clause and the finally clause fall through. */
|
||
return (block_may_fallthru (TREE_OPERAND (stmt, 0))
|
||
&& block_may_fallthru (TREE_OPERAND (stmt, 1)));
|
||
|
||
case MODIFY_EXPR:
|
||
if (TREE_CODE (TREE_OPERAND (stmt, 1)) == CALL_EXPR)
|
||
stmt = TREE_OPERAND (stmt, 1);
|
||
else
|
||
return true;
|
||
/* FALLTHRU */
|
||
|
||
case CALL_EXPR:
|
||
/* Functions that do not return do not fall through. */
|
||
return (call_expr_flags (stmt) & ECF_NORETURN) == 0;
|
||
|
||
case CLEANUP_POINT_EXPR:
|
||
return block_may_fallthru (TREE_OPERAND (stmt, 0));
|
||
|
||
case TARGET_EXPR:
|
||
return block_may_fallthru (TREE_OPERAND (stmt, 1));
|
||
|
||
case ERROR_MARK:
|
||
return true;
|
||
|
||
default:
|
||
return lang_hooks.block_may_fallthru (stmt);
|
||
}
|
||
}
|
||
|
||
|
||
/* Try to determine if we can continue executing the statement
|
||
immediately following STMT. This guess need not be 100% accurate;
|
||
simply be conservative and return true if we don't know. This is
|
||
used only to avoid stupidly generating extra code. If we're wrong,
|
||
we'll just delete the extra code later. */
|
||
|
||
bool
|
||
gimple_stmt_may_fallthru (gimple stmt)
|
||
{
|
||
if (!stmt)
|
||
return true;
|
||
|
||
switch (gimple_code (stmt))
|
||
{
|
||
case GIMPLE_GOTO:
|
||
case GIMPLE_RETURN:
|
||
case GIMPLE_RESX:
|
||
/* Easy cases. If the last statement of the seq implies
|
||
control transfer, then we can't fall through. */
|
||
return false;
|
||
|
||
case GIMPLE_SWITCH:
|
||
/* Switch has already been lowered and represents a branch
|
||
to a selected label and hence can't fall through. */
|
||
return false;
|
||
|
||
case GIMPLE_COND:
|
||
/* GIMPLE_COND's are already lowered into a two-way branch. They
|
||
can't fall through. */
|
||
return false;
|
||
|
||
case GIMPLE_BIND:
|
||
return gimple_seq_may_fallthru (gimple_bind_body (stmt));
|
||
|
||
case GIMPLE_TRY:
|
||
if (gimple_try_kind (stmt) == GIMPLE_TRY_CATCH)
|
||
return gimple_try_catch_may_fallthru (stmt);
|
||
|
||
/* It must be a GIMPLE_TRY_FINALLY. */
|
||
|
||
/* The finally clause is always executed after the try clause,
|
||
so if it does not fall through, then the try-finally will not
|
||
fall through. Otherwise, if the try clause does not fall
|
||
through, then when the finally clause falls through it will
|
||
resume execution wherever the try clause was going. So the
|
||
whole try-finally will only fall through if both the try
|
||
clause and the finally clause fall through. */
|
||
return (gimple_seq_may_fallthru (gimple_try_eval (stmt))
|
||
&& gimple_seq_may_fallthru (gimple_try_cleanup (stmt)));
|
||
|
||
case GIMPLE_EH_ELSE:
|
||
return (gimple_seq_may_fallthru (gimple_eh_else_n_body (stmt))
|
||
|| gimple_seq_may_fallthru (gimple_eh_else_e_body (stmt)));
|
||
|
||
case GIMPLE_CALL:
|
||
/* Functions that do not return do not fall through. */
|
||
return (gimple_call_flags (stmt) & ECF_NORETURN) == 0;
|
||
|
||
default:
|
||
return true;
|
||
}
|
||
}
|
||
|
||
|
||
/* Same as gimple_stmt_may_fallthru, but for the gimple sequence SEQ. */
|
||
|
||
bool
|
||
gimple_seq_may_fallthru (gimple_seq seq)
|
||
{
|
||
return gimple_stmt_may_fallthru (gimple_seq_last_stmt (seq));
|
||
}
|
||
|
||
|
||
/* Lower a GIMPLE_RETURN GSI. DATA is passed through the recursion. */
|
||
|
||
static void
|
||
lower_gimple_return (gimple_stmt_iterator *gsi, struct lower_data *data)
|
||
{
|
||
gimple stmt = gsi_stmt (*gsi);
|
||
gimple t;
|
||
int i;
|
||
return_statements_t tmp_rs;
|
||
|
||
/* Match this up with an existing return statement that's been created. */
|
||
for (i = data->return_statements.length () - 1;
|
||
i >= 0; i--)
|
||
{
|
||
tmp_rs = data->return_statements[i];
|
||
|
||
if (gimple_return_retval (stmt) == gimple_return_retval (tmp_rs.stmt))
|
||
{
|
||
/* Remove the line number from the representative return statement.
|
||
It now fills in for many such returns. Failure to remove this
|
||
will result in incorrect results for coverage analysis. */
|
||
gimple_set_location (tmp_rs.stmt, UNKNOWN_LOCATION);
|
||
|
||
goto found;
|
||
}
|
||
}
|
||
|
||
/* Not found. Create a new label and record the return statement. */
|
||
tmp_rs.label = create_artificial_label (cfun->function_end_locus);
|
||
tmp_rs.stmt = stmt;
|
||
data->return_statements.safe_push (tmp_rs);
|
||
|
||
/* Generate a goto statement and remove the return statement. */
|
||
found:
|
||
/* When not optimizing, make sure user returns are preserved. */
|
||
if (!optimize && gimple_has_location (stmt))
|
||
DECL_ARTIFICIAL (tmp_rs.label) = 0;
|
||
t = gimple_build_goto (tmp_rs.label);
|
||
gimple_set_location (t, gimple_location (stmt));
|
||
gimple_set_block (t, gimple_block (stmt));
|
||
gsi_insert_before (gsi, t, GSI_SAME_STMT);
|
||
gsi_remove (gsi, false);
|
||
}
|
||
|
||
/* Lower a __builtin_setjmp GSI.
|
||
|
||
__builtin_setjmp is passed a pointer to an array of five words (not
|
||
all will be used on all machines). It operates similarly to the C
|
||
library function of the same name, but is more efficient.
|
||
|
||
It is lowered into 3 other builtins, namely __builtin_setjmp_setup,
|
||
__builtin_setjmp_dispatcher and __builtin_setjmp_receiver, but with
|
||
__builtin_setjmp_dispatcher shared among all the instances; that's
|
||
why it is only emitted at the end by lower_function_body.
|
||
|
||
After full lowering, the body of the function should look like:
|
||
|
||
{
|
||
void * setjmpvar.0;
|
||
int D.1844;
|
||
int D.2844;
|
||
|
||
[...]
|
||
|
||
__builtin_setjmp_setup (&buf, &<D1847>);
|
||
D.1844 = 0;
|
||
goto <D1846>;
|
||
<D1847>:;
|
||
__builtin_setjmp_receiver (&<D1847>);
|
||
D.1844 = 1;
|
||
<D1846>:;
|
||
if (D.1844 == 0) goto <D1848>; else goto <D1849>;
|
||
|
||
[...]
|
||
|
||
__builtin_setjmp_setup (&buf, &<D2847>);
|
||
D.2844 = 0;
|
||
goto <D2846>;
|
||
<D2847>:;
|
||
__builtin_setjmp_receiver (&<D2847>);
|
||
D.2844 = 1;
|
||
<D2846>:;
|
||
if (D.2844 == 0) goto <D2848>; else goto <D2849>;
|
||
|
||
[...]
|
||
|
||
<D3850>:;
|
||
return;
|
||
<D3853>: [non-local];
|
||
setjmpvar.0 = __builtin_setjmp_dispatcher (&<D3853>);
|
||
goto setjmpvar.0;
|
||
}
|
||
|
||
The dispatcher block will be both the unique destination of all the
|
||
abnormal call edges and the unique source of all the abnormal edges
|
||
to the receivers, thus keeping the complexity explosion localized. */
|
||
|
||
static void
|
||
lower_builtin_setjmp (gimple_stmt_iterator *gsi)
|
||
{
|
||
gimple stmt = gsi_stmt (*gsi);
|
||
location_t loc = gimple_location (stmt);
|
||
tree cont_label = create_artificial_label (loc);
|
||
tree next_label = create_artificial_label (loc);
|
||
tree dest, t, arg;
|
||
gimple g;
|
||
|
||
/* NEXT_LABEL is the label __builtin_longjmp will jump to. Its address is
|
||
passed to both __builtin_setjmp_setup and __builtin_setjmp_receiver. */
|
||
FORCED_LABEL (next_label) = 1;
|
||
|
||
dest = gimple_call_lhs (stmt);
|
||
|
||
/* Build '__builtin_setjmp_setup (BUF, NEXT_LABEL)' and insert. */
|
||
arg = build_addr (next_label, current_function_decl);
|
||
t = builtin_decl_implicit (BUILT_IN_SETJMP_SETUP);
|
||
g = gimple_build_call (t, 2, gimple_call_arg (stmt, 0), arg);
|
||
gimple_set_location (g, loc);
|
||
gimple_set_block (g, gimple_block (stmt));
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
|
||
/* Build 'DEST = 0' and insert. */
|
||
if (dest)
|
||
{
|
||
g = gimple_build_assign (dest, build_zero_cst (TREE_TYPE (dest)));
|
||
gimple_set_location (g, loc);
|
||
gimple_set_block (g, gimple_block (stmt));
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
}
|
||
|
||
/* Build 'goto CONT_LABEL' and insert. */
|
||
g = gimple_build_goto (cont_label);
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
|
||
/* Build 'NEXT_LABEL:' and insert. */
|
||
g = gimple_build_label (next_label);
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
|
||
/* Build '__builtin_setjmp_receiver (NEXT_LABEL)' and insert. */
|
||
arg = build_addr (next_label, current_function_decl);
|
||
t = builtin_decl_implicit (BUILT_IN_SETJMP_RECEIVER);
|
||
g = gimple_build_call (t, 1, arg);
|
||
gimple_set_location (g, loc);
|
||
gimple_set_block (g, gimple_block (stmt));
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
|
||
/* Build 'DEST = 1' and insert. */
|
||
if (dest)
|
||
{
|
||
g = gimple_build_assign (dest, fold_convert_loc (loc, TREE_TYPE (dest),
|
||
integer_one_node));
|
||
gimple_set_location (g, loc);
|
||
gimple_set_block (g, gimple_block (stmt));
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
}
|
||
|
||
/* Build 'CONT_LABEL:' and insert. */
|
||
g = gimple_build_label (cont_label);
|
||
gsi_insert_before (gsi, g, GSI_SAME_STMT);
|
||
|
||
/* Remove the call to __builtin_setjmp. */
|
||
gsi_remove (gsi, false);
|
||
}
|
||
|
||
|
||
/* Record the variables in VARS into function FN. */
|
||
|
||
void
|
||
record_vars_into (tree vars, tree fn)
|
||
{
|
||
bool change_cfun = fn != current_function_decl;
|
||
|
||
if (change_cfun)
|
||
push_cfun (DECL_STRUCT_FUNCTION (fn));
|
||
|
||
for (; vars; vars = DECL_CHAIN (vars))
|
||
{
|
||
tree var = vars;
|
||
|
||
/* BIND_EXPRs contains also function/type/constant declarations
|
||
we don't need to care about. */
|
||
if (TREE_CODE (var) != VAR_DECL)
|
||
continue;
|
||
|
||
/* Nothing to do in this case. */
|
||
if (DECL_EXTERNAL (var))
|
||
continue;
|
||
|
||
/* Record the variable. */
|
||
add_local_decl (cfun, var);
|
||
}
|
||
|
||
if (change_cfun)
|
||
pop_cfun ();
|
||
}
|
||
|
||
|
||
/* Record the variables in VARS into current_function_decl. */
|
||
|
||
void
|
||
record_vars (tree vars)
|
||
{
|
||
record_vars_into (vars, current_function_decl);
|
||
}
|