aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/flags.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/flags.ml')
-rw-r--r--lib/flags.ml6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index 13f540379..6d1fb7fae 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -124,3 +124,9 @@ let camlbin = ref Coq_config.camlbin
let camlp4bin_spec = ref false
let camlp4bin = ref Coq_config.camlp4bin
+(* Level of inlining during a functor application *)
+
+let default_inline_level = 100
+let inline_level = ref default_inline_level
+let set_inline_level = (:=) inline_level
+let get_inline_level () = !inline_level