diff options
| author | Gaëtan Gilbert | 2019-02-19 13:04:09 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-02-19 13:04:09 +0100 |
| commit | 032398fb5e2bc88e911f60ddfc4982a3826b55cd (patch) | |
| tree | 0827cbfb6b1eccba05aa7cec02e2feed4d0bbe42 /lib/flags.ml | |
| parent | 582ba8464962f69f0808ccdd14e7bd64e786875f (diff) | |
Make inductive cumulativity flag local to vernacentries
Diffstat (limited to 'lib/flags.ml')
| -rw-r--r-- | lib/flags.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lib/flags.ml b/lib/flags.ml index 768d359cce..1195b8caf1 100644 --- a/lib/flags.ml +++ b/lib/flags.ml @@ -101,10 +101,6 @@ let verbosely f x = without_option quiet f x let if_silent f x = if !quiet then f x let if_verbose f x = if not !quiet then f x -let polymorphic_inductive_cumulativity = ref false -let make_polymorphic_inductive_cumulativity b = polymorphic_inductive_cumulativity := b -let is_polymorphic_inductive_cumulativity () = !polymorphic_inductive_cumulativity - let warn = ref true let make_warn flag = warn := flag; () let if_warn f x = if !warn then f x |