diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2018-03-04 16:50:36 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2018-03-04 16:50:36 +0100 |
| commit | b3a8761790c0905aad8e5d3102fab606fe5e7fd6 (patch) | |
| tree | ce5fbe8cb717bad677ad755e7875413d3e5d0e84 /dev/base_include | |
| parent | 9cd987a07d3792dc200e15c5e792a25a1a99c9c6 (diff) | |
| parent | 886a9c2fb25e32bd87b3fce38023b3e701134d23 (diff) | |
Merge PR #6511: [econstr] Continue consolidation of EConstr API under `interp`.
Diffstat (limited to 'dev/base_include')
| -rw-r--r-- | dev/base_include | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/dev/base_include b/dev/base_include index 762662c20..3320a2a94 100644 --- a/dev/base_include +++ b/dev/base_include @@ -196,7 +196,10 @@ let parse_tac = Pcoq.parse_string Ltac_plugin.Pltac.tactic;; (* build a term of type glob_constr without type-checking or resolution of implicit syntax *) -let e s = Constrintern.intern_constr (Global.env()) (parse_constr s);; +let e s = + let env = Global.env () in + let sigma = Evd.from_env env in + Constrintern.intern_constr env sigma (parse_constr s);; (* build a term of type constr with type-checking and resolution of implicit syntax *) |