diff options
| author | Emilio Jesus Gallego Arias | 2018-11-27 15:10:27 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2018-11-27 15:10:27 +0100 |
| commit | 39bf8df76fc1093f3efa672284421c884319c89d (patch) | |
| tree | 01500fc77fb130296ad52aaf8aede0872da923c0 /engine | |
| parent | 0a699c7c932352f38c14f1bdf33ee7955241c1d8 (diff) | |
| parent | 74038abdd41161a4c4b1eba5dbbd83f5c0301bf3 (diff) | |
Merge PR #9046: Goptions.declare_* functions return unit instead of a write_function
Diffstat (limited to 'engine')
| -rw-r--r-- | engine/namegen.ml | 4 | ||||
| -rw-r--r-- | engine/univMinim.ml | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/engine/namegen.ml b/engine/namegen.ml index db72dc8ec3..0f346edd3e 100644 --- a/engine/namegen.ml +++ b/engine/namegen.ml @@ -210,7 +210,7 @@ let it_mkLambda_or_LetIn_name env sigma b hyps = let mangle_names = ref false -let _ = Goptions.( +let () = Goptions.( declare_bool_option { optdepr = false; optname = "mangle auto-generated names"; @@ -226,7 +226,7 @@ let set_mangle_names_mode x = begin mangle_names := true end -let _ = Goptions.( +let () = Goptions.( declare_string_option { optdepr = false; optname = "mangled names prefix"; diff --git a/engine/univMinim.ml b/engine/univMinim.ml index f10e6d2ec1..68c2724f26 100644 --- a/engine/univMinim.ml +++ b/engine/univMinim.ml @@ -15,7 +15,7 @@ open UnivSubst let set_minimization = ref true let is_set_minimization () = !set_minimization -let _ = +let () = Goptions.(declare_bool_option { optdepr = false; optname = "minimization to Set"; |