aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins
diff options
context:
space:
mode:
authorGravatar Matthieu Sozeau <mattam@mattam.org>2018-07-02 20:12:46 +0200
committerGravatar Matthieu Sozeau <mattam@mattam.org>2018-07-02 20:12:46 +0200
commitce848730137bd1bf1f12f88ec782c935e742d84c (patch)
treed2a2d90cd2070010fb76e0f549cb23e31501f623 /plugins
parentb7d81ff8e1c715a3fe587d6bcaa6d132647ebd30 (diff)
parentffb3ab4108fa7b6a8f03b865d6287663fc3743e5 (diff)
Merge PR #7703: Add an option to force parameters to be uniform
Diffstat (limited to 'plugins')
-rw-r--r--plugins/funind/glob_term_to_relation.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/glob_term_to_relation.ml b/plugins/funind/glob_term_to_relation.ml
index 6b9b10312..5fc4293cb 100644
--- a/plugins/funind/glob_term_to_relation.ml
+++ b/plugins/funind/glob_term_to_relation.ml
@@ -1499,7 +1499,7 @@ let do_build_inductive
let _time2 = System.get_time () in
try
with_full_print
- (Flags.silently (ComInductive.do_mutual_inductive rel_inds (Flags.is_universe_polymorphism ()) false false))
+ (Flags.silently (ComInductive.do_mutual_inductive rel_inds (Flags.is_universe_polymorphism ()) false false ~uniform:ComInductive.NonUniformParameters))
Declarations.Finite
with
| UserError(s,msg) as e ->