From e248b3d45835695c3bcf7c60e80172919025cd64 Mon Sep 17 00:00:00 2001 From: Matej Košík Date: Mon, 10 Apr 2017 16:03:36 +0200 Subject: Revert "trivial" This reverts commit 9b627431516f2cf88312329def9e0ec5e8605a98. --- engine/proofview.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'engine') diff --git a/engine/proofview.ml b/engine/proofview.ml index 60862d4216..acd931160f 100644 --- a/engine/proofview.ml +++ b/engine/proofview.ml @@ -1042,7 +1042,7 @@ module Goal = struct let nf_enter f = InfoL.tag (Info.Dispatch) begin iter_goal begin fun goal -> - tclENV >>= fun env -> + Env.get >>= fun env -> tclEVARMAP >>= fun sigma -> try let (gl, sigma) = nf_gmake env sigma goal in -- cgit v1.2.3