X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fir%2Firflag.c;h=f30d0d4ddafc6b41b3294828fe4f98b0684dd4a5;hb=8399216d8aebc713bbda04b6e3e250a1d52b20bf;hp=07004f22fad79272a0ee449ffeffea66286004d2;hpb=943993320a2cc30fc679341a22cb37e66fd3b317;p=libfirm

diff --git a/ir/ir/irflag.c b/ir/ir/irflag.c
index 07004f22f..f30d0d4dd 100644
--- a/ir/ir/irflag.c
+++ b/ir/ir/irflag.c
@@ -11,7 +11,7 @@
  */
 
 #ifdef HAVE_CONFIG_H
-# include <config.h>
+# include "config.h"
 #endif
 
 #include "firm_common.h"
@@ -26,17 +26,52 @@ optimization_state_t libFIRM_opt =
   ENABLE(OPT_OPTIMIZED)                          |
   ENABLE(OPT_CSE)                                |
   DISABLE(OPT_GLOBAL_CSE)                        |
+  ENABLE(OPT_LOOP_UNROLLING)                     |
+  ENABLE(OPT_STRENGTH_RED)                       |
   ENABLE(OPT_CONSTANT_FOLDING)                   |
+  ENABLE(OPT_REDUNDANT_LOADSTORE)                |
   ENABLE(OPT_UNREACHABLE_CODE)                   |
   ENABLE(OPT_CONTROL_FLOW_STRAIGHTENING)         |
   ENABLE(OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION)   |
   ENABLE(OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION) |
   ENABLE(OPT_CRITICAL_EDGES)                     |
   ENABLE(OPT_DEAD_NODE_ELIMINATION)              |
+  ENABLE(OPT_DEAD_METHOD_ELIMINATION)            |
   ENABLE(OPT_REASSOCIATION)                      |
   ENABLE(OPT_INLINE)                             |
   ENABLE(OPT_DYN_METH_DISPATCH)                  |
-  ENABLE(OPT_NORMALIZE);
+  ENABLE(OPT_NORMALIZE)                          |
+  ENABLE(OPT_TAIL_RECURSION)                     |
+  ENABLE(OPT_PRECISE_EXC_CONTEXT)                |
+  DISABLE(OPT_FRAGILE_OPS)                       |
+  0;
+
+optimization_state_t libFIRM_verb =
+  DISABLE(OPT_OPTIMIZED)                          |
+  DISABLE(OPT_CSE)                                |
+  DISABLE(OPT_GLOBAL_CSE)                         |
+  DISABLE(OPT_LOOP_UNROLLING)                     |
+  DISABLE(OPT_STRENGTH_RED)                       |
+  DISABLE(OPT_CONSTANT_FOLDING)                   |
+  DISABLE(OPT_REDUNDANT_LOADSTORE)                |
+  DISABLE(OPT_UNREACHABLE_CODE)                   |
+  DISABLE(OPT_CONTROL_FLOW_STRAIGHTENING)         |
+  DISABLE(OPT_CONTROL_FLOW_WEAK_SIMPLIFICATION)   |
+  DISABLE(OPT_CONTROL_FLOW_STRONG_SIMPLIFICATION) |
+  DISABLE(OPT_CRITICAL_EDGES)                     |
+  DISABLE(OPT_DEAD_NODE_ELIMINATION)              |
+  DISABLE(OPT_DEAD_METHOD_ELIMINATION)            |
+  DISABLE(OPT_REASSOCIATION)                      |
+  DISABLE(OPT_INLINE)                             |
+  DISABLE(OPT_DYN_METH_DISPATCH)                  |
+  DISABLE(OPT_NORMALIZE)                          |
+  DISABLE(OPT_TAIL_RECURSION)                     |
+  DISABLE(OPT_PRECISE_EXC_CONTEXT)                |
+  DISABLE(OPT_FRAGILE_OPS)                       |
+  0;
+
+/** The Firm verbosity level */
+int firm_verbosity_level;
 
 /* set the flags with set_flagname, get the flag with get_flagname */
 void set_opt_cse (int value)
@@ -47,6 +82,10 @@ void set_opt_cse (int value)
     libFIRM_opt &= ~OPT_CSE;
 }
 
+int (get_opt_cse)(void) {
+  return _get_opt_cse();
+}
+
 void set_opt_global_cse(int value)
 {
   if (value)
@@ -55,6 +94,38 @@ void set_opt_global_cse(int value)
     libFIRM_opt &= ~OPT_GLOBAL_CSE;
 }
 
+void set_opt_loop_unrolling (int value)
+{
+  if (value)
+    libFIRM_opt |= OPT_LOOP_UNROLLING;
+  else
+    libFIRM_opt &= ~OPT_LOOP_UNROLLING;
+}
+
+void set_opt_loop_unrolling_verbose (int value)
+{
+  if (value)
+    libFIRM_verb |= OPT_LOOP_UNROLLING;
+  else
+    libFIRM_verb &= ~OPT_LOOP_UNROLLING;
+}
+
+void set_opt_strength_red (int value)
+{
+  if (value)
+    libFIRM_opt |= OPT_STRENGTH_RED;
+  else
+    libFIRM_opt &= ~OPT_STRENGTH_RED;
+}
+
+void set_opt_strength_red_verbose (int value)
+{
+  if (value)
+    libFIRM_verb |= OPT_STRENGTH_RED;
+  else
+    libFIRM_verb &= ~OPT_STRENGTH_RED;
+}
+
 void
 set_opt_constant_folding(int value)
 {
@@ -64,6 +135,14 @@ set_opt_constant_folding(int value)
     libFIRM_opt &= ~OPT_CONSTANT_FOLDING;
 }
 
+void
+set_opt_redundant_LoadStore(int value) {
+  if (value)
+    libFIRM_opt |= OPT_REDUNDANT_LOADSTORE;
+  else
+    libFIRM_opt &= ~OPT_REDUNDANT_LOADSTORE;
+}
+
 void
 set_opt_unreachable_code(int value)
 {
@@ -132,6 +211,20 @@ void set_opt_dead_node_elimination(int value)
     libFIRM_opt &= ~OPT_DEAD_NODE_ELIMINATION;
 }
 
+void set_opt_dead_method_elimination (int value) {
+  if (value)
+    libFIRM_opt |= OPT_DEAD_METHOD_ELIMINATION;
+  else
+    libFIRM_opt &= ~OPT_DEAD_METHOD_ELIMINATION;
+}
+
+void set_opt_dead_method_elimination_verbose (int value) {
+  if (value)
+    libFIRM_verb |= OPT_DEAD_METHOD_ELIMINATION;
+  else
+    libFIRM_verb &= ~OPT_DEAD_METHOD_ELIMINATION;
+}
+
 void set_optimize(int value)
 {
   if (value)
@@ -145,6 +238,18 @@ int get_optimize(void)
   return get_opt_optimize();
 }
 
+
+void set_firm_verbosity (int value) {
+  firm_verbosity_level = value;
+}
+
+int  (get_firm_verbosity) (void) {
+  return _get_firm_verbosity();
+}
+
+
+
+/* Enable/Disables inlining. */
 void set_opt_inline(int value)
 {
   if (value)
@@ -153,12 +258,7 @@ void set_opt_inline(int value)
     libFIRM_opt &= ~OPT_INLINE;
 }
 
-/** Enable/Disable optimization of dynamic method dispatch
- *
- * This flag enables/disables the optimization of dynamic method dispatch.
- * If the flag is turned on Sel nodes can be replaced by Const nodes representing
- * the address of a function.
- */
+/* Enable/Disable optimization of dynamic method dispatch */
 void set_opt_dyn_meth_dispatch (int value)
 {
   if (value)
@@ -167,6 +267,7 @@ void set_opt_dyn_meth_dispatch (int value)
     libFIRM_opt &= ~OPT_DYN_METH_DISPATCH;
 }
 
+/* Enable/Disable normalizations of the firm representation. */
 void set_opt_normalize(int value)
 {
   if (value)
@@ -175,6 +276,43 @@ void set_opt_normalize(int value)
     libFIRM_opt &= ~OPT_NORMALIZE;
 }
 
+/* Enable/Disable optimization of tail-recursion calls. */
+void set_opt_tail_recursion(int value)
+{
+  if (value)
+    libFIRM_opt |= OPT_TAIL_RECURSION;
+  else
+    libFIRM_opt &= ~OPT_TAIL_RECURSION;
+}
+
+/* Enable/Disable optimization of tail-recursion calls. */
+void set_opt_tail_recursion_verbose(int value)
+{
+  if (value)
+    libFIRM_verb |= OPT_TAIL_RECURSION;
+  else
+    libFIRM_verb &= ~OPT_TAIL_RECURSION;
+}
+
+/* Enable/Disable precise exception context. */
+void set_opt_precise_exc_context(int value)
+{
+#if PRECISE_EXC_CONTEXT
+  if (value)
+    libFIRM_opt |= OPT_PRECISE_EXC_CONTEXT;
+  else
+    libFIRM_opt &= ~OPT_PRECISE_EXC_CONTEXT;
+#endif
+}
+
+void set_opt_fragile_ops(int value)
+{
+  if (value)
+    libFIRM_opt |= OPT_FRAGILE_OPS;
+  else
+    libFIRM_opt &= ~OPT_FRAGILE_OPS;
+}
+
 /* Save the current optimization state. */
 void save_optimization_state(optimization_state_t *state)
 {