diff options
| author | Gaëtan Gilbert | 2019-10-29 13:50:47 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-12-16 11:52:46 +0100 |
| commit | 4f1d657f42957d0c2d115424564eedf599584cbc (patch) | |
| tree | 7ff261e020f8c5e09720e1a7a5015fd4f1723da2 /checker/checkInductive.ml | |
| parent | b621bc02657bd1effcca371b56260b0a7a327ed9 (diff) | |
Remove variance info from inductive entries, infer in indtyping
It gets thrown away if the inductive is declared in a section anyway,
and there is no user syntax to specify it.
Diffstat (limited to 'checker/checkInductive.ml')
| -rw-r--r-- | checker/checkInductive.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/checker/checkInductive.ml b/checker/checkInductive.ml index d20eea7874..06ee4fcc7a 100644 --- a/checker/checkInductive.ml +++ b/checker/checkInductive.ml @@ -61,7 +61,7 @@ let to_entry (mb:mutual_inductive_body) : Entries.mutual_inductive_entry = mind_entry_params = mb.mind_params_ctxt; mind_entry_inds; mind_entry_universes; - mind_entry_variance = mb.mind_variance; + mind_entry_cumulative= Option.has_some mb.mind_variance; mind_entry_private = mb.mind_private; } |
