diff options
author | Enrico Tassi <Enrico.Tassi@inria.fr> | 2018-01-22 17:35:02 +0100 |
---|---|---|
committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2018-02-20 14:44:58 +0100 |
commit | 041ee4822cb247e60df51fa147175f8b16711df1 (patch) | |
tree | 49e61993afab55d44d9642f5dcaebf36fa6cd94b /vernac/classes.ml | |
parent | aec63ba9c8f6840d98ba731640a786138d836343 (diff) |
proofview: goals come with a state
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 4a2dba859..241f07f2f 100644 --- a/vernac/classes.ml +++ b/vernac/classes.ml @@ -334,7 +334,7 @@ let new_instance ?(abstract=false) ?(global=false) ?(refine= !refine_instance) let init_refine = Tacticals.New.tclTHENLIST [ Refine.refine ~typecheck:false (fun sigma -> (sigma,EConstr.of_constr (Option.get term))); - Proofview.Unsafe.tclNEWGOALS gls; + Proofview.Unsafe.tclNEWGOALS (CList.map Proofview.with_empty_state gls); Tactics.New.reduce_after_refine; ] in |