From ca711274c0b1b3794c4318979e45c47c81f7f31a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?L=C3=A9onard=20G=C3=A9rard?= <leonard.gerard@ens.fr>
Date: Fri, 18 Nov 2011 11:55:52 +0100
Subject: [PATCH] Remove infusion from the default optima options.

---
 compiler/utilities/global/compiler_options.ml | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/compiler/utilities/global/compiler_options.ml b/compiler/utilities/global/compiler_options.ml
index 25bbe8c..653ef63 100644
--- a/compiler/utilities/global/compiler_options.ml
+++ b/compiler/utilities/global/compiler_options.ml
@@ -117,10 +117,11 @@ let use_old_scheduler = ref false
 
 let optim = ref false
 let do_optim () =
+(*  do_iterator_fusion := true; TODO reset when itfusion is fixed *)
   do_mem_alloc_and_typing ();
   tomato := true;
-  deadcode := true;
-  do_iterator_fusion := true
+  deadcode := true
+
 
 let doc_verbose = "\t\t\tSet verbose mode"
 and doc_version = "\t\tThe version of the compiler"