diff options
| author |  Arnaud Spiwack <arnaud@spiwack.net> | 2014-10-21 21:53:35 +0200 |
|---|---|---|
| committer | Arnaud Spiwack <arnaud@spiwack.net> | 2014-10-22 07:31:45 +0200 |
| commit | a5a355ec3e9cbbfa28be53b9ba6ef914136b0aba (patch) | |
| tree | 7d005f87c55567d8a120b7cdc4679fad04810e5c /toplevel | |
| parent | cadfe23210c8edaab1f22d0edb7acc33fb9ff782 (diff) | |
Proofview: move more functions to the Unsafe module.
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/classes.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/classes.ml b/toplevel/classes.ml index e49857be3..60da19c18 100644 --- a/toplevel/classes.ml +++ b/toplevel/classes.ml @@ -307,7 +307,7 @@ let new_instance ?(abstract=false) ?(global=false) poly ctx (instid, bk, cl) pro let init_refine = Tacticals.New.tclTHENLIST [ Proofview.Refine.refine (fun evm -> evm, Option.get term); - Proofview.tclNEWGOALS gls; + Proofview.Unsafe.tclNEWGOALS gls; Tactics.New.reduce_after_refine; ] in |