diff options
| author | Maxime Dénès | 2017-04-04 16:55:56 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-04-04 16:55:56 +0200 |
| commit | c112063ba5f562d511ed0cbd754a41539fc48fe1 (patch) | |
| tree | 1f7e244b3d3b0963d07463604d77bdf35001e67c /vernac/classes.ml | |
| parent | b824d8ad00001f6c41d0fc8bbf528dccb937c887 (diff) | |
| parent | ea10a2da9ac11ea57e9eb80d0d6baf9321886da4 (diff) | |
Merge branch 'trunk' into pr379
Diffstat (limited to 'vernac/classes.ml')
| -rw-r--r-- | vernac/classes.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/classes.ml b/vernac/classes.ml index c3300a3610..8337199655 100644 --- a/vernac/classes.ml +++ b/vernac/classes.ml @@ -338,7 +338,7 @@ let new_instance ?(abstract=false) ?(global=false) ?(refine= !refine_instance) p the refinement manually.*) let gls = List.rev (Evd.future_goals evm) in let evm = Evd.reset_future_goals evm in - Lemmas.start_proof id kind evm (EConstr.of_constr termtype) + Lemmas.start_proof id ?pl kind evm (EConstr.of_constr termtype) (Lemmas.mk_hook (fun _ -> instance_hook k pri global imps ?hook)); (* spiwack: I don't know what to do with the status here. *) |
