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_CLASS_CASTS) |
44 DISABLE(OPT_SUPPRESS_DOWNCAST_OPT) |
45 ENABLE(OPT_NORMALIZE) |
46 ENABLE(OPT_TAIL_RECURSION) |
47 ENABLE(OPT_PRECISE_EXC_CONTEXT) |
48 DISABLE(OPT_FRAGILE_OPS) |
49 ENABLE(OPT_IF_CONVERSION) |
50 ENABLE(OPT_REAL_FUNC_CALL) |
53 optimization_state_t libFIRM_verb =
54 DISABLE(OPT_OPTIMIZED) |
56 DISABLE(OPT_GLOBAL_CSE) |
57 DISABLE(OPT_LOOP_UNROLLING) |
58 DISABLE(OPT_STRENGTH_RED) |
59 DISABLE(OPT_CONSTANT_FOLDING) |
60 DISABLE(OPT_REDUNDANT_LOADSTORE) |
61 DISABLE(OPT_UNREACHABLE_CODE) |
62 DISABLE(OPT_CONTROL_FLOW_STRAIGHTENING) |
63 DISABLE(OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION) |
64 DISABLE(OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION) |
65 DISABLE(OPT_CRITICAL_EDGES) |
66 DISABLE(OPT_DEAD_NODE_ELIMINATION) |
67 DISABLE(OPT_DEAD_METHOD_ELIMINATION) |
68 DISABLE(OPT_REASSOCIATION) |
70 DISABLE(OPT_DYN_METH_DISPATCH) |
71 DISABLE(OPT_CLASS_CASTS) |
72 DISABLE(OPT_NORMALIZE) |
73 DISABLE(OPT_TAIL_RECURSION) |
74 DISABLE(OPT_PRECISE_EXC_CONTEXT) |
75 DISABLE(OPT_FRAGILE_OPS) |
76 DISABLE(OPT_IF_CONVERSION) |
77 DISABLE(OPT_REAL_FUNC_CALL) |
80 /** The Firm verbosity level */
81 int firm_verbosity_level;
83 /* set the flags with set_flagname, get the flag with get_flagname */
84 void set_opt_cse (int value)
87 libFIRM_opt |= OPT_CSE;
89 libFIRM_opt &= ~OPT_CSE;
92 int (get_opt_cse)(void) {
93 return _get_opt_cse();
96 void set_opt_global_cse(int value)
99 libFIRM_opt |= OPT_GLOBAL_CSE;
101 libFIRM_opt &= ~OPT_GLOBAL_CSE;
104 void set_opt_loop_unrolling (int value)
107 libFIRM_opt |= OPT_LOOP_UNROLLING;
109 libFIRM_opt &= ~OPT_LOOP_UNROLLING;
112 void set_opt_loop_unrolling_verbose (int value)
115 libFIRM_verb |= OPT_LOOP_UNROLLING;
117 libFIRM_verb &= ~OPT_LOOP_UNROLLING;
120 void set_opt_strength_red (int value)
123 libFIRM_opt |= OPT_STRENGTH_RED;
125 libFIRM_opt &= ~OPT_STRENGTH_RED;
128 void set_opt_strength_red_verbose (int value)
131 libFIRM_verb |= OPT_STRENGTH_RED;
133 libFIRM_verb &= ~OPT_STRENGTH_RED;
137 set_opt_constant_folding(int value)
140 libFIRM_opt |= OPT_CONSTANT_FOLDING;
142 libFIRM_opt &= ~OPT_CONSTANT_FOLDING;
146 set_opt_redundant_LoadStore(int value) {
148 libFIRM_opt |= OPT_REDUNDANT_LOADSTORE;
150 libFIRM_opt &= ~OPT_REDUNDANT_LOADSTORE;
154 set_opt_unreachable_code(int value)
157 libFIRM_opt |= OPT_UNREACHABLE_CODE;
159 libFIRM_opt &= ~OPT_UNREACHABLE_CODE;
162 void set_opt_control_flow(int value)
164 set_opt_control_flow_straightening(value);
165 set_opt_control_flow_weak_simplification(value);
166 set_opt_control_flow_strong_simplification(value);
167 set_opt_critical_edges(value);
170 /* Performs Straightening */
171 void set_opt_control_flow_straightening(int value)
174 libFIRM_opt |= OPT_CONTROL_FLOW_STRAIGHTENING;
176 libFIRM_opt &= ~OPT_CONTROL_FLOW_STRAIGHTENING;
179 /* Performs if simplifications in local optimizations. */
180 void set_opt_control_flow_weak_simplification(int value)
183 libFIRM_opt |= OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION;
185 libFIRM_opt &= ~OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION;
188 /* Performs strong if and loop simplification (in optimize_cf). */
189 void set_opt_control_flow_strong_simplification(int value)
192 libFIRM_opt |= OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION;
194 libFIRM_opt &= ~OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION;
197 void set_opt_critical_edges(int value)
200 libFIRM_opt |= OPT_CRITICAL_EDGES;
202 libFIRM_opt &= ~OPT_CRITICAL_EDGES;
205 void set_opt_reassociation(int value)
208 libFIRM_opt |= OPT_REASSOCIATION;
210 libFIRM_opt &= ~OPT_REASSOCIATION;
213 void set_opt_dead_node_elimination(int value)
216 libFIRM_opt |= OPT_DEAD_NODE_ELIMINATION;
218 libFIRM_opt &= ~OPT_DEAD_NODE_ELIMINATION;
221 void set_opt_dead_method_elimination (int value) {
223 libFIRM_opt |= OPT_DEAD_METHOD_ELIMINATION;
225 libFIRM_opt &= ~OPT_DEAD_METHOD_ELIMINATION;
228 void set_opt_dead_method_elimination_verbose (int value) {
230 libFIRM_verb |= OPT_DEAD_METHOD_ELIMINATION;
232 libFIRM_verb &= ~OPT_DEAD_METHOD_ELIMINATION;
235 void set_optimize(int value)
238 libFIRM_opt |= OPT_OPTIMIZED;
240 libFIRM_opt &= ~OPT_OPTIMIZED;
243 int get_optimize(void)
245 return get_opt_optimize();
249 void set_firm_verbosity (int value) {
250 firm_verbosity_level = value;
253 int (get_firm_verbosity) (void) {
254 return _get_firm_verbosity();
259 /* Enable/Disables inlining. */
260 void set_opt_inline(int value)
263 libFIRM_opt |= OPT_INLINE;
265 libFIRM_opt &= ~OPT_INLINE;
268 /* Enable/Disable optimization of dynamic method dispatch */
269 void set_opt_dyn_meth_dispatch (int value)
272 libFIRM_opt |= OPT_DYN_METH_DISPATCH;
274 libFIRM_opt &= ~OPT_DYN_METH_DISPATCH;
277 int (get_opt_dyn_meth_dispatch)(void) {
278 return _get_opt_dyn_meth_dispatch();
281 void set_opt_optimize_class_casts (int value)
284 libFIRM_opt |= OPT_CLASS_CASTS;
286 libFIRM_opt &= ~OPT_CLASS_CASTS;
288 int (get_opt_optimize_class_casts) (void) {
289 return _get_opt_optimize_class_casts();
291 void set_opt_optimize_class_casts_verbose (int value)
294 libFIRM_verb |= OPT_CLASS_CASTS;
296 libFIRM_verb &= ~OPT_CLASS_CASTS;
298 int (get_opt_optimize_class_casts_verbose) (void) {
299 return _get_opt_optimize_class_casts_verbose();
301 void set_opt_suppress_downcast_optimization(int value)
304 libFIRM_opt |= OPT_SUPPRESS_DOWNCAST_OPT;
306 libFIRM_opt &= ~OPT_SUPPRESS_DOWNCAST_OPT;
308 int (get_opt_suppress_downcast_optimization)(void) {
309 return _get_opt_suppress_downcast_optimization();
313 /* Enable/Disable normalizations of the firm representation. */
314 void set_opt_normalize(int value)
317 libFIRM_opt |= OPT_NORMALIZE;
319 libFIRM_opt &= ~OPT_NORMALIZE;
322 /* Enable/Disable optimization of tail-recursion calls. */
323 void set_opt_tail_recursion(int value)
326 libFIRM_opt |= OPT_TAIL_RECURSION;
328 libFIRM_opt &= ~OPT_TAIL_RECURSION;
331 /* Enable/Disable optimization of tail-recursion calls. */
332 void set_opt_tail_recursion_verbose(int value)
335 libFIRM_verb |= OPT_TAIL_RECURSION;
337 libFIRM_verb &= ~OPT_TAIL_RECURSION;
340 /* Enable/Disable precise exception context. */
341 void set_opt_precise_exc_context(int value)
343 #if PRECISE_EXC_CONTEXT
345 libFIRM_opt |= OPT_PRECISE_EXC_CONTEXT;
347 libFIRM_opt &= ~OPT_PRECISE_EXC_CONTEXT;
351 void set_opt_fragile_ops(int value)
354 libFIRM_opt |= OPT_FRAGILE_OPS;
356 libFIRM_opt &= ~OPT_FRAGILE_OPS;
359 /* Enable/Disable if conversion. */
360 void set_opt_if_conversion(int value)
363 libFIRM_opt |= OPT_IF_CONVERSION;
365 libFIRM_opt &= ~OPT_IF_CONVERSION;
368 /* Enable/Disable real function call optimization. */
369 void set_opt_real_function_call(int value)
372 libFIRM_opt |= OPT_REAL_FUNC_CALL;
374 libFIRM_opt &= ~OPT_REAL_FUNC_CALL;
377 /* Save the current optimization state. */
378 void save_optimization_state(optimization_state_t *state)
380 *state = libFIRM_opt;
383 /* Restore the current optimization state. */
384 void restore_optimization_state(const optimization_state_t *state)
386 libFIRM_opt = *state;