annotate gcc/predict.def @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents 77e2b8dfacca
children 84e7813d76e9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 /* Definitions for the branch prediction routines in the GNU compiler.
111
kono
parents: 55
diff changeset
2 Copyright (C) 2001-2017 Free Software Foundation, Inc.
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
3
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 This file is part of GCC.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
5
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 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
7 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
8 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
9 version.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
10
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 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
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
13 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
14 for more details.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
15
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 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
17 along with GCC; see the file COPYING3. If not see
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 <http://www.gnu.org/licenses/>. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
19
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 /* Before including this file, you should define a macro:
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
21
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 DEF_PREDICTOR (ENUM, NAME, HITRATE)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
23
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
24 This macro will be called once for each predictor. The ENUM will
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
25 be of type `enum predictor', and will enumerate all supported
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
26 predictors. The order of DEF_PREDICTOR calls is important, as
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
27 in the first match combining heuristics, the predictor appearing
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
28 first in this file will win.
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 NAME is used in the debugging output to determine predictor type.
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
31
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
32 HITRATE is the probability that edge predicted by predictor as taken
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
33 will be really taken (so it should be always above
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
34 REG_BR_PROB_BASE / 2). */
55
77e2b8dfacca update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
35
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
36
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
37 /* A value used as final outcome of all heuristics. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
38 DEF_PREDICTOR (PRED_COMBINED, "combined", PROB_ALWAYS, 0)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
39
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
40 /* An outcome estimated by Dempster-Shaffer theory. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
41 DEF_PREDICTOR (PRED_DS_THEORY, "DS theory", PROB_ALWAYS, 0)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
42
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
43 /* A combined heuristics using probability determined by first
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
44 matching heuristics from this list. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
45 DEF_PREDICTOR (PRED_FIRST_MATCH, "first match", PROB_ALWAYS, 0)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
46
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
47 /* Heuristic applying when no heuristic below applies. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
48 DEF_PREDICTOR (PRED_NO_PREDICTION, "no prediction", PROB_ALWAYS, 0)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
49
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
50 /* Mark unconditional jump as taken. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
51 DEF_PREDICTOR (PRED_UNCONDITIONAL, "unconditional jump", PROB_ALWAYS,
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
52 PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
53
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
54 /* Use number of loop iterations determined by # of iterations
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
55 analysis to set probability. We don't want to use Dempster-Shaffer
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
56 theory here, as the predictions is exact. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
57 DEF_PREDICTOR (PRED_LOOP_ITERATIONS, "loop iterations", PROB_ALWAYS,
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
58 PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
59
111
kono
parents: 55
diff changeset
60 /* Assume that any given atomic operation has low contention,
kono
parents: 55
diff changeset
61 and thus the compare-and-swap operation succeeds. */
kono
parents: 55
diff changeset
62 DEF_PREDICTOR (PRED_COMPARE_AND_SWAP, "compare and swap", PROB_VERY_LIKELY,
kono
parents: 55
diff changeset
63 PRED_FLAG_FIRST_MATCH)
kono
parents: 55
diff changeset
64
kono
parents: 55
diff changeset
65 /* Hints dropped by user via __builtin_expect feature. Note: the
kono
parents: 55
diff changeset
66 probability of PROB_VERY_LIKELY is now overwritten by param
kono
parents: 55
diff changeset
67 builtin_expect_probability with a default value of HITRATE(90).
kono
parents: 55
diff changeset
68 Refer to param.def for details. */
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
69 DEF_PREDICTOR (PRED_BUILTIN_EXPECT, "__builtin_expect", PROB_VERY_LIKELY,
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
70 PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
71
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
72 /* Use number of loop iterations guessed by the contents of the loop. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
73 DEF_PREDICTOR (PRED_LOOP_ITERATIONS_GUESSED, "guessed loop iterations",
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
74 PROB_ALWAYS, PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
75
111
kono
parents: 55
diff changeset
76 /* Use number of loop iterations guessed by the contents of the loop. */
kono
parents: 55
diff changeset
77 DEF_PREDICTOR (PRED_LOOP_ITERATIONS_MAX, "guessed loop iterations",
kono
parents: 55
diff changeset
78 PROB_ALWAYS, PRED_FLAG_FIRST_MATCH)
kono
parents: 55
diff changeset
79
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
80 /* Branch containing goto is probably not taken. */
111
kono
parents: 55
diff changeset
81 DEF_PREDICTOR (PRED_CONTINUE, "continue", HITRATE (67), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
82
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
83 /* Branch to basic block containing call marked by noreturn attribute. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
84 DEF_PREDICTOR (PRED_NORETURN, "noreturn call", PROB_VERY_LIKELY,
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
85 PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
86
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
87 /* Branch to basic block containing call marked by cold function attribute. */
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
88 DEF_PREDICTOR (PRED_COLD_FUNCTION, "cold function call", PROB_VERY_LIKELY,
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
89 PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
90
111
kono
parents: 55
diff changeset
91 /* Edge causing loop to terminate is probably not taken. */
kono
parents: 55
diff changeset
92 DEF_PREDICTOR (PRED_LOOP_EXIT, "loop exit", HITRATE (85),
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
93 PRED_FLAG_FIRST_MATCH)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
94
111
kono
parents: 55
diff changeset
95 /* Same as LOOP_EXIT but for loops containing recursive call. */
kono
parents: 55
diff changeset
96 DEF_PREDICTOR (PRED_LOOP_EXIT_WITH_RECURSION, "loop exit with recursion",
kono
parents: 55
diff changeset
97 HITRATE (72), PRED_FLAG_FIRST_MATCH)
kono
parents: 55
diff changeset
98
kono
parents: 55
diff changeset
99 /* Edge causing loop to terminate by computing value used by later
kono
parents: 55
diff changeset
100 conditional. */
kono
parents: 55
diff changeset
101 DEF_PREDICTOR (PRED_LOOP_EXTRA_EXIT, "extra loop exit", HITRATE (83),
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
102 PRED_FLAG_FIRST_MATCH)
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 /* Pointers are usually not NULL. */
111
kono
parents: 55
diff changeset
105 DEF_PREDICTOR (PRED_POINTER, "pointer", HITRATE (70), 0)
kono
parents: 55
diff changeset
106 DEF_PREDICTOR (PRED_TREE_POINTER, "pointer (on trees)", HITRATE (70), 0)
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 /* NE is probable, EQ not etc... */
111
kono
parents: 55
diff changeset
109 DEF_PREDICTOR (PRED_OPCODE_POSITIVE, "opcode values positive", HITRATE (64), 0)
kono
parents: 55
diff changeset
110 DEF_PREDICTOR (PRED_OPCODE_NONEQUAL, "opcode values nonequal", HITRATE (66), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
111 DEF_PREDICTOR (PRED_FPOPCODE, "fp_opcode", HITRATE (90), 0)
111
kono
parents: 55
diff changeset
112 DEF_PREDICTOR (PRED_TREE_OPCODE_POSITIVE, "opcode values positive (on trees)",
kono
parents: 55
diff changeset
113 HITRATE (64), 0)
kono
parents: 55
diff changeset
114 DEF_PREDICTOR (PRED_TREE_OPCODE_NONEQUAL, "opcode values nonequal (on trees)",
kono
parents: 55
diff changeset
115 HITRATE (66), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
116 DEF_PREDICTOR (PRED_TREE_FPOPCODE, "fp_opcode (on trees)", HITRATE (90), 0)
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
117
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
118 /* Branch guarding call is probably taken. */
111
kono
parents: 55
diff changeset
119 DEF_PREDICTOR (PRED_CALL, "call", HITRATE (67), 0)
kono
parents: 55
diff changeset
120
kono
parents: 55
diff changeset
121 /* PRED_CALL is not very reliable predictor and it turns out to be even
kono
parents: 55
diff changeset
122 less reliable for indirect calls and polymorphic calls. For spec2k6
kono
parents: 55
diff changeset
123 the predictio nis slightly in the direction of taking the call. */
kono
parents: 55
diff changeset
124 DEF_PREDICTOR (PRED_INDIR_CALL, "indirect call", HITRATE (86), 0)
kono
parents: 55
diff changeset
125 DEF_PREDICTOR (PRED_POLYMORPHIC_CALL, "polymorphic call", HITRATE (59), 0)
kono
parents: 55
diff changeset
126
kono
parents: 55
diff changeset
127 /* Recursive calls are usually not taken or the function will recurse
kono
parents: 55
diff changeset
128 indefinitely. */
kono
parents: 55
diff changeset
129 DEF_PREDICTOR (PRED_RECURSIVE_CALL, "recursive call", HITRATE (75), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
130
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
131 /* Branch causing function to terminate is probably not taken. */
111
kono
parents: 55
diff changeset
132 DEF_PREDICTOR (PRED_TREE_EARLY_RETURN, "early return (on trees)", HITRATE (66),
kono
parents: 55
diff changeset
133 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
134
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
135 /* Branch containing goto is probably not taken. */
111
kono
parents: 55
diff changeset
136 DEF_PREDICTOR (PRED_GOTO, "goto", HITRATE (66), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
137
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
138 /* Branch ending with return constant is probably not taken. */
111
kono
parents: 55
diff changeset
139 DEF_PREDICTOR (PRED_CONST_RETURN, "const return", HITRATE (69), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
140
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
141 /* Branch ending with return negative constant is probably not taken. */
111
kono
parents: 55
diff changeset
142 DEF_PREDICTOR (PRED_NEGATIVE_RETURN, "negative return", HITRATE (98), 0)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
143
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
144 /* Branch ending with return; is probably not taken */
111
kono
parents: 55
diff changeset
145 DEF_PREDICTOR (PRED_NULL_RETURN, "null return", HITRATE (91), 0)
kono
parents: 55
diff changeset
146
kono
parents: 55
diff changeset
147 /* Branches to compare induction variable to a loop bound is
kono
parents: 55
diff changeset
148 extremely likely. */
kono
parents: 55
diff changeset
149 DEF_PREDICTOR (PRED_LOOP_IV_COMPARE_GUESS, "guess loop iv compare",
kono
parents: 55
diff changeset
150 HITRATE (98), 0)
kono
parents: 55
diff changeset
151
kono
parents: 55
diff changeset
152 /* Use number of loop iterations determined by # of iterations analysis
kono
parents: 55
diff changeset
153 to set probability of branches that compares IV to loop bound variable. */
kono
parents: 55
diff changeset
154 DEF_PREDICTOR (PRED_LOOP_IV_COMPARE, "loop iv compare", PROB_VERY_LIKELY,
kono
parents: 55
diff changeset
155 PRED_FLAG_FIRST_MATCH)
kono
parents: 55
diff changeset
156
kono
parents: 55
diff changeset
157 /* In the following code
kono
parents: 55
diff changeset
158 for (loop1)
kono
parents: 55
diff changeset
159 if (cond)
kono
parents: 55
diff changeset
160 for (loop2)
kono
parents: 55
diff changeset
161 body;
kono
parents: 55
diff changeset
162 guess that cond is unlikely. */
kono
parents: 55
diff changeset
163 DEF_PREDICTOR (PRED_LOOP_GUARD, "loop guard", HITRATE (66), 0)
kono
parents: 55
diff changeset
164
kono
parents: 55
diff changeset
165 /* Same but for loops containing recursion. */
kono
parents: 55
diff changeset
166 DEF_PREDICTOR (PRED_LOOP_GUARD_WITH_RECURSION, "loop guard with recursion",
kono
parents: 55
diff changeset
167 HITRATE (85), 0)
kono
parents: 55
diff changeset
168
kono
parents: 55
diff changeset
169 /* Branches to hot labels are likely. */
kono
parents: 55
diff changeset
170 DEF_PREDICTOR (PRED_HOT_LABEL, "hot label", HITRATE (85), 0)
kono
parents: 55
diff changeset
171
kono
parents: 55
diff changeset
172 /* Branches to cold labels are extremely unlikely. */
kono
parents: 55
diff changeset
173 DEF_PREDICTOR (PRED_COLD_LABEL, "cold label", PROB_VERY_LIKELY,
kono
parents: 55
diff changeset
174 PRED_FLAG_FIRST_MATCH)
kono
parents: 55
diff changeset
175
kono
parents: 55
diff changeset
176
kono
parents: 55
diff changeset
177 /* The following predictors are used in Fortran. */
kono
parents: 55
diff changeset
178
kono
parents: 55
diff changeset
179 /* Branch leading to an integer overflow are extremely unlikely. */
kono
parents: 55
diff changeset
180 DEF_PREDICTOR (PRED_FORTRAN_OVERFLOW, "Fortran overflow", PROB_ALWAYS,
kono
parents: 55
diff changeset
181 PRED_FLAG_FIRST_MATCH)
0
a06113de4d67 first commit
kent <kent@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
182
111
kono
parents: 55
diff changeset
183 /* Branch leading to a failure status are unlikely. This can occur for out
kono
parents: 55
diff changeset
184 of memory. This predictor only occurs when the user explicitly asked
kono
parents: 55
diff changeset
185 for a return status. By default, the code aborts,
kono
parents: 55
diff changeset
186 which is handled via PRED_NORETURN. */
kono
parents: 55
diff changeset
187 DEF_PREDICTOR (PRED_FORTRAN_FAIL_ALLOC, "Fortran fail alloc",
kono
parents: 55
diff changeset
188 PROB_VERY_LIKELY, 0)
kono
parents: 55
diff changeset
189
kono
parents: 55
diff changeset
190 /* Predictor is used for an allocation of an already allocated memory or
kono
parents: 55
diff changeset
191 deallocating an already deallocated allocatable. */
kono
parents: 55
diff changeset
192 DEF_PREDICTOR (PRED_FORTRAN_REALLOC, "Fortran repeated allocation/deallocation",
kono
parents: 55
diff changeset
193 PROB_LIKELY, 0)
kono
parents: 55
diff changeset
194
kono
parents: 55
diff changeset
195 /* Branch leading to an I/O failure status are unlikely. This predictor is
kono
parents: 55
diff changeset
196 used for I/O failures such as for invalid unit numbers. This predictor
kono
parents: 55
diff changeset
197 only occurs when the user explicitly asked for a return status. By default,
kono
parents: 55
diff changeset
198 the code aborts, which is handled via PRED_NORETURN. */
kono
parents: 55
diff changeset
199 DEF_PREDICTOR (PRED_FORTRAN_FAIL_IO, "Fortran fail IO", HITRATE (85), 0)
kono
parents: 55
diff changeset
200
kono
parents: 55
diff changeset
201 /* Branch leading to a run-time warning message which is printed only once
kono
parents: 55
diff changeset
202 are unlikely. The print-warning branch itself can be likely or unlikely. */
kono
parents: 55
diff changeset
203 DEF_PREDICTOR (PRED_FORTRAN_WARN_ONCE, "Fortran warn once", HITRATE (75), 0)
kono
parents: 55
diff changeset
204
kono
parents: 55
diff changeset
205 /* Branch belonging to a zero-sized array. */
kono
parents: 55
diff changeset
206 DEF_PREDICTOR (PRED_FORTRAN_SIZE_ZERO, "Fortran zero-sized array", \
kono
parents: 55
diff changeset
207 HITRATE (99), 0)
kono
parents: 55
diff changeset
208
kono
parents: 55
diff changeset
209 /* Branch belonging to an invalid bound index, in a context where it is
kono
parents: 55
diff changeset
210 standard conform and well defined but rather pointless and, hence, rather
kono
parents: 55
diff changeset
211 unlikely to occur. */
kono
parents: 55
diff changeset
212 DEF_PREDICTOR (PRED_FORTRAN_INVALID_BOUND, "Fortran invalid bound", \
kono
parents: 55
diff changeset
213 HITRATE (90), 0)
kono
parents: 55
diff changeset
214
kono
parents: 55
diff changeset
215 /* Branch belonging to the handling of absent optional arguments. This
kono
parents: 55
diff changeset
216 predictor is used when an optional dummy argument, associated with an
kono
parents: 55
diff changeset
217 absent argument, is passed on as actual argument to another procedure,
kono
parents: 55
diff changeset
218 which in turn has an optional argument. */
kono
parents: 55
diff changeset
219 DEF_PREDICTOR (PRED_FORTRAN_ABSENT_DUMMY, "Fortran absent dummy", \
kono
parents: 55
diff changeset
220 HITRATE (60), 0)
kono
parents: 55
diff changeset
221
kono
parents: 55
diff changeset
222 /* Fortran DO statement generates a pre-header guard:
kono
parents: 55
diff changeset
223 empty = (step > 0 ? to < from : to > from), which can be predicted
kono
parents: 55
diff changeset
224 to be very likely. */
kono
parents: 55
diff changeset
225 DEF_PREDICTOR (PRED_FORTRAN_LOOP_PREHEADER, "Fortran loop preheader", \
kono
parents: 55
diff changeset
226 HITRATE (99), 0)