summaryrefslogtreecommitdiff
path: root/plugins/extraction/table.ml
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/extraction/table.ml')
-rw-r--r--plugins/extraction/table.ml5
1 files changed, 3 insertions, 2 deletions
diff --git a/plugins/extraction/table.ml b/plugins/extraction/table.ml
index a7e636ff..085c0a44 100644
--- a/plugins/extraction/table.ml
+++ b/plugins/extraction/table.ml
@@ -6,7 +6,7 @@
(* * GNU Lesser General Public License Version 2.1 *)
(************************************************************************)
-(*i $Id: table.ml 13420 2010-09-16 15:47:08Z letouzey $ i*)
+(*i $Id: table.ml 13733 2010-12-21 13:08:53Z letouzey $ i*)
open Names
open Term
@@ -421,7 +421,8 @@ let flag_of_int n =
opt_lin_beta = kth_digit n 10 }
(* For the moment, we allow by default everything except :
- - the type-unsafe optimization [opt_case_idg]
+ - the type-unsafe optimization [opt_case_idg], which anyway
+ cannot be activated currently (cf [Mlutil.branch_as_fun])
- the linear let and beta reduction [opt_lin_let] and [opt_lin_beta]
(may lead to complexity blow-up, subsumed by finer reductions
when inlining recursors).