diff options
| author | Maxime Dénès | 2017-09-26 23:57:40 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-09-26 23:57:40 +0200 |
| commit | b9740771e8113cb9e607793887be7a12587d0326 (patch) | |
| tree | f69105ad9813738abd10ae824756947940a7dc6d /plugins/setoid_ring | |
| parent | 4b6383889d4d38de4c9a28bee960b30114a51b16 (diff) | |
| parent | 3c964a60d698134c21adc77cbb69ce1528350682 (diff) | |
Merge PR #688: Binding universe constraints in Definition/Inductive/etc...
Diffstat (limited to 'plugins/setoid_ring')
| -rw-r--r-- | plugins/setoid_ring/newring.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/setoid_ring/newring.ml b/plugins/setoid_ring/newring.ml index d0fe1f9570..b8fae2494f 100644 --- a/plugins/setoid_ring/newring.ml +++ b/plugins/setoid_ring/newring.ml @@ -220,7 +220,7 @@ let exec_tactic env evd n f args = let gls = Proofview.V82.of_tactic (Tacinterp.eval_tactic_ist ist (ltac_call f (args@[getter]))) gl in let evd, nf = Evarutil.nf_evars_and_universes (Refiner.project gls) in let nf c = nf (constr_of c) in - Array.map nf !tactic_res, snd (Evd.universe_context evd) + Array.map nf !tactic_res, snd (Evd.universe_context ~names:[] ~extensible:true evd) let stdlib_modules = [["Coq";"Setoids";"Setoid"]; |