aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2018-11-27 16:33:36 +0100
committerEmilio Jesus Gallego Arias2018-11-27 16:33:36 +0100
commiteacc77c5816a00b99aaef0d5ff596a3078b0a208 (patch)
tree49a43975f2605e68a43bcf856a12a69b6f8412df /lib
parent39bf8df76fc1093f3efa672284421c884319c89d (diff)
[lib] Remove leftover flag `print_mod_uid`
The whole `native_name_from_filename` business seems quite strange tho.
Diffstat (limited to 'lib')
-rw-r--r--lib/flags.ml3
-rw-r--r--lib/flags.mli4
2 files changed, 1 insertions, 6 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index 3aef5a7b2c..ae4d337ded 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -123,8 +123,5 @@ let get_inline_level () = !inline_level
(* Native code compilation for conversion and normalization *)
let output_native_objects = ref false
-(* Print the mod uid associated to a vo file by the native compiler *)
-let print_mod_uid = ref false
-
let profile_ltac = ref false
let profile_ltac_cutoff = ref 2.0
diff --git a/lib/flags.mli b/lib/flags.mli
index e282d4ca8c..d883cf1e30 100644
--- a/lib/flags.mli
+++ b/lib/flags.mli
@@ -119,8 +119,6 @@ val default_inline_level : int
(** When producing vo objects, also compile the native-code version *)
val output_native_objects : bool ref
-(** Print the mod uid associated to a vo file by the native compiler *)
-val print_mod_uid : bool ref
-
+(** Global profile_ltac flag *)
val profile_ltac : bool ref
val profile_ltac_cutoff : float ref