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_CONSTANT_FOLDING) |
30 ENABLE(OPT_UNREACHABLE_CODE) |
31 ENABLE(OPT_CONTROL_FLOW_STRAIGHTENING) |
32 ENABLE(OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION) |
33 ENABLE(OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION) |
34 ENABLE(OPT_CRITICAL_EDGES) |
35 ENABLE(OPT_DEAD_NODE_ELIMINATION) |
36 ENABLE(OPT_REASSOCIATION) |
38 ENABLE(OPT_DYN_METH_DISPATCH) |
39 ENABLE(OPT_NORMALIZE) |
40 ENABLE(OPT_TAIL_RECURSION);
42 /* set the flags with set_flagname, get the flag with get_flagname */
43 void set_opt_cse (int value)
46 libFIRM_opt |= OPT_CSE;
48 libFIRM_opt &= ~OPT_CSE;
51 void set_opt_global_cse(int value)
54 libFIRM_opt |= OPT_GLOBAL_CSE;
56 libFIRM_opt &= ~OPT_GLOBAL_CSE;
60 set_opt_constant_folding(int value)
63 libFIRM_opt |= OPT_CONSTANT_FOLDING;
65 libFIRM_opt &= ~OPT_CONSTANT_FOLDING;
69 set_opt_unreachable_code(int value)
72 libFIRM_opt |= OPT_UNREACHABLE_CODE;
74 libFIRM_opt &= ~OPT_UNREACHABLE_CODE;
77 void set_opt_control_flow(int value)
79 set_opt_control_flow_straightening(value);
80 set_opt_control_flow_weak_simplification(value);
81 set_opt_control_flow_strong_simplification(value);
82 set_opt_critical_edges(value);
85 /* Performs Straightening */
86 void set_opt_control_flow_straightening(int value)
89 libFIRM_opt |= OPT_CONTROL_FLOW_STRAIGHTENING;
91 libFIRM_opt &= ~OPT_CONTROL_FLOW_STRAIGHTENING;
94 /* Performs if simplifications in local optimizations. */
95 void set_opt_control_flow_weak_simplification(int value)
98 libFIRM_opt |= OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION;
100 libFIRM_opt &= ~OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION;
103 /* Performs strong if and loop simplification (in optimize_cf). */
104 void set_opt_control_flow_strong_simplification(int value)
107 libFIRM_opt |= OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION;
109 libFIRM_opt &= ~OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION;
112 void set_opt_critical_edges(int value)
115 libFIRM_opt |= OPT_CRITICAL_EDGES;
117 libFIRM_opt &= ~OPT_CRITICAL_EDGES;
120 void set_opt_reassociation(int value)
123 libFIRM_opt |= OPT_REASSOCIATION;
125 libFIRM_opt &= ~OPT_REASSOCIATION;
128 void set_opt_dead_node_elimination(int value)
131 libFIRM_opt |= OPT_DEAD_NODE_ELIMINATION;
133 libFIRM_opt &= ~OPT_DEAD_NODE_ELIMINATION;
136 void set_opt_dead_method_elimination (int value) {}
137 void set_opt_dead_method_elimination_verbose (int value) {}
139 void set_optimize(int value)
142 libFIRM_opt |= OPT_OPTIMIZED;
144 libFIRM_opt &= ~OPT_OPTIMIZED;
147 int get_optimize(void)
149 return get_opt_optimize();
152 /* Enable/Disables inlining. */
153 void set_opt_inline(int value)
156 libFIRM_opt |= OPT_INLINE;
158 libFIRM_opt &= ~OPT_INLINE;
161 /* Enable/Disable optimization of dynamic method dispatch */
162 void set_opt_dyn_meth_dispatch (int value)
165 libFIRM_opt |= OPT_DYN_METH_DISPATCH;
167 libFIRM_opt &= ~OPT_DYN_METH_DISPATCH;
170 /* Enable/Disable normalizations of the firm representation. */
171 void set_opt_normalize(int value)
174 libFIRM_opt |= OPT_NORMALIZE;
176 libFIRM_opt &= ~OPT_NORMALIZE;
179 /* Enable/Disable optimization of tail-recursion calls. */
180 void set_opt_tail_recursion(int value)
183 libFIRM_opt |= OPT_TAIL_RECURSION;
185 libFIRM_opt &= ~OPT_TAIL_RECURSION;
188 /* Save the current optimization state. */
189 void save_optimization_state(optimization_state_t *state)
191 *state = libFIRM_opt;
194 /* Restore the current optimization state. */
195 void restore_optimization_state(const optimization_state_t *state)
197 libFIRM_opt = *state;