diff options
| author | Gaëtan Gilbert | 2019-05-13 12:49:39 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-05-13 12:49:39 +0200 |
| commit | cfecef471c706beb50d70b951b148c9629a4064a (patch) | |
| tree | d1ea20cc7b7af614311e2f4294a51a70e430971d /engine/proofview.ml | |
| parent | fe75c2ab9400a83b18fa73e95d4c24a79f88c97d (diff) | |
| parent | 1cdaa823aa2db2f68cf63561a85771bb98aec70f (diff) | |
Merge PR #9887: [api] Remove 8.10 deprecations.
Reviewed-by: SkySkimmer
Diffstat (limited to 'engine/proofview.ml')
| -rw-r--r-- | engine/proofview.ml | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/engine/proofview.ml b/engine/proofview.ml index f278c83912..ecea637947 100644 --- a/engine/proofview.ml +++ b/engine/proofview.ml @@ -1104,13 +1104,6 @@ module Goal = struct tclZERO ~info e end end - - let normalize { self; state } = - Env.get >>= fun env -> - tclEVARMAP >>= fun sigma -> - let (gl,sigma) = nf_gmake env sigma (goal_with_state self state) in - tclTHEN (Unsafe.tclEVARS sigma) (tclUNIT gl) - let gmake env sigma goal = let state = get_state goal in let goal = drop_state goal in |
