diff options
Diffstat (limited to 'proofs')
-rw-r--r-- | proofs/goal.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/goal.ml b/proofs/goal.ml index c40570c2c..4d1aa4124 100644 --- a/proofs/goal.ml +++ b/proofs/goal.ml @@ -193,7 +193,7 @@ module Refinable = struct let my_type = Retyping.get_type_of env !rdefs t in let j = Environ.make_judge t my_type in let (new_defs,j') = - Coercion.inh_conv_coerce_to (Loc.ghost) env !rdefs j typ + Coercion.inh_conv_coerce_to true (Loc.ghost) env !rdefs j typ in rdefs := new_defs; j'.Environ.uj_val |