3 * File name: ir/ir/irflag.c
4 * Purpose: Flags to control optimizations.
5 * Author: Christian Schaefer, Goetz Lindenmaier
9 * Copyright: (c) 1999-2003 Universität Karlsruhe
10 * Licence: This file protected by GPL - GNU GENERAL PUBLIC LICENSE.
17 #include "firm_common.h"
20 /* DISABLE - don't do this optimization
21 ENABLE - lets see, if there is a better graph */
25 optimization_state_t libFIRM_opt =
26 ENABLE(OPT_OPTIMIZED) |
28 DISABLE(OPT_GLOBAL_CSE) |
29 ENABLE(OPT_LOOP_UNROLLING) |
30 ENABLE(OPT_STRENGTH_RED) |
31 ENABLE(OPT_CONSTANT_FOLDING) |
32 ENABLE(OPT_REDUNDANT_LOADSTORE) |
33 ENABLE(OPT_UNREACHABLE_CODE) |
34 ENABLE(OPT_CONTROL_FLOW_STRAIGHTENING) |
35 ENABLE(OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION) |
36 ENABLE(OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION) |
37 ENABLE(OPT_CRITICAL_EDGES) |
38 ENABLE(OPT_DEAD_NODE_ELIMINATION) |
39 ENABLE(OPT_DEAD_METHOD_ELIMINATION) |
40 ENABLE(OPT_REASSOCIATION) |
42 ENABLE(OPT_DYN_METH_DISPATCH) |
43 ENABLE(OPT_NORMALIZE) |
44 ENABLE(OPT_TAIL_RECURSION) |
45 ENABLE(OPT_PRECISE_EXC_CONTEXT) |
46 DISABLE(OPT_FRAGILE_OPS) |
47 ENABLE(OPT_IF_CONVERSION) |
48 ENABLE(OPT_REAL_FUNC_CALL) |
51 optimization_state_t libFIRM_verb =
52 DISABLE(OPT_OPTIMIZED) |
54 DISABLE(OPT_GLOBAL_CSE) |
55 DISABLE(OPT_LOOP_UNROLLING) |
56 DISABLE(OPT_STRENGTH_RED) |
57 DISABLE(OPT_CONSTANT_FOLDING) |
58 DISABLE(OPT_REDUNDANT_LOADSTORE) |
59 DISABLE(OPT_UNREACHABLE_CODE) |
60 DISABLE(OPT_CONTROL_FLOW_STRAIGHTENING) |
61 DISABLE(OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION) |
62 DISABLE(OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION) |
63 DISABLE(OPT_CRITICAL_EDGES) |
64 DISABLE(OPT_DEAD_NODE_ELIMINATION) |
65 DISABLE(OPT_DEAD_METHOD_ELIMINATION) |
66 DISABLE(OPT_REASSOCIATION) |
68 DISABLE(OPT_DYN_METH_DISPATCH) |
69 DISABLE(OPT_NORMALIZE) |
70 DISABLE(OPT_TAIL_RECURSION) |
71 DISABLE(OPT_PRECISE_EXC_CONTEXT) |
72 DISABLE(OPT_FRAGILE_OPS) |
73 DISABLE(OPT_IF_CONVERSION) |
74 DISABLE(OPT_REAL_FUNC_CALL) |
77 /** The Firm verbosity level */
78 int firm_verbosity_level;
80 /* set the flags with set_flagname, get the flag with get_flagname */
81 void set_opt_cse (int value)
84 libFIRM_opt |= OPT_CSE;
86 libFIRM_opt &= ~OPT_CSE;
89 int (get_opt_cse)(void) {
90 return _get_opt_cse();
93 void set_opt_global_cse(int value)
96 libFIRM_opt |= OPT_GLOBAL_CSE;
98 libFIRM_opt &= ~OPT_GLOBAL_CSE;
101 void set_opt_loop_unrolling (int value)
104 libFIRM_opt |= OPT_LOOP_UNROLLING;
106 libFIRM_opt &= ~OPT_LOOP_UNROLLING;
109 void set_opt_loop_unrolling_verbose (int value)
112 libFIRM_verb |= OPT_LOOP_UNROLLING;
114 libFIRM_verb &= ~OPT_LOOP_UNROLLING;
117 void set_opt_strength_red (int value)
120 libFIRM_opt |= OPT_STRENGTH_RED;
122 libFIRM_opt &= ~OPT_STRENGTH_RED;
125 void set_opt_strength_red_verbose (int value)
128 libFIRM_verb |= OPT_STRENGTH_RED;
130 libFIRM_verb &= ~OPT_STRENGTH_RED;
134 set_opt_constant_folding(int value)
137 libFIRM_opt |= OPT_CONSTANT_FOLDING;
139 libFIRM_opt &= ~OPT_CONSTANT_FOLDING;
143 set_opt_redundant_LoadStore(int value) {
145 libFIRM_opt |= OPT_REDUNDANT_LOADSTORE;
147 libFIRM_opt &= ~OPT_REDUNDANT_LOADSTORE;
151 set_opt_unreachable_code(int value)
154 libFIRM_opt |= OPT_UNREACHABLE_CODE;
156 libFIRM_opt &= ~OPT_UNREACHABLE_CODE;
159 void set_opt_control_flow(int value)
161 set_opt_control_flow_straightening(value);
162 set_opt_control_flow_weak_simplification(value);
163 set_opt_control_flow_strong_simplification(value);
164 set_opt_critical_edges(value);
167 /* Performs Straightening */
168 void set_opt_control_flow_straightening(int value)
171 libFIRM_opt |= OPT_CONTROL_FLOW_STRAIGHTENING;
173 libFIRM_opt &= ~OPT_CONTROL_FLOW_STRAIGHTENING;
176 /* Performs if simplifications in local optimizations. */
177 void set_opt_control_flow_weak_simplification(int value)
180 libFIRM_opt |= OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION;
182 libFIRM_opt &= ~OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION;
185 /* Performs strong if and loop simplification (in optimize_cf). */
186 void set_opt_control_flow_strong_simplification(int value)
189 libFIRM_opt |= OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION;
191 libFIRM_opt &= ~OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION;
194 void set_opt_critical_edges(int value)
197 libFIRM_opt |= OPT_CRITICAL_EDGES;
199 libFIRM_opt &= ~OPT_CRITICAL_EDGES;
202 void set_opt_reassociation(int value)
205 libFIRM_opt |= OPT_REASSOCIATION;
207 libFIRM_opt &= ~OPT_REASSOCIATION;
210 void set_opt_dead_node_elimination(int value)
213 libFIRM_opt |= OPT_DEAD_NODE_ELIMINATION;
215 libFIRM_opt &= ~OPT_DEAD_NODE_ELIMINATION;
218 void set_opt_dead_method_elimination (int value) {
220 libFIRM_opt |= OPT_DEAD_METHOD_ELIMINATION;
222 libFIRM_opt &= ~OPT_DEAD_METHOD_ELIMINATION;
225 void set_opt_dead_method_elimination_verbose (int value) {
227 libFIRM_verb |= OPT_DEAD_METHOD_ELIMINATION;
229 libFIRM_verb &= ~OPT_DEAD_METHOD_ELIMINATION;
232 void set_optimize(int value)
235 libFIRM_opt |= OPT_OPTIMIZED;
237 libFIRM_opt &= ~OPT_OPTIMIZED;
240 int get_optimize(void)
242 return get_opt_optimize();
246 void set_firm_verbosity (int value) {
247 firm_verbosity_level = value;
250 int (get_firm_verbosity) (void) {
251 return _get_firm_verbosity();
256 /* Enable/Disables inlining. */
257 void set_opt_inline(int value)
260 libFIRM_opt |= OPT_INLINE;
262 libFIRM_opt &= ~OPT_INLINE;
265 /* Enable/Disable optimization of dynamic method dispatch */
266 void set_opt_dyn_meth_dispatch (int value)
269 libFIRM_opt |= OPT_DYN_METH_DISPATCH;
271 libFIRM_opt &= ~OPT_DYN_METH_DISPATCH;
274 int (get_opt_dyn_meth_dispatch)(void) {
275 return _get_opt_dyn_meth_dispatch();
278 /* Enable/Disable normalizations of the firm representation. */
279 void set_opt_normalize(int value)
282 libFIRM_opt |= OPT_NORMALIZE;
284 libFIRM_opt &= ~OPT_NORMALIZE;
287 /* Enable/Disable optimization of tail-recursion calls. */
288 void set_opt_tail_recursion(int value)
291 libFIRM_opt |= OPT_TAIL_RECURSION;
293 libFIRM_opt &= ~OPT_TAIL_RECURSION;
296 /* Enable/Disable optimization of tail-recursion calls. */
297 void set_opt_tail_recursion_verbose(int value)
300 libFIRM_verb |= OPT_TAIL_RECURSION;
302 libFIRM_verb &= ~OPT_TAIL_RECURSION;
305 /* Enable/Disable precise exception context. */
306 void set_opt_precise_exc_context(int value)
308 #if PRECISE_EXC_CONTEXT
310 libFIRM_opt |= OPT_PRECISE_EXC_CONTEXT;
312 libFIRM_opt &= ~OPT_PRECISE_EXC_CONTEXT;
316 void set_opt_fragile_ops(int value)
319 libFIRM_opt |= OPT_FRAGILE_OPS;
321 libFIRM_opt &= ~OPT_FRAGILE_OPS;
324 /* Enable/Disable if conversion. */
325 void set_opt_if_conversion(int value)
328 libFIRM_opt |= OPT_IF_CONVERSION;
330 libFIRM_opt &= ~OPT_IF_CONVERSION;
333 /* Enable/Disable real function call optimization. */
334 void set_opt_real_function_call(int value)
337 libFIRM_opt |= OPT_IF_CONVERSION;
339 libFIRM_opt &= ~OPT_IF_CONVERSION;
342 /* Save the current optimization state. */
343 void save_optimization_state(optimization_state_t *state)
345 *state = libFIRM_opt;
348 /* Restore the current optimization state. */
349 void restore_optimization_state(const optimization_state_t *state)
351 libFIRM_opt = *state;