aboutsummaryrefslogtreecommitdiff
path: root/plugins/extraction/table.ml
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/extraction/table.ml')
-rw-r--r--plugins/extraction/table.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/extraction/table.ml b/plugins/extraction/table.ml
index c22bb17eae..b9081e2864 100644
--- a/plugins/extraction/table.ml
+++ b/plugins/extraction/table.ml
@@ -404,7 +404,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).