aboutsummaryrefslogtreecommitdiff
path: root/kernel/pre_env.ml
diff options
context:
space:
mode:
authorMaxime Dénès2018-01-17 15:16:39 +0100
committerMaxime Dénès2018-01-17 15:16:39 +0100
commitd4f965678dcffb836fb9cf8790e3e969d3bfc364 (patch)
tree5f3afebbfc26d2215d331c6c61e5e425d5b2f82d /kernel/pre_env.ml
parente77fa3a6226926cca7893c4fbc620bcf2372698e (diff)
parent20481a3f3405f04b47c7865ca2788a6f63660443 (diff)
Merge PR #6584: Implement the strategy mechanism in the checker
Diffstat (limited to 'kernel/pre_env.ml')
-rw-r--r--kernel/pre_env.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/kernel/pre_env.ml b/kernel/pre_env.ml
index c5254b453a..4ef89f8c0e 100644
--- a/kernel/pre_env.ml
+++ b/kernel/pre_env.ml
@@ -75,7 +75,6 @@ type env = {
env_nb_rel : int;
env_stratification : stratification;
env_typing_flags : typing_flags;
- env_conv_oracle : Conv_oracle.oracle;
retroknowledge : Retroknowledge.retroknowledge;
indirect_pterms : Opaqueproof.opaquetab;
}
@@ -98,8 +97,7 @@ let empty_env = {
env_stratification = {
env_universes = UGraph.initial_universes;
env_engagement = PredicativeSet };
- env_typing_flags = Declareops.safe_flags;
- env_conv_oracle = Conv_oracle.empty;
+ env_typing_flags = Declareops.safe_flags Conv_oracle.empty;
retroknowledge = Retroknowledge.initial_retroknowledge;
indirect_pterms = Opaqueproof.empty_opaquetab }