CbC/CbC_gcc: gcc/ipa-pure-const.c annotate

annotate gcc/ipa-pure-const.c @ 111:04ced10e8804

gcc 7

author	kono
date	Fri, 27 Oct 2017 22:46:09 +0900
parents	f6334be47118
children	84e7813d76e9

rev	line source
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1 /* Callgraph based analysis of static variables.
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	2 Copyright (C) 2004-2017 Free Software Foundation, Inc.
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	3 Contributed by Kenneth Zadeck <zadeck@naturalbridge.com>
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	4
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	5 This file is part of GCC.
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	6
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	7 GCC is free software; you can redistribute it and/or modify it under
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	8 the terms of the GNU General Public License as published by the Free
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	9 Software Foundation; either version 3, or (at your option) any later
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	10 version.
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	11
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	15 for more details.
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	16
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	17 You should have received a copy of the GNU General Public License
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	18 along with GCC; see the file COPYING3. If not see
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	19 <http://www.gnu.org/licenses/>. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	20
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	21 /* This file marks functions as being either const (TREE_READONLY) or
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	22 pure (DECL_PURE_P). It can also set a variant of these that
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	23 are allowed to loop indefinitely (DECL_LOOPING_CONST_PURE_P).
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	24
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	25 This must be run after inlining decisions have been made since
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	26 otherwise, the local sets will not contain information that is
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	27 consistent with post inlined state. The global sets are not prone
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	28 to this problem since they are by definition transitive. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	29
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	30 /* The code in this module is called by the ipa pass manager. It
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	31 should be one of the later passes since it's information is used by
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	32 the rest of the compilation. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	33
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	34 #include "config.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	35 #include "system.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	36 #include "coretypes.h"
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	37 #include "backend.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	38 #include "target.h"
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	39 #include "tree.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	40 #include "gimple.h"
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	41 #include "tree-pass.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	42 #include "tree-streamer.h"
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	43 #include "cgraph.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	44 #include "diagnostic.h"
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	45 #include "calls.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	46 #include "cfganal.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	47 #include "tree-eh.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	48 #include "gimple-iterator.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	49 #include "gimple-walk.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	50 #include "tree-cfg.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	51 #include "tree-ssa-loop-niter.h"
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	52 #include "langhooks.h"
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	53 #include "ipa-utils.h"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	54 #include "gimple-pretty-print.h"
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	55 #include "cfgloop.h"
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	56 #include "tree-scalar-evolution.h"
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	57 #include "intl.h"
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	58 #include "opts.h"
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	59
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	60 /* Lattice values for const and pure functions. Everything starts out
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	61 being const, then may drop to pure and then neither depending on
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	62 what is found. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	63 enum pure_const_state_e
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	64 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	65 IPA_CONST,
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	66 IPA_PURE,
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	67 IPA_NEITHER
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	68 };
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	69
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	70 const char *pure_const_names[3] = {"const", "pure", "neither"};
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	71
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	72 /* Holder for the const_state. There is one of these per function
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	73 decl. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	74 struct funct_state_d
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	75 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	76 /* See above. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	77 enum pure_const_state_e pure_const_state;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	78 /* What user set here; we can be always sure about this. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	79 enum pure_const_state_e state_previously_known;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	80 bool looping_previously_known;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	81
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	82 /* True if the function could possibly infinite loop. There are a
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	83 lot of ways that this could be determined. We are pretty
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	84 conservative here. While it is possible to cse pure and const
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	85 calls, it is not legal to have dce get rid of the call if there
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	86 is a possibility that the call could infinite loop since this is
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	87 a behavioral change. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	88 bool looping;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	89
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	90 bool can_throw;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	91
04ced10e8804 gcc 7 kono parents: 67 diff changeset	92 /* If function can call free, munmap or otherwise make previously
04ced10e8804 gcc 7 kono parents: 67 diff changeset	93 non-trapping memory accesses trapping. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	94 bool can_free;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	95 };
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	96
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	97 /* State used when we know nothing about function. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	98 static struct funct_state_d varying_state
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	99 = { IPA_NEITHER, IPA_NEITHER, true, true, true, true };
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	100
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	101
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	102 typedef struct funct_state_d * funct_state;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	103
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	104 /* The storage of the funct_state is abstracted because there is the
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	105 possibility that it may be desirable to move this to the cgraph
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	106 local info. */
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	107
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	108 /* Array, indexed by cgraph node uid, of function states. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	109
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	110 static vec<funct_state> funct_state_vec;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	111
04ced10e8804 gcc 7 kono parents: 67 diff changeset	112 static bool gate_pure_const (void);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	113
04ced10e8804 gcc 7 kono parents: 67 diff changeset	114 namespace {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	115
04ced10e8804 gcc 7 kono parents: 67 diff changeset	116 const pass_data pass_data_ipa_pure_const =
04ced10e8804 gcc 7 kono parents: 67 diff changeset	117 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	118 IPA_PASS, /* type */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	119 "pure-const", /* name */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	120 OPTGROUP_NONE, /* optinfo_flags */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	121 TV_IPA_PURE_CONST, /* tv_id */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	122 0, /* properties_required */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	123 0, /* properties_provided */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	124 0, /* properties_destroyed */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	125 0, /* todo_flags_start */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	126 0, /* todo_flags_finish */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	127 };
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	128
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	129 class pass_ipa_pure_const : public ipa_opt_pass_d
04ced10e8804 gcc 7 kono parents: 67 diff changeset	130 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	131 public:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	132 pass_ipa_pure_const(gcc::context *ctxt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	133
04ced10e8804 gcc 7 kono parents: 67 diff changeset	134 /* opt_pass methods: */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	135 bool gate (function *) { return gate_pure_const (); }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	136 unsigned int execute (function *fun);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	137
04ced10e8804 gcc 7 kono parents: 67 diff changeset	138 void register_hooks (void);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	139
04ced10e8804 gcc 7 kono parents: 67 diff changeset	140 private:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	141 bool init_p;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	142
04ced10e8804 gcc 7 kono parents: 67 diff changeset	143 /* Holders of ipa cgraph hooks: */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	144 struct cgraph_node_hook_list *function_insertion_hook_holder;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	145 struct cgraph_2node_hook_list *node_duplication_hook_holder;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	146 struct cgraph_node_hook_list *node_removal_hook_holder;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	147
04ced10e8804 gcc 7 kono parents: 67 diff changeset	148 }; // class pass_ipa_pure_const
04ced10e8804 gcc 7 kono parents: 67 diff changeset	149
04ced10e8804 gcc 7 kono parents: 67 diff changeset	150 } // anon namespace
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	151
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	152 /* Try to guess if function body will always be visible to compiler
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	153 when compiling the call and whether compiler will be able
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	154 to propagate the information by itself. */
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	155
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	156 static bool
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	157 function_always_visible_to_compiler_p (tree decl)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	158 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	159 return (!TREE_PUBLIC (decl) \|\| DECL_DECLARED_INLINE_P (decl)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	160 \|\| DECL_COMDAT (decl));
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	161 }
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	162
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	163 /* Emit suggestion about attribute ATTRIB_NAME for DECL. KNOWN_FINITE
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	164 is true if the function is known to be finite. The diagnostic is
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	165 controlled by OPTION. WARNED_ABOUT is a hash_set<tree> unique for
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	166 OPTION, this function may initialize it and it is always returned
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	167 by the function. */
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	168
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	169 static hash_set<tree> *
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	170 suggest_attribute (int option, tree decl, bool known_finite,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	171 hash_set<tree> *warned_about,
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	172 const char * attrib_name)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	173 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	174 if (!option_enabled (option, &global_options))
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	175 return warned_about;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	176 if (TREE_THIS_VOLATILE (decl)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	177 \|\| (known_finite && function_always_visible_to_compiler_p (decl)))
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	178 return warned_about;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	179
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	180 if (!warned_about)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	181 warned_about = new hash_set<tree>;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	182 if (warned_about->contains (decl))
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	183 return warned_about;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	184 warned_about->add (decl);
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	185 warning_at (DECL_SOURCE_LOCATION (decl),
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	186 option,
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	187 known_finite
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	188 ? G_("function might be candidate for attribute %qs")
04ced10e8804 gcc 7 kono parents: 67 diff changeset	189 : G_("function might be candidate for attribute %qs"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	190 " if it is known to return normally"), attrib_name);
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	191 return warned_about;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	192 }
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	193
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	194 /* Emit suggestion about __attribute_((pure)) for DECL. KNOWN_FINITE
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	195 is true if the function is known to be finite. */
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	196
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	197 static void
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	198 warn_function_pure (tree decl, bool known_finite)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	199 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	200 static hash_set<tree> *warned_about;
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	201
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	202 warned_about
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	203 = suggest_attribute (OPT_Wsuggest_attribute_pure, decl,
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	204 known_finite, warned_about, "pure");
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	205 }
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	206
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	207 /* Emit suggestion about __attribute_((const)) for DECL. KNOWN_FINITE
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	208 is true if the function is known to be finite. */
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	209
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	210 static void
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	211 warn_function_const (tree decl, bool known_finite)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	212 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	213 static hash_set<tree> *warned_about;
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	214 warned_about
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	215 = suggest_attribute (OPT_Wsuggest_attribute_const, decl,
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	216 known_finite, warned_about, "const");
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	217 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	218
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	219 static void
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	220 warn_function_noreturn (tree decl)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	221 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	222 tree original_decl = decl;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	223
04ced10e8804 gcc 7 kono parents: 67 diff changeset	224 cgraph_node *node = cgraph_node::get (decl);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	225 if (node->instrumentation_clone)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	226 decl = node->instrumented_version->decl;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	227
04ced10e8804 gcc 7 kono parents: 67 diff changeset	228 static hash_set<tree> *warned_about;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	229 if (!lang_hooks.missing_noreturn_ok_p (decl)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	230 && targetm.warn_func_return (decl))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	231 warned_about
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	232 = suggest_attribute (OPT_Wsuggest_attribute_noreturn, original_decl,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	233 true, warned_about, "noreturn");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	234 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	235
04ced10e8804 gcc 7 kono parents: 67 diff changeset	236 void
04ced10e8804 gcc 7 kono parents: 67 diff changeset	237 warn_function_cold (tree decl)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	238 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	239 tree original_decl = decl;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	240
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	241 cgraph_node *node = cgraph_node::get (decl);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	242 if (node->instrumentation_clone)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	243 decl = node->instrumented_version->decl;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	244
04ced10e8804 gcc 7 kono parents: 67 diff changeset	245 static hash_set<tree> *warned_about;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	246 warned_about
04ced10e8804 gcc 7 kono parents: 67 diff changeset	247 = suggest_attribute (OPT_Wsuggest_attribute_cold, original_decl,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	248 true, warned_about, "cold");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	249 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	250
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	251 /* Return true if we have a function state for NODE. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	252
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	253 static inline bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	254 has_function_state (struct cgraph_node *node)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	255 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	256 if (!funct_state_vec.exists ()
04ced10e8804 gcc 7 kono parents: 67 diff changeset	257 \|\| funct_state_vec.length () <= (unsigned int)node->uid)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	258 return false;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	259 return funct_state_vec[node->uid] != NULL;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	260 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	261
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	262 /* Return the function state from NODE. */
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	263
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	264 static inline funct_state
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	265 get_function_state (struct cgraph_node *node)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	266 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	267 if (!funct_state_vec.exists ()
04ced10e8804 gcc 7 kono parents: 67 diff changeset	268 \|\| funct_state_vec.length () <= (unsigned int)node->uid
04ced10e8804 gcc 7 kono parents: 67 diff changeset	269 \|\| !funct_state_vec[node->uid])
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	270 /* We might want to put correct previously_known state into varying. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	271 return &varying_state;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	272 return funct_state_vec[node->uid];
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	273 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	274
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	275 /* Set the function state S for NODE. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	276
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	277 static inline void
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	278 set_function_state (struct cgraph_node *node, funct_state s)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	279 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	280 if (!funct_state_vec.exists ()
04ced10e8804 gcc 7 kono parents: 67 diff changeset	281 \|\| funct_state_vec.length () <= (unsigned int)node->uid)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	282 funct_state_vec.safe_grow_cleared (node->uid + 1);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	283
04ced10e8804 gcc 7 kono parents: 67 diff changeset	284 /* If funct_state_vec already contains a funct_state, we have to release
04ced10e8804 gcc 7 kono parents: 67 diff changeset	285 it before it's going to be ovewritten. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	286 if (funct_state_vec[node->uid] != NULL
04ced10e8804 gcc 7 kono parents: 67 diff changeset	287 && funct_state_vec[node->uid] != &varying_state)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	288 free (funct_state_vec[node->uid]);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	289
04ced10e8804 gcc 7 kono parents: 67 diff changeset	290 funct_state_vec[node->uid] = s;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	291 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	292
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	293 /* Check to see if the use (or definition when CHECKING_WRITE is true)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	294 variable T is legal in a function that is either pure or const. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	295
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	296 static inline void
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	297 check_decl (funct_state local,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	298 tree t, bool checking_write, bool ipa)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	299 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	300 /* Do not want to do anything with volatile except mark any
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	301 function that uses one to be not const or pure. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	302 if (TREE_THIS_VOLATILE (t))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	303 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	304 local->pure_const_state = IPA_NEITHER;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	305 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	306 fprintf (dump_file, " Volatile operand is not const/pure");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	307 return;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	308 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	309
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	310 /* Do not care about a local automatic that is not static. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	311 if (!TREE_STATIC (t) && !DECL_EXTERNAL (t))
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	312 return;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	313
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	314 /* If the variable has the "used" attribute, treat it as if it had a
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	315 been touched by the devil. */
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	316 if (DECL_PRESERVE_P (t))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	317 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	318 local->pure_const_state = IPA_NEITHER;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	319 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	320 fprintf (dump_file, " Used static/global variable is not const/pure\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	321 return;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	322 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	323
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	324 /* In IPA mode we are not interested in checking actual loads and stores;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	325 they will be processed at propagation time using ipa_ref. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	326 if (ipa)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	327 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	328
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	329 /* Since we have dealt with the locals and params cases above, if we
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	330 are CHECKING_WRITE, this cannot be a pure or constant
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	331 function. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	332 if (checking_write)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	333 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	334 local->pure_const_state = IPA_NEITHER;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	335 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	336 fprintf (dump_file, " static/global memory write is not const/pure\n");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	337 return;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	338 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	339
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	340 if (DECL_EXTERNAL (t) \|\| TREE_PUBLIC (t))
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	341 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	342 /* Readonly reads are safe. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	343 if (TREE_READONLY (t) && !TYPE_NEEDS_CONSTRUCTING (TREE_TYPE (t)))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	344 return; /* Read of a constant, do not change the function state. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	345 else
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	346 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	347 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	348 fprintf (dump_file, " global memory read is not const\n");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	349 /* Just a regular read. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	350 if (local->pure_const_state == IPA_CONST)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	351 local->pure_const_state = IPA_PURE;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	352 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	353 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	354 else
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	355 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	356 /* Compilation level statics can be read if they are readonly
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	357 variables. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	358 if (TREE_READONLY (t))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	359 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	360
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	361 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	362 fprintf (dump_file, " static memory read is not const\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	363 /* Just a regular read. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	364 if (local->pure_const_state == IPA_CONST)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	365 local->pure_const_state = IPA_PURE;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	366 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	367 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	368
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	369
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	370 /* Check to see if the use (or definition when CHECKING_WRITE is true)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	371 variable T is legal in a function that is either pure or const. */
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	372
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	373 static inline void
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	374 check_op (funct_state local, tree t, bool checking_write)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	375 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	376 t = get_base_address (t);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	377 if (t && TREE_THIS_VOLATILE (t))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	378 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	379 local->pure_const_state = IPA_NEITHER;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	380 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	381 fprintf (dump_file, " Volatile indirect ref is not const/pure\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	382 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	383 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	384 else if (t
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	385 && (INDIRECT_REF_P (t) \|\| TREE_CODE (t) == MEM_REF)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	386 && TREE_CODE (TREE_OPERAND (t, 0)) == SSA_NAME
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	387 && !ptr_deref_may_alias_global_p (TREE_OPERAND (t, 0)))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	388 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	389 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	390 fprintf (dump_file, " Indirect ref to local memory is OK\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	391 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	392 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	393 else if (checking_write)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	394 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	395 local->pure_const_state = IPA_NEITHER;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	396 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	397 fprintf (dump_file, " Indirect ref write is not const/pure\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	398 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	399 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	400 else
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	401 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	402 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	403 fprintf (dump_file, " Indirect ref read is not const\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	404 if (local->pure_const_state == IPA_CONST)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	405 local->pure_const_state = IPA_PURE;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	406 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	407 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	408
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	409 /* compute state based on ECF FLAGS and store to STATE and LOOPING. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	410
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	411 static void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	412 state_from_flags (enum pure_const_state_e state, bool looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	413 int flags, bool cannot_lead_to_return)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	414 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	415 *looping = false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	416 if (flags & ECF_LOOPING_CONST_OR_PURE)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	417 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	418 *looping = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	419 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	420 fprintf (dump_file, " looping");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	421 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	422 if (flags & ECF_CONST)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	423 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	424 *state = IPA_CONST;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	425 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	426 fprintf (dump_file, " const\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	427 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	428 else if (flags & ECF_PURE)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	429 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	430 *state = IPA_PURE;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	431 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	432 fprintf (dump_file, " pure\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	433 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	434 else if (cannot_lead_to_return)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	435 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	436 *state = IPA_PURE;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	437 *looping = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	438 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	439 fprintf (dump_file, " ignoring side effects->pure looping\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	440 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	441 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	442 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	443 if (dump_file && (dump_flags & TDF_DETAILS))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	444 fprintf (dump_file, " neither\n");
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	445 *state = IPA_NEITHER;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	446 *looping = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	447 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	448 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	449
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	450 /* Merge STATE and STATE2 and LOOPING and LOOPING2 and store
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	451 into STATE and LOOPING better of the two variants.
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	452 Be sure to merge looping correctly. IPA_NEITHER functions
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	453 have looping 0 even if they don't have to return. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	454
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	455 static inline void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	456 better_state (enum pure_const_state_e state, bool looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	457 enum pure_const_state_e state2, bool looping2)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	458 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	459 if (state2 < *state)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	460 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	461 if (*state == IPA_NEITHER)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	462 *looping = looping2;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	463 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	464 looping = MIN (looping, looping2);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	465 *state = state2;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	466 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	467 else if (state2 != IPA_NEITHER)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	468 looping = MIN (looping, looping2);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	469 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	470
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	471 /* Merge STATE and STATE2 and LOOPING and LOOPING2 and store
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	472 into STATE and LOOPING worse of the two variants.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	473 N is the actual node called. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	474
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	475 static inline void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	476 worse_state (enum pure_const_state_e state, bool looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	477 enum pure_const_state_e state2, bool looping2,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	478 struct symtab_node *from,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	479 struct symtab_node *to)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	480 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	481 /* Consider function:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	482
04ced10e8804 gcc 7 kono parents: 67 diff changeset	483 bool a(int *p)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	484 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	485 return p==p;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	486 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	487
04ced10e8804 gcc 7 kono parents: 67 diff changeset	488 During early optimization we will turn this into:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	489
04ced10e8804 gcc 7 kono parents: 67 diff changeset	490 bool a(int *p)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	491 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	492 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	493 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	494
04ced10e8804 gcc 7 kono parents: 67 diff changeset	495 Now if this function will be detected as CONST however when interposed it
04ced10e8804 gcc 7 kono parents: 67 diff changeset	496 may end up being just pure. We always must assume the worst scenario here.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	497 */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	498 if (*state == IPA_CONST && state2 == IPA_CONST
04ced10e8804 gcc 7 kono parents: 67 diff changeset	499 && to && !TREE_READONLY (to->decl) && !to->binds_to_current_def_p (from))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	500 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	501 if (dump_file && (dump_flags & TDF_DETAILS))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	502 fprintf (dump_file, "Dropping state to PURE because call to %s may not "
04ced10e8804 gcc 7 kono parents: 67 diff changeset	503 "bind to current def.\n", to->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	504 state2 = IPA_PURE;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	505 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	506 state = MAX (state, state2);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	507 looping = MAX (looping, looping2);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	508 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	509
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	510 /* Recognize special cases of builtins that are by themselves not pure or const
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	511 but function using them is. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	512 static bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	513 special_builtin_state (enum pure_const_state_e state, bool looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	514 tree callee)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	515 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	516 if (DECL_BUILT_IN_CLASS (callee) == BUILT_IN_NORMAL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	517 switch (DECL_FUNCTION_CODE (callee))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	518 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	519 case BUILT_IN_RETURN:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	520 case BUILT_IN_UNREACHABLE:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	521 CASE_BUILT_IN_ALLOCA:
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	522 case BUILT_IN_STACK_SAVE:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	523 case BUILT_IN_STACK_RESTORE:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	524 case BUILT_IN_EH_POINTER:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	525 case BUILT_IN_EH_FILTER:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	526 case BUILT_IN_UNWIND_RESUME:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	527 case BUILT_IN_CXA_END_CLEANUP:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	528 case BUILT_IN_EH_COPY_VALUES:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	529 case BUILT_IN_FRAME_ADDRESS:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	530 case BUILT_IN_APPLY:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	531 case BUILT_IN_APPLY_ARGS:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	532 case BUILT_IN_ASAN_BEFORE_DYNAMIC_INIT:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	533 case BUILT_IN_ASAN_AFTER_DYNAMIC_INIT:
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	534 *looping = false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	535 *state = IPA_CONST;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	536 return true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	537 case BUILT_IN_PREFETCH:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	538 *looping = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	539 *state = IPA_CONST;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	540 return true;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	541 default:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	542 break;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	543 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	544 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	545 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	546
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	547 /* Check the parameters of a function call to CALL_EXPR to see if
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	548 there are any references in the parameters that are not allowed for
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	549 pure or const functions. Also check to see if this is either an
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	550 indirect call, a call outside the compilation unit, or has special
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	551 attributes that may also effect the purity. The CALL_EXPR node for
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	552 the entire call expression. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	553
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	554 static void
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	555 check_call (funct_state local, gcall *call, bool ipa)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	556 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	557 int flags = gimple_call_flags (call);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	558 tree callee_t = gimple_call_fndecl (call);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	559 bool possibly_throws = stmt_could_throw_p (call);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	560 bool possibly_throws_externally = (possibly_throws
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	561 && stmt_can_throw_external (call));
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	562
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	563 if (possibly_throws)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	564 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	565 unsigned int i;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	566 for (i = 0; i < gimple_num_ops (call); i++)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	567 if (gimple_op (call, i)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	568 && tree_could_throw_p (gimple_op (call, i)))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	569 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	570 if (possibly_throws && cfun->can_throw_non_call_exceptions)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	571 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	572 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	573 fprintf (dump_file, " operand can throw; looping\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	574 local->looping = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	575 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	576 if (possibly_throws_externally)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	577 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	578 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	579 fprintf (dump_file, " operand can throw externally\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	580 local->can_throw = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	581 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	582 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	583 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	584
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	585 /* The const and pure flags are set by a variety of places in the
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	586 compiler (including here). If someone has already set the flags
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	587 for the callee, (such as for some of the builtins) we will use
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	588 them, otherwise we will compute our own information.
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	589
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	590 Const and pure functions have less clobber effects than other
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	591 functions so we process these first. Otherwise if it is a call
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	592 outside the compilation unit or an indirect call we punt. This
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	593 leaves local calls which will be processed by following the call
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	594 graph. */
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	595 if (callee_t)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	596 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	597 enum pure_const_state_e call_state;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	598 bool call_looping;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	599
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	600 if (gimple_call_builtin_p (call, BUILT_IN_NORMAL)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	601 && !nonfreeing_call_p (call))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	602 local->can_free = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	603
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	604 if (special_builtin_state (&call_state, &call_looping, callee_t))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	605 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	606 worse_state (&local->pure_const_state, &local->looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	607 call_state, call_looping,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	608 NULL, NULL);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	609 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	610 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	611 /* When bad things happen to bad functions, they cannot be const
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	612 or pure. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	613 if (setjmp_call_p (callee_t))
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	614 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	615 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	616 fprintf (dump_file, " setjmp is not const/pure\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	617 local->looping = true;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	618 local->pure_const_state = IPA_NEITHER;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	619 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	620
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	621 if (DECL_BUILT_IN_CLASS (callee_t) == BUILT_IN_NORMAL)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	622 switch (DECL_FUNCTION_CODE (callee_t))
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	623 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	624 case BUILT_IN_LONGJMP:
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	625 case BUILT_IN_NONLOCAL_GOTO:
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	626 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	627 fprintf (dump_file, " longjmp and nonlocal goto is not const/pure\n");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	628 local->pure_const_state = IPA_NEITHER;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	629 local->looping = true;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	630 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	631 default:
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	632 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	633 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	634 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	635 else if (gimple_call_internal_p (call) && !nonfreeing_call_p (call))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	636 local->can_free = true;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	637
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	638 /* When not in IPA mode, we can still handle self recursion. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	639 if (!ipa && callee_t
04ced10e8804 gcc 7 kono parents: 67 diff changeset	640 && recursive_call_p (current_function_decl, callee_t))
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	641 {
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	642 if (dump_file)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	643 fprintf (dump_file, " Recursive call can loop.\n");
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	644 local->looping = true;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	645 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	646 /* Either callee is unknown or we are doing local analysis.
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	647 Look to see if there are any bits available for the callee (such as by
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	648 declaration or because it is builtin) and process solely on the basis of
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	649 those bits. Handle internal calls always, those calls don't have
04ced10e8804 gcc 7 kono parents: 67 diff changeset	650 corresponding cgraph edges and thus aren't processed during
04ced10e8804 gcc 7 kono parents: 67 diff changeset	651 the propagation. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	652 else if (!ipa \|\| gimple_call_internal_p (call))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	653 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	654 enum pure_const_state_e call_state;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	655 bool call_looping;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	656 if (possibly_throws && cfun->can_throw_non_call_exceptions)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	657 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	658 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	659 fprintf (dump_file, " can throw; looping\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	660 local->looping = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	661 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	662 if (possibly_throws_externally)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	663 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	664 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	665 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	666 fprintf (dump_file, " can throw externally to lp %i\n",
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	667 lookup_stmt_eh_lp (call));
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	668 if (callee_t)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	669 fprintf (dump_file, " callee:%s\n",
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	670 IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (callee_t)));
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	671 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	672 local->can_throw = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	673 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	674 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	675 fprintf (dump_file, " checking flags for call:");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	676 state_from_flags (&call_state, &call_looping, flags,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	677 ((flags & (ECF_NORETURN \| ECF_NOTHROW))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	678 == (ECF_NORETURN \| ECF_NOTHROW))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	679 \|\| (!flag_exceptions && (flags & ECF_NORETURN)));
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	680 worse_state (&local->pure_const_state, &local->looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	681 call_state, call_looping, NULL, NULL);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	682 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	683 /* Direct functions calls are handled by IPA propagation. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	684 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	685
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	686 /* Wrapper around check_decl for loads in local more. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	687
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	688 static bool
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	689 check_load (gimple , tree op, tree, void data)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	690 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	691 if (DECL_P (op))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	692 check_decl ((funct_state)data, op, false, false);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	693 else
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	694 check_op ((funct_state)data, op, false);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	695 return false;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	696 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	697
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	698 /* Wrapper around check_decl for stores in local more. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	699
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	700 static bool
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	701 check_store (gimple , tree op, tree, void data)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	702 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	703 if (DECL_P (op))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	704 check_decl ((funct_state)data, op, true, false);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	705 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	706 check_op ((funct_state)data, op, true);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	707 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	708 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	709
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	710 /* Wrapper around check_decl for loads in ipa mode. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	711
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	712 static bool
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	713 check_ipa_load (gimple , tree op, tree, void data)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	714 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	715 if (DECL_P (op))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	716 check_decl ((funct_state)data, op, false, true);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	717 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	718 check_op ((funct_state)data, op, false);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	719 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	720 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	721
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	722 /* Wrapper around check_decl for stores in ipa mode. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	723
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	724 static bool
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	725 check_ipa_store (gimple , tree op, tree, void data)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	726 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	727 if (DECL_P (op))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	728 check_decl ((funct_state)data, op, true, true);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	729 else
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	730 check_op ((funct_state)data, op, true);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	731 return false;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	732 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	733
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	734 /* Look into pointer pointed to by GSIP and figure out what interesting side
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	735 effects it has. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	736 static void
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	737 check_stmt (gimple_stmt_iterator *gsip, funct_state local, bool ipa)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	738 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	739 gimple stmt = gsi_stmt (gsip);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	740
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	741 if (is_gimple_debug (stmt))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	742 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	743
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	744 /* Do consider clobber as side effects before IPA, so we rather inline
04ced10e8804 gcc 7 kono parents: 67 diff changeset	745 C++ destructors and keep clobber semantics than eliminate them.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	746
04ced10e8804 gcc 7 kono parents: 67 diff changeset	747 TODO: We may get smarter during early optimizations on these and let
04ced10e8804 gcc 7 kono parents: 67 diff changeset	748 functions containing only clobbers to be optimized more. This is a common
04ced10e8804 gcc 7 kono parents: 67 diff changeset	749 case of C++ destructors. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	750
04ced10e8804 gcc 7 kono parents: 67 diff changeset	751 if ((ipa \|\| cfun->after_inlining) && gimple_clobber_p (stmt))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	752 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	753
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	754 if (dump_file)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	755 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	756 fprintf (dump_file, " scanning: ");
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	757 print_gimple_stmt (dump_file, stmt, 0);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	758 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	759
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	760 if (gimple_has_volatile_ops (stmt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	761 && !gimple_clobber_p (stmt))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	762 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	763 local->pure_const_state = IPA_NEITHER;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	764 if (dump_file)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	765 fprintf (dump_file, " Volatile stmt is not const/pure\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	766 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	767
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	768 /* Look for loads and stores. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	769 walk_stmt_load_store_ops (stmt, local,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	770 ipa ? check_ipa_load : check_load,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	771 ipa ? check_ipa_store : check_store);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	772
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	773 if (gimple_code (stmt) != GIMPLE_CALL
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	774 && stmt_could_throw_p (stmt))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	775 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	776 if (cfun->can_throw_non_call_exceptions)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	777 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	778 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	779 fprintf (dump_file, " can throw; looping\n");
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	780 local->looping = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	781 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	782 if (stmt_can_throw_external (stmt))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	783 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	784 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	785 fprintf (dump_file, " can throw externally\n");
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	786 local->can_throw = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	787 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	788 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	789 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	790 fprintf (dump_file, " can throw\n");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	791 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	792 switch (gimple_code (stmt))
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	793 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	794 case GIMPLE_CALL:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	795 check_call (local, as_a <gcall *> (stmt), ipa);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	796 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	797 case GIMPLE_LABEL:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	798 if (DECL_NONLOCAL (gimple_label_label (as_a <glabel *> (stmt))))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	799 /* Target of long jump. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	800 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	801 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	802 fprintf (dump_file, " nonlocal label is not const/pure\n");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	803 local->pure_const_state = IPA_NEITHER;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	804 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	805 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	806 case GIMPLE_ASM:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	807 if (gimple_asm_clobbers_memory_p (as_a <gasm *> (stmt)))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	808 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	809 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	810 fprintf (dump_file, " memory asm clobber is not const/pure\n");
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	811 /* Abandon all hope, ye who enter here. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	812 local->pure_const_state = IPA_NEITHER;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	813 local->can_free = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	814 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	815 if (gimple_asm_volatile_p (as_a <gasm *> (stmt)))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	816 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	817 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	818 fprintf (dump_file, " volatile is not const/pure\n");
04ced10e8804 gcc 7 kono parents: 67 diff changeset	819 /* Abandon all hope, ye who enter here. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	820 local->pure_const_state = IPA_NEITHER;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	821 local->looping = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	822 local->can_free = true;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	823 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	824 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	825 default:
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	826 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	827 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	828 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	829
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	830
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	831 /* This is the main routine for finding the reference patterns for
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	832 global variables within a function FN. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	833
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	834 static funct_state
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	835 analyze_function (struct cgraph_node *fn, bool ipa)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	836 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	837 tree decl = fn->decl;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	838 funct_state l;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	839 basic_block this_block;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	840
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	841 l = XCNEW (struct funct_state_d);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	842 l->pure_const_state = IPA_CONST;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	843 l->state_previously_known = IPA_NEITHER;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	844 l->looping_previously_known = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	845 l->looping = false;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	846 l->can_throw = false;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	847 l->can_free = false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	848 state_from_flags (&l->state_previously_known, &l->looping_previously_known,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	849 flags_from_decl_or_type (fn->decl),
04ced10e8804 gcc 7 kono parents: 67 diff changeset	850 fn->cannot_return_p ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	851
04ced10e8804 gcc 7 kono parents: 67 diff changeset	852 if (fn->thunk.thunk_p \|\| fn->alias)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	853 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	854 /* Thunk gets propagated through, so nothing interesting happens. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	855 gcc_assert (ipa);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	856 if (fn->thunk.thunk_p && fn->thunk.virtual_offset_p)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	857 l->pure_const_state = IPA_NEITHER;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	858 return l;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	859 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	860
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	861 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	862 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	863 fprintf (dump_file, "\n\n local analysis of %s\n ",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	864 fn->name ());
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	865 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	866
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	867 push_cfun (DECL_STRUCT_FUNCTION (decl));
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	868
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	869 FOR_EACH_BB_FN (this_block, cfun)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	870 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	871 gimple_stmt_iterator gsi;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	872 struct walk_stmt_info wi;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	873
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	874 memset (&wi, 0, sizeof (wi));
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	875 for (gsi = gsi_start_bb (this_block);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	876 !gsi_end_p (gsi);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	877 gsi_next (&gsi))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	878 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	879 check_stmt (&gsi, l, ipa);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	880 if (l->pure_const_state == IPA_NEITHER
04ced10e8804 gcc 7 kono parents: 67 diff changeset	881 && l->looping
04ced10e8804 gcc 7 kono parents: 67 diff changeset	882 && l->can_throw
04ced10e8804 gcc 7 kono parents: 67 diff changeset	883 && l->can_free)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	884 goto end;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	885 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	886 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	887
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	888 end:
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	889 if (l->pure_const_state != IPA_NEITHER)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	890 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	891 /* Const functions cannot have back edges (an
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	892 indication of possible infinite loop side
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	893 effect. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	894 if (mark_dfs_back_edges ())
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	895 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	896 /* Preheaders are needed for SCEV to work.
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	897 Simple latches and recorded exits improve chances that loop will
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	898 proved to be finite in testcases such as in loop-15.c
04ced10e8804 gcc 7 kono parents: 67 diff changeset	899 and loop-24.c */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	900 loop_optimizer_init (LOOPS_HAVE_PREHEADERS
04ced10e8804 gcc 7 kono parents: 67 diff changeset	901 \| LOOPS_HAVE_SIMPLE_LATCHES
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	902 \| LOOPS_HAVE_RECORDED_EXITS);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	903 if (dump_file && (dump_flags & TDF_DETAILS))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	904 flow_loops_dump (dump_file, NULL, 0);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	905 if (mark_irreducible_loops ())
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	906 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	907 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	908 fprintf (dump_file, " has irreducible loops\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	909 l->looping = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	910 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	911 else
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	912 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	913 struct loop *loop;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	914 scev_initialize ();
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	915 FOR_EACH_LOOP (loop, 0)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	916 if (!finite_loop_p (loop))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	917 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	918 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	919 fprintf (dump_file, " can not prove finiteness of "
04ced10e8804 gcc 7 kono parents: 67 diff changeset	920 "loop %i\n", loop->num);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	921 l->looping =true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	922 break;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	923 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	924 scev_finalize ();
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	925 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	926 loop_optimizer_finalize ();
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	927 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	928 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	929
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	930 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	931 fprintf (dump_file, " checking previously known:");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	932
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	933 better_state (&l->pure_const_state, &l->looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	934 l->state_previously_known,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	935 l->looping_previously_known);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	936 if (TREE_NOTHROW (decl))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	937 l->can_throw = false;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	938
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	939 pop_cfun ();
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	940 if (dump_file)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	941 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	942 if (l->looping)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	943 fprintf (dump_file, "Function is locally looping.\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	944 if (l->can_throw)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	945 fprintf (dump_file, "Function is locally throwing.\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	946 if (l->pure_const_state == IPA_CONST)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	947 fprintf (dump_file, "Function is locally const.\n");
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	948 if (l->pure_const_state == IPA_PURE)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	949 fprintf (dump_file, "Function is locally pure.\n");
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	950 if (l->can_free)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	951 fprintf (dump_file, "Function can locally free.\n");
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	952 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	953 return l;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	954 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	955
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	956 /* Called when new function is inserted to callgraph late. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	957 static void
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	958 add_new_function (struct cgraph_node node, void data ATTRIBUTE_UNUSED)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	959 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	960 /* There are some shared nodes, in particular the initializers on
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	961 static declarations. We do not need to scan them more than once
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	962 since all we would be interested in are the addressof
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	963 operations. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	964 if (opt_for_fn (node->decl, flag_ipa_pure_const))
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	965 set_function_state (node, analyze_function (node, true));
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	966 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	967
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	968 /* Called when new clone is inserted to callgraph late. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	969
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	970 static void
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	971 duplicate_node_data (struct cgraph_node src, struct cgraph_node dst,
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	972 void *data ATTRIBUTE_UNUSED)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	973 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	974 if (has_function_state (src))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	975 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	976 funct_state l = XNEW (struct funct_state_d);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	977 gcc_assert (!has_function_state (dst));
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	978 memcpy (l, get_function_state (src), sizeof (*l));
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	979 set_function_state (dst, l);
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	980 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	981 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	982
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	983 /* Called when new clone is inserted to callgraph late. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	984
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	985 static void
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	986 remove_node_data (struct cgraph_node node, void data ATTRIBUTE_UNUSED)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	987 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	988 if (has_function_state (node))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	989 set_function_state (node, NULL);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	990 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	991
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	992
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	993 void
04ced10e8804 gcc 7 kono parents: 67 diff changeset	994 pass_ipa_pure_const::
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	995 register_hooks (void)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	996 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	997 if (init_p)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	998 return;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	999
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1000 init_p = true;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1001
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1002 node_removal_hook_holder =
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1003 symtab->add_cgraph_removal_hook (&remove_node_data, NULL);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1004 node_duplication_hook_holder =
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1005 symtab->add_cgraph_duplication_hook (&duplicate_node_data, NULL);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1006 function_insertion_hook_holder =
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1007 symtab->add_cgraph_insertion_hook (&add_new_function, NULL);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1008 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1009
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1010
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1011 /* Analyze each function in the cgraph to see if it is locally PURE or
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1012 CONST. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1013
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1014 static void
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1015 pure_const_generate_summary (void)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1016 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1017 struct cgraph_node *node;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1018
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1019 pass_ipa_pure_const pass = static_cast <pass_ipa_pure_const > (current_pass);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1020 pass->register_hooks ();
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1021
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1022 /* Process all of the functions.
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1023
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1024 We process AVAIL_INTERPOSABLE functions. We can not use the results
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1025 by default, but the info can be used at LTO with -fwhole-program or
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1026 when function got cloned and the clone is AVAILABLE. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1027
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1028 FOR_EACH_DEFINED_FUNCTION (node)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1029 if (opt_for_fn (node->decl, flag_ipa_pure_const))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1030 set_function_state (node, analyze_function (node, true));
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1031 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1032
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1033
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1034 /* Serialize the ipa info for lto. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1035
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1036 static void
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1037 pure_const_write_summary (void)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1038 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1039 struct cgraph_node *node;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1040 struct lto_simple_output_block *ob
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1041 = lto_create_simple_output_block (LTO_section_ipa_pure_const);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1042 unsigned int count = 0;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1043 lto_symtab_encoder_iterator lsei;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1044 lto_symtab_encoder_t encoder;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1045
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1046 encoder = lto_get_out_decl_state ()->symtab_node_encoder;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1047
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1048 for (lsei = lsei_start_function_in_partition (encoder); !lsei_end_p (lsei);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1049 lsei_next_function_in_partition (&lsei))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1050 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1051 node = lsei_cgraph_node (lsei);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1052 if (node->definition && has_function_state (node))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1053 count++;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1054 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1055
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1056 streamer_write_uhwi_stream (ob->main_stream, count);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1057
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1058 /* Process all of the functions. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1059 for (lsei = lsei_start_function_in_partition (encoder); !lsei_end_p (lsei);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1060 lsei_next_function_in_partition (&lsei))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1061 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1062 node = lsei_cgraph_node (lsei);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1063 if (node->definition && has_function_state (node))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1064 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1065 struct bitpack_d bp;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1066 funct_state fs;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1067 int node_ref;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1068 lto_symtab_encoder_t encoder;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1069
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1070 fs = get_function_state (node);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1071
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1072 encoder = ob->decl_state->symtab_node_encoder;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1073 node_ref = lto_symtab_encoder_encode (encoder, node);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1074 streamer_write_uhwi_stream (ob->main_stream, node_ref);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1075
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1076 /* Note that flags will need to be read in the opposite
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1077 order as we are pushing the bitflags into FLAGS. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1078 bp = bitpack_create (ob->main_stream);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1079 bp_pack_value (&bp, fs->pure_const_state, 2);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1080 bp_pack_value (&bp, fs->state_previously_known, 2);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1081 bp_pack_value (&bp, fs->looping_previously_known, 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1082 bp_pack_value (&bp, fs->looping, 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1083 bp_pack_value (&bp, fs->can_throw, 1);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1084 bp_pack_value (&bp, fs->can_free, 1);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1085 streamer_write_bitpack (&bp);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1086 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1087 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1088
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1089 lto_destroy_simple_output_block (ob);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1090 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1091
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1092
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1093 /* Deserialize the ipa info for lto. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1094
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1095 static void
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1096 pure_const_read_summary (void)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1097 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1098 struct lto_file_decl_data **file_data_vec = lto_get_file_decl_data ();
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1099 struct lto_file_decl_data *file_data;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1100 unsigned int j = 0;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1101
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1102 pass_ipa_pure_const pass = static_cast <pass_ipa_pure_const > (current_pass);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1103 pass->register_hooks ();
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1104
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1105 while ((file_data = file_data_vec[j++]))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1106 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1107 const char *data;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1108 size_t len;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1109 struct lto_input_block *ib
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1110 = lto_create_simple_input_block (file_data,
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1111 LTO_section_ipa_pure_const,
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1112 &data, &len);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1113 if (ib)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1114 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1115 unsigned int i;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1116 unsigned int count = streamer_read_uhwi (ib);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1117
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1118 for (i = 0; i < count; i++)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1119 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1120 unsigned int index;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1121 struct cgraph_node *node;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1122 struct bitpack_d bp;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1123 funct_state fs;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1124 lto_symtab_encoder_t encoder;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1125
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1126 fs = XCNEW (struct funct_state_d);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1127 index = streamer_read_uhwi (ib);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1128 encoder = file_data->symtab_node_encoder;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1129 node = dyn_cast<cgraph_node *> (lto_symtab_encoder_deref (encoder,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1130 index));
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1131 set_function_state (node, fs);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1132
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1133 /* Note that the flags must be read in the opposite
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1134 order in which they were written (the bitflags were
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1135 pushed into FLAGS). */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1136 bp = streamer_read_bitpack (ib);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1137 fs->pure_const_state
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1138 = (enum pure_const_state_e) bp_unpack_value (&bp, 2);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1139 fs->state_previously_known
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1140 = (enum pure_const_state_e) bp_unpack_value (&bp, 2);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1141 fs->looping_previously_known = bp_unpack_value (&bp, 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1142 fs->looping = bp_unpack_value (&bp, 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1143 fs->can_throw = bp_unpack_value (&bp, 1);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1144 fs->can_free = bp_unpack_value (&bp, 1);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1145 if (dump_file)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1146 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1147 int flags = flags_from_decl_or_type (node->decl);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1148 fprintf (dump_file, "Read info for %s ", node->dump_name ());
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1149 if (flags & ECF_CONST)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1150 fprintf (dump_file, " const");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1151 if (flags & ECF_PURE)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1152 fprintf (dump_file, " pure");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1153 if (flags & ECF_NOTHROW)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1154 fprintf (dump_file, " nothrow");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1155 fprintf (dump_file, "\n pure const state: %s\n",
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1156 pure_const_names[fs->pure_const_state]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1157 fprintf (dump_file, " previously known state: %s\n",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1158 pure_const_names[fs->state_previously_known]);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1159 if (fs->looping)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1160 fprintf (dump_file," function is locally looping\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1161 if (fs->looping_previously_known)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1162 fprintf (dump_file," function is previously known looping\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1163 if (fs->can_throw)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1164 fprintf (dump_file," function is locally throwing\n");
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1165 if (fs->can_free)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1166 fprintf (dump_file," function can locally free\n");
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1167 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1168 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1169
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1170 lto_destroy_simple_input_block (file_data,
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1171 LTO_section_ipa_pure_const,
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1172 ib, data, len);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1173 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1174 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1175 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1176
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1177 /* We only propagate across edges that can throw externally and their callee
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1178 is not interposable. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1179
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1180 static bool
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1181 ignore_edge_for_nothrow (struct cgraph_edge *e)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1182 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1183 if (!e->can_throw_external \|\| TREE_NOTHROW (e->callee->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1184 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1185
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1186 enum availability avail;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1187 cgraph_node *n = e->callee->function_or_virtual_thunk_symbol (&avail,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1188 e->caller);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1189 if (avail <= AVAIL_INTERPOSABLE \|\| TREE_NOTHROW (n->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1190 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1191 return opt_for_fn (e->callee->decl, flag_non_call_exceptions)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1192 && !e->callee->binds_to_current_def_p (e->caller);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1193 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1194
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1195 /* Return true if NODE is self recursive function.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1196 Indirectly recursive functions appears as non-trivial strongly
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1197 connected components, so we need to care about self recursion
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1198 only. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1199
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1200 static bool
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1201 self_recursive_p (struct cgraph_node *node)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1202 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1203 struct cgraph_edge *e;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1204 for (e = node->callees; e; e = e->next_callee)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1205 if (e->callee->function_symbol () == node)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1206 return true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1207 return false;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1208 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1209
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1210 /* Return true if N is cdtor that is not const or pure. In this case we may
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1211 need to remove unreachable function if it is marked const/pure. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1212
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1213 static bool
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1214 cdtor_p (cgraph_node n, void )
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1215 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1216 if (DECL_STATIC_CONSTRUCTOR (n->decl) \|\| DECL_STATIC_DESTRUCTOR (n->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1217 return ((!TREE_READONLY (n->decl) && !DECL_PURE_P (n->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1218 \|\| DECL_LOOPING_CONST_OR_PURE_P (n->decl));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1219 return false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1220 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1221
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1222 /* We only propagate across edges with non-interposable callee. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1223
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1224 static bool
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1225 ignore_edge_for_pure_const (struct cgraph_edge *e)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1226 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1227 enum availability avail;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1228 e->callee->function_or_virtual_thunk_symbol (&avail, e->caller);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1229 return (avail <= AVAIL_INTERPOSABLE);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1230 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1231
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1232
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1233 /* Produce transitive closure over the callgraph and compute pure/const
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1234 attributes. */
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1235
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1236 static bool
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1237 propagate_pure_const (void)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1238 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1239 struct cgraph_node *node;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1240 struct cgraph_node *w;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1241 struct cgraph_node **order =
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1242 XCNEWVEC (struct cgraph_node *, symtab->cgraph_count);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1243 int order_pos;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1244 int i;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1245 struct ipa_dfs_info * w_info;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1246 bool remove_p = false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1247 bool has_cdtor;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1248
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1249 order_pos = ipa_reduced_postorder (order, true, false,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1250 ignore_edge_for_pure_const);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1251 if (dump_file)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1252 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1253 cgraph_node::dump_cgraph (dump_file);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1254 ipa_print_order (dump_file, "reduced", order, order_pos);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1255 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1256
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1257 /* Propagate the local information through the call graph to produce
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1258 the global information. All the nodes within a cycle will have
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1259 the same info so we collapse cycles first. Then we can do the
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1260 propagation in one pass from the leaves to the roots. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1261 for (i = 0; i < order_pos; i++ )
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1262 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1263 enum pure_const_state_e pure_const_state = IPA_CONST;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1264 bool looping = false;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1265 int count = 0;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1266 node = order[i];
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1267
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1268 if (node->alias)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1269 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1270
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1271 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1272 fprintf (dump_file, "Starting cycle\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1273
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1274 /* Find the worst state for any node in the cycle. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1275 w = node;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1276 while (w && pure_const_state != IPA_NEITHER)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1277 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1278 struct cgraph_edge *e;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1279 struct cgraph_edge *ie;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1280 int i;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1281 struct ipa_ref *ref = NULL;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1282
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1283 funct_state w_l = get_function_state (w);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1284 if (dump_file && (dump_flags & TDF_DETAILS))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1285 fprintf (dump_file, " Visiting %s state:%s looping %i\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1286 w->dump_name (),
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1287 pure_const_names[w_l->pure_const_state],
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1288 w_l->looping);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1289
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1290 /* First merge in function body properties.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1291 We are safe to pass NULL as FROM and TO because we will take care
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1292 of possible interposition when walking callees. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1293 worse_state (&pure_const_state, &looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1294 w_l->pure_const_state, w_l->looping,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1295 NULL, NULL);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1296 if (pure_const_state == IPA_NEITHER)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1297 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1298
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1299 count++;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1300
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1301 /* We consider recursive cycles as possibly infinite.
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1302 This might be relaxed since infinite recursion leads to stack
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1303 overflow. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1304 if (count > 1)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1305 looping = true;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1306
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1307 /* Now walk the edges and merge in callee properties. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1308 for (e = w->callees; e && pure_const_state != IPA_NEITHER;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1309 e = e->next_callee)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1310 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1311 enum availability avail;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1312 struct cgraph_node *y = e->callee->
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1313 function_or_virtual_thunk_symbol (&avail,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1314 e->caller);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1315 enum pure_const_state_e edge_state = IPA_CONST;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1316 bool edge_looping = false;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1317
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1318 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1319 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1320 fprintf (dump_file, " Call to %s",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1321 e->callee->dump_name ());
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1322 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1323 if (avail > AVAIL_INTERPOSABLE)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1324 {
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1325 funct_state y_l = get_function_state (y);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1326 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1327 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1328 fprintf (dump_file,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1329 " state:%s looping:%i\n",
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1330 pure_const_names[y_l->pure_const_state],
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1331 y_l->looping);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1332 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1333 if (y_l->pure_const_state > IPA_PURE
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1334 && e->cannot_lead_to_return_p ())
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1335 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1336 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1337 fprintf (dump_file,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1338 " Ignoring side effects"
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1339 " -> pure, looping\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1340 edge_state = IPA_PURE;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1341 edge_looping = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1342 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1343 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1344 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1345 edge_state = y_l->pure_const_state;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1346 edge_looping = y_l->looping;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1347 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1348 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1349 else if (special_builtin_state (&edge_state, &edge_looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1350 y->decl))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1351 ;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1352 else
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1353 state_from_flags (&edge_state, &edge_looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1354 flags_from_decl_or_type (y->decl),
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1355 e->cannot_lead_to_return_p ());
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1356
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1357 /* Merge the results with what we already know. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1358 better_state (&edge_state, &edge_looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1359 w_l->state_previously_known,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1360 w_l->looping_previously_known);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1361 worse_state (&pure_const_state, &looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1362 edge_state, edge_looping, e->caller, e->callee);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1363 if (pure_const_state == IPA_NEITHER)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1364 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1365 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1366
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1367 /* Now process the indirect call. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1368 for (ie = w->indirect_calls;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1369 ie && pure_const_state != IPA_NEITHER; ie = ie->next_callee)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1370 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1371 enum pure_const_state_e edge_state = IPA_CONST;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1372 bool edge_looping = false;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1373
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1374 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1375 fprintf (dump_file, " Indirect call");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1376 state_from_flags (&edge_state, &edge_looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1377 ie->indirect_info->ecf_flags,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1378 ie->cannot_lead_to_return_p ());
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1379 /* Merge the results with what we already know. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1380 better_state (&edge_state, &edge_looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1381 w_l->state_previously_known,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1382 w_l->looping_previously_known);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1383 worse_state (&pure_const_state, &looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1384 edge_state, edge_looping, NULL, NULL);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1385 if (pure_const_state == IPA_NEITHER)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1386 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1387 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1388
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1389 /* And finally all loads and stores. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1390 for (i = 0; w->iterate_reference (i, ref)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1391 && pure_const_state != IPA_NEITHER; i++)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1392 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1393 enum pure_const_state_e ref_state = IPA_CONST;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1394 bool ref_looping = false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1395 switch (ref->use)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1396 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1397 case IPA_REF_LOAD:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1398 /* readonly reads are safe. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1399 if (TREE_READONLY (ref->referred->decl))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1400 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1401 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1402 fprintf (dump_file, " nonreadonly global var read\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1403 ref_state = IPA_PURE;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1404 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1405 case IPA_REF_STORE:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1406 if (ref->cannot_lead_to_return ())
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1407 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1408 ref_state = IPA_NEITHER;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1409 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1410 fprintf (dump_file, " global var write\n");
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1411 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1412 case IPA_REF_ADDR:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1413 case IPA_REF_CHKP:
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1414 break;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1415 default:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1416 gcc_unreachable ();
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1417 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1418 better_state (&ref_state, &ref_looping,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1419 w_l->state_previously_known,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1420 w_l->looping_previously_known);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1421 worse_state (&pure_const_state, &looping,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1422 ref_state, ref_looping, NULL, NULL);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1423 if (pure_const_state == IPA_NEITHER)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1424 break;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1425 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1426 w_info = (struct ipa_dfs_info *) w->aux;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1427 w = w_info->next_cycle;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1428 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1429 if (dump_file && (dump_flags & TDF_DETAILS))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1430 fprintf (dump_file, "Result %s looping %i\n",
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1431 pure_const_names [pure_const_state],
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1432 looping);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1433
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1434 /* Find the worst state of can_free for any node in the cycle. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1435 bool can_free = false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1436 w = node;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1437 while (w && !can_free)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1438 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1439 struct cgraph_edge *e;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1440 funct_state w_l = get_function_state (w);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1441
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1442 if (w_l->can_free
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1443 \|\| w->get_availability () == AVAIL_INTERPOSABLE
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1444 \|\| w->indirect_calls)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1445 can_free = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1446
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1447 for (e = w->callees; e && !can_free; e = e->next_callee)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1448 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1449 enum availability avail;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1450 struct cgraph_node *y = e->callee->
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1451 function_or_virtual_thunk_symbol (&avail,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1452 e->caller);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1453
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1454 if (avail > AVAIL_INTERPOSABLE)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1455 can_free = get_function_state (y)->can_free;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1456 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1457 can_free = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1458 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1459 w_info = (struct ipa_dfs_info *) w->aux;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1460 w = w_info->next_cycle;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1461 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1462
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1463 /* Copy back the region's pure_const_state which is shared by
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1464 all nodes in the region. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1465 w = node;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1466 while (w)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1467 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1468 funct_state w_l = get_function_state (w);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1469 enum pure_const_state_e this_state = pure_const_state;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1470 bool this_looping = looping;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1471
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1472 w_l->can_free = can_free;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1473 w->nonfreeing_fn = !can_free;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1474 if (!can_free && dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1475 fprintf (dump_file, "Function found not to call free: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1476 w->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1477
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1478 if (w_l->state_previously_known != IPA_NEITHER
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1479 && this_state > w_l->state_previously_known)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1480 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1481 this_state = w_l->state_previously_known;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1482 if (this_state == IPA_NEITHER)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1483 this_looping = w_l->looping_previously_known;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1484 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1485 if (!this_looping && self_recursive_p (w))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1486 this_looping = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1487 if (!w_l->looping_previously_known)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1488 this_looping = false;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1489
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1490 /* All nodes within a cycle share the same info. */
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1491 w_l->pure_const_state = this_state;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1492 w_l->looping = this_looping;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1493
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1494 /* Inline clones share declaration with their offline copies;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1495 do not modify their declarations since the offline copy may
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1496 be different. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1497 if (!w->global.inlined_to)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1498 switch (this_state)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1499 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1500 case IPA_CONST:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1501 if (!TREE_READONLY (w->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1502 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1503 warn_function_const (w->decl, !this_looping);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1504 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1505 fprintf (dump_file, "Function found to be %sconst: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1506 this_looping ? "looping " : "",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1507 w->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1508 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1509 /* Turning constructor or destructor to non-looping const/pure
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1510 enables us to possibly remove the function completely. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1511 if (this_looping)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1512 has_cdtor = false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1513 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1514 has_cdtor = w->call_for_symbol_and_aliases (cdtor_p,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1515 NULL, true);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1516 if (w->set_const_flag (true, this_looping))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1517 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1518 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1519 fprintf (dump_file,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1520 "Declaration updated to be %sconst: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1521 this_looping ? "looping " : "",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1522 w->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1523 remove_p \|= has_cdtor;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1524 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1525 break;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1526
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1527 case IPA_PURE:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1528 if (!DECL_PURE_P (w->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1529 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1530 warn_function_pure (w->decl, !this_looping);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1531 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1532 fprintf (dump_file, "Function found to be %spure: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1533 this_looping ? "looping " : "",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1534 w->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1535 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1536 if (this_looping)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1537 has_cdtor = false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1538 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1539 has_cdtor = w->call_for_symbol_and_aliases (cdtor_p,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1540 NULL, true);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1541 if (w->set_pure_flag (true, this_looping))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1542 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1543 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1544 fprintf (dump_file,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1545 "Declaration updated to be %spure: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1546 this_looping ? "looping " : "",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1547 w->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1548 remove_p \|= has_cdtor;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1549 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1550 break;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1551
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1552 default:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1553 break;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1554 }
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1555 w_info = (struct ipa_dfs_info *) w->aux;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1556 w = w_info->next_cycle;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1557 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1558 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1559
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1560 ipa_free_postorder_info ();
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1561 free (order);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1562 return remove_p;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1563 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1564
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1565 /* Produce transitive closure over the callgraph and compute nothrow
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1566 attributes. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1567
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1568 static void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1569 propagate_nothrow (void)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1570 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1571 struct cgraph_node *node;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1572 struct cgraph_node *w;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1573 struct cgraph_node **order =
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1574 XCNEWVEC (struct cgraph_node *, symtab->cgraph_count);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1575 int order_pos;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1576 int i;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1577 struct ipa_dfs_info * w_info;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1578
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1579 order_pos = ipa_reduced_postorder (order, true, false,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1580 ignore_edge_for_nothrow);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1581 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1582 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1583 cgraph_node::dump_cgraph (dump_file);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1584 ipa_print_order (dump_file, "reduced for nothrow", order, order_pos);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1585 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1586
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1587 /* Propagate the local information through the call graph to produce
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1588 the global information. All the nodes within a cycle will have
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1589 the same info so we collapse cycles first. Then we can do the
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1590 propagation in one pass from the leaves to the roots. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1591 for (i = 0; i < order_pos; i++ )
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1592 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1593 bool can_throw = false;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1594 node = order[i];
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1595
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1596 if (node->alias)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1597 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1598
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1599 /* Find the worst state for any node in the cycle. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1600 w = node;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1601 while (w && !can_throw)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1602 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1603 struct cgraph_edge e, ie;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1604
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1605 if (!TREE_NOTHROW (w->decl))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1606 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1607 funct_state w_l = get_function_state (w);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1608
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1609 if (w_l->can_throw
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1610 \|\| w->get_availability () == AVAIL_INTERPOSABLE)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1611 can_throw = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1612
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1613 for (e = w->callees; e && !can_throw; e = e->next_callee)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1614 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1615 enum availability avail;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1616
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1617 if (!e->can_throw_external \|\| TREE_NOTHROW (e->callee->decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1618 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1619
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1620 struct cgraph_node *y = e->callee->
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1621 function_or_virtual_thunk_symbol (&avail,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1622 e->caller);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1623
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1624 /* We can use info about the callee only if we know it can
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1625 not be interposed.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1626 When callee is compiled with non-call exceptions we also
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1627 must check that the declaration is bound to current
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1628 body as other semantically equivalent body may still
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1629 throw. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1630 if (avail <= AVAIL_INTERPOSABLE
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1631 \|\| (!TREE_NOTHROW (y->decl)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1632 && (get_function_state (y)->can_throw
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1633 \|\| (opt_for_fn (y->decl, flag_non_call_exceptions)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1634 && !e->callee->binds_to_current_def_p (w)))))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1635 can_throw = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1636 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1637 for (ie = w->indirect_calls; ie && !can_throw;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1638 ie = ie->next_callee)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1639 if (ie->can_throw_external
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1640 && !(ie->indirect_info->ecf_flags & ECF_NOTHROW))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1641 can_throw = true;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1642 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1643 w_info = (struct ipa_dfs_info *) w->aux;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1644 w = w_info->next_cycle;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1645 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1646
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1647 /* Copy back the region's pure_const_state which is shared by
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1648 all nodes in the region. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1649 w = node;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1650 while (w)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1651 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1652 funct_state w_l = get_function_state (w);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1653 if (!can_throw && !TREE_NOTHROW (w->decl))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1654 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1655 /* Inline clones share declaration with their offline copies;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1656 do not modify their declarations since the offline copy may
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1657 be different. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1658 if (!w->global.inlined_to)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1659 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1660 w->set_nothrow_flag (true);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1661 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1662 fprintf (dump_file, "Function found to be nothrow: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1663 w->name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1664 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1665 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1666 else if (can_throw && !TREE_NOTHROW (w->decl))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1667 w_l->can_throw = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1668 w_info = (struct ipa_dfs_info *) w->aux;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1669 w = w_info->next_cycle;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1670 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1671 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1672
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1673 ipa_free_postorder_info ();
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1674 free (order);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1675 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1676
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1677
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1678 /* Produce the global information by preforming a transitive closure
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1679 on the local information that was produced by generate_summary. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1680
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1681 unsigned int
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1682 pass_ipa_pure_const::
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1683 execute (function *)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1684 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1685 struct cgraph_node *node;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1686 bool remove_p;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1687
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1688 symtab->remove_cgraph_insertion_hook (function_insertion_hook_holder);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1689 symtab->remove_cgraph_duplication_hook (node_duplication_hook_holder);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1690 symtab->remove_cgraph_removal_hook (node_removal_hook_holder);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1691
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1692 /* Nothrow makes more function to not lead to return and improve
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1693 later analysis. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1694 propagate_nothrow ();
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1695 remove_p = propagate_pure_const ();
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1696
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1697 /* Cleanup. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1698 FOR_EACH_FUNCTION (node)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1699 if (has_function_state (node))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1700 free (get_function_state (node));
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1701 funct_state_vec.release ();
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1702 return remove_p ? TODO_remove_functions : 0;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1703 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1704
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1705 static bool
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1706 gate_pure_const (void)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1707 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1708 return flag_ipa_pure_const \|\| in_lto_p;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1709 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1710
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1711 pass_ipa_pure_const::pass_ipa_pure_const(gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1712 : ipa_opt_pass_d(pass_data_ipa_pure_const, ctxt,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1713 pure_const_generate_summary, /* generate_summary */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1714 pure_const_write_summary, /* write_summary */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1715 pure_const_read_summary, /* read_summary */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1716 NULL, /* write_optimization_summary */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1717 NULL, /* read_optimization_summary */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1718 NULL, /* stmt_fixup */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1719 0, /* function_transform_todo_flags_start */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1720 NULL, /* function_transform */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1721 NULL), /* variable_transform */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1722 init_p(false),
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1723 function_insertion_hook_holder(NULL),
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1724 node_duplication_hook_holder(NULL),
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1725 node_removal_hook_holder(NULL)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1726 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1727 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1728
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1729 ipa_opt_pass_d *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1730 make_pass_ipa_pure_const (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1731 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1732 return new pass_ipa_pure_const (ctxt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1733 }
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1734
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1735 /* Return true if function should be skipped for local pure const analysis. */
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1736
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1737 static bool
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1738 skip_function_for_local_pure_const (struct cgraph_node *node)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1739 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1740 /* Because we do not schedule pass_fixup_cfg over whole program after early
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1741 optimizations we must not promote functions that are called by already
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1742 processed functions. */
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1743
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1744 if (function_called_by_processed_nodes_p ())
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1745 {
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1746 if (dump_file)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1747 fprintf (dump_file, "Function called in recursive cycle; ignoring\n");
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1748 return true;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1749 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1750 /* Save some work and do not analyze functions which are interposable and
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1751 do not have any non-interposable aliases. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1752 if (node->get_availability () <= AVAIL_INTERPOSABLE
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1753 && !node->has_aliases_p ())
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1754 {
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1755 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1756 fprintf (dump_file,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1757 "Function is interposable; not analyzing.\n");
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1758 return true;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1759 }
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1760 return false;
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1761 }
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1762
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1763 /* Simple local pass for pure const discovery reusing the analysis from
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1764 ipa_pure_const. This pass is effective when executed together with
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1765 other optimization passes in early optimization pass queue. */
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1766
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1767 namespace {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1768
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1769 const pass_data pass_data_local_pure_const =
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1770 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1771 GIMPLE_PASS, /* type */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1772 "local-pure-const", /* name */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1773 OPTGROUP_NONE, /* optinfo_flags */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1774 TV_IPA_PURE_CONST, /* tv_id */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1775 0, /* properties_required */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1776 0, /* properties_provided */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1777 0, /* properties_destroyed */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1778 0, /* todo_flags_start */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1779 0, /* todo_flags_finish */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1780 };
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1781
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1782 class pass_local_pure_const : public gimple_opt_pass
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1783 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1784 public:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1785 pass_local_pure_const (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1786 : gimple_opt_pass (pass_data_local_pure_const, ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1787 {}
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1788
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1789 /* opt_pass methods: */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1790 opt_pass * clone () { return new pass_local_pure_const (m_ctxt); }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1791 virtual bool gate (function *) { return gate_pure_const (); }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1792 virtual unsigned int execute (function *);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1793
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1794 }; // class pass_local_pure_const
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1795
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1796 unsigned int
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1797 pass_local_pure_const::execute (function *fun)
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1798 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1799 bool changed = false;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1800 funct_state l;
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1801 bool skip;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1802 struct cgraph_node *node;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1803
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1804 node = cgraph_node::get (current_function_decl);
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1805 skip = skip_function_for_local_pure_const (node);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1806
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1807 if (!warn_suggest_attribute_const
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1808 && !warn_suggest_attribute_pure
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1809 && skip)
b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1810 return 0;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1811
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1812 l = analyze_function (node, false);
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1813
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1814 /* Do NORETURN discovery. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1815 if (!skip && !TREE_THIS_VOLATILE (current_function_decl)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1816 && EDGE_COUNT (EXIT_BLOCK_PTR_FOR_FN (fun)->preds) == 0)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1817 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1818 warn_function_noreturn (fun->decl);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1819 if (dump_file)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1820 fprintf (dump_file, "Function found to be noreturn: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1821 current_function_name ());
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1822
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1823 /* Update declaration and reduce profile to executed once. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1824 TREE_THIS_VOLATILE (current_function_decl) = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1825 if (node->frequency > NODE_FREQUENCY_EXECUTED_ONCE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1826 node->frequency = NODE_FREQUENCY_EXECUTED_ONCE;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1827
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1828 changed = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1829 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 63 diff changeset	1830
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1831 switch (l->pure_const_state)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1832 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1833 case IPA_CONST:
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1834 if (!TREE_READONLY (current_function_decl))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1835 {
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1836 warn_function_const (current_function_decl, !l->looping);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1837 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1838 fprintf (dump_file, "Function found to be %sconst: %s\n",
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1839 l->looping ? "looping " : "",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1840 current_function_name ());
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1841 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1842 else if (DECL_LOOPING_CONST_OR_PURE_P (current_function_decl)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1843 && !l->looping)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1844 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1845 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1846 fprintf (dump_file, "Function found to be non-looping: %s\n",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1847 current_function_name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1848 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1849 if (!skip && node->set_const_flag (true, l->looping))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1850 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1851 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1852 fprintf (dump_file, "Declaration updated to be %sconst: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1853 l->looping ? "looping " : "",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1854 current_function_name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1855 changed = true;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1856 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1857 break;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1858
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1859 case IPA_PURE:
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1860 if (!DECL_PURE_P (current_function_decl))
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1861 {
63 b7f97abdc517 update gcc from gcc-4.5.0 to gcc-4.6 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1862 warn_function_pure (current_function_decl, !l->looping);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1863 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1864 fprintf (dump_file, "Function found to be %spure: %s\n",
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1865 l->looping ? "looping " : "",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1866 current_function_name ());
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1867 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1868 else if (DECL_LOOPING_CONST_OR_PURE_P (current_function_decl)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1869 && !l->looping)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1870 {
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1871 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1872 fprintf (dump_file, "Function found to be non-looping: %s\n",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1873 current_function_name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1874 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1875 if (!skip && node->set_pure_flag (true, l->looping))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1876 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1877 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1878 fprintf (dump_file, "Declaration updated to be %spure: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1879 l->looping ? "looping " : "",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1880 current_function_name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1881 changed = true;
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1882 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1883 break;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1884
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1885 default:
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1886 break;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1887 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1888 if (!l->can_throw && !TREE_NOTHROW (current_function_decl))
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1889 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1890 node->set_nothrow_flag (true);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1891 changed = true;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1892 if (dump_file)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1893 fprintf (dump_file, "Function found to be nothrow: %s\n",
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1894 current_function_name ());
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1895 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1896 free (l);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1897 if (changed)
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1898 return execute_fixup_cfg ();
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1899 else
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1900 return 0;
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1901 }
77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1902
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1903 } // anon namespace
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1904
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1905 gimple_opt_pass *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1906 make_pass_local_pure_const (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1907 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1908 return new pass_local_pure_const (ctxt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1909 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1910
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1911 /* Emit noreturn warnings. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1912
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1913 namespace {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1914
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1915 const pass_data pass_data_warn_function_noreturn =
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1916 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1917 GIMPLE_PASS, /* type */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1918 "warn_function_noreturn", / name */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1919 OPTGROUP_NONE, /* optinfo_flags */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1920 TV_NONE, /* tv_id */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1921 PROP_cfg, /* properties_required */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1922 0, /* properties_provided */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1923 0, /* properties_destroyed */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1924 0, /* todo_flags_start */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1925 0, /* todo_flags_finish */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1926 };
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1927
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1928 class pass_warn_function_noreturn : public gimple_opt_pass
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1929 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1930 public:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1931 pass_warn_function_noreturn (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1932 : gimple_opt_pass (pass_data_warn_function_noreturn, ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1933 {}
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1934
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1935 /* opt_pass methods: */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1936 virtual bool gate (function *) { return warn_suggest_attribute_noreturn; }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1937 virtual unsigned int execute (function *fun)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1938 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1939 if (!TREE_THIS_VOLATILE (current_function_decl)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1940 && EDGE_COUNT (EXIT_BLOCK_PTR_FOR_FN (fun)->preds) == 0)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1941 warn_function_noreturn (current_function_decl);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1942 return 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1943 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1944
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1945 }; // class pass_warn_function_noreturn
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1946
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1947 } // anon namespace
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1948
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1949 gimple_opt_pass *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1950 make_pass_warn_function_noreturn (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1951 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1952 return new pass_warn_function_noreturn (ctxt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1953 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1954
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1955 /* Simple local pass for pure const discovery reusing the analysis from
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1956 ipa_pure_const. This pass is effective when executed together with
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1957 other optimization passes in early optimization pass queue. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1958
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1959 namespace {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1960
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1961 const pass_data pass_data_nothrow =
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1962 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1963 GIMPLE_PASS, /* type */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1964 "nothrow", /* name */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1965 OPTGROUP_NONE, /* optinfo_flags */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1966 TV_IPA_PURE_CONST, /* tv_id */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1967 0, /* properties_required */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1968 0, /* properties_provided */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1969 0, /* properties_destroyed */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1970 0, /* todo_flags_start */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1971 0, /* todo_flags_finish */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1972 };
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1973
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1974 class pass_nothrow : public gimple_opt_pass
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	1975 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1976 public:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1977 pass_nothrow (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1978 : gimple_opt_pass (pass_data_nothrow, ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1979 {}
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1980
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1981 /* opt_pass methods: */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1982 opt_pass * clone () { return new pass_nothrow (m_ctxt); }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1983 virtual bool gate (function *) { return optimize; }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1984 virtual unsigned int execute (function *);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1985
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1986 }; // class pass_nothrow
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1987
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1988 unsigned int
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1989 pass_nothrow::execute (function *)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1990 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1991 struct cgraph_node *node;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1992 basic_block this_block;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1993
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1994 if (TREE_NOTHROW (current_function_decl))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1995 return 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1996
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1997 node = cgraph_node::get (current_function_decl);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1998
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1999 /* We run during lowering, we can not really use availability yet. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2000 if (cgraph_node::get (current_function_decl)->get_availability ()
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2001 <= AVAIL_INTERPOSABLE)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2002 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2003 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2004 fprintf (dump_file, "Function is interposable;"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2005 " not analyzing.\n");
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2006 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2007 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2008
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2009 FOR_EACH_BB_FN (this_block, cfun)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2010 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2011 for (gimple_stmt_iterator gsi = gsi_start_bb (this_block);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2012 !gsi_end_p (gsi);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2013 gsi_next (&gsi))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2014 if (stmt_can_throw_external (gsi_stmt (gsi)))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2015 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2016 if (is_gimple_call (gsi_stmt (gsi)))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2017 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2018 tree callee_t = gimple_call_fndecl (gsi_stmt (gsi));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2019 if (callee_t && recursive_call_p (current_function_decl,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2020 callee_t))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2021 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2022 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2023
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2024 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2025 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2026 fprintf (dump_file, "Statement can throw: ");
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2027 print_gimple_stmt (dump_file, gsi_stmt (gsi), 0);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2028 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2029 return 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2030 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2031 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2032
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2033 node->set_nothrow_flag (true);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2034
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2035 bool cfg_changed = false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2036 if (self_recursive_p (node))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2037 FOR_EACH_BB_FN (this_block, cfun)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2038 if (gimple *g = last_stmt (this_block))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2039 if (is_gimple_call (g))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2040 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2041 tree callee_t = gimple_call_fndecl (g);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2042 if (callee_t
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2043 && recursive_call_p (current_function_decl, callee_t)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2044 && maybe_clean_eh_stmt (g)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2045 && gimple_purge_dead_eh_edges (this_block))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2046 cfg_changed = true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2047 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2048
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2049 if (dump_file)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2050 fprintf (dump_file, "Function found to be nothrow: %s\n",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2051 current_function_name ());
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2052 return cfg_changed ? TODO_cleanup_cfg : 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2053 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2054
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2055 } // anon namespace
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2056
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2057 gimple_opt_pass *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2058 make_pass_nothrow (gcc::context *ctxt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2059 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2060 return new pass_nothrow (ctxt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	2061 }

Mercurial > hg > CbC > CbC_gcc

annotate gcc/ipa-pure-const.c @ 111:04ced10e8804