diff options
Diffstat (limited to 'dev/base_include')
| -rw-r--r-- | dev/base_include | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/dev/base_include b/dev/base_include index 2f5d8aa84..8d81ca3e0 100644 --- a/dev/base_include +++ b/dev/base_include @@ -204,7 +204,9 @@ let e s = implicit syntax *) let constr_of_string s = - Constrintern.interp_constr (Global.env()) Evd.empty (parse_constr s);; + let env = Global.env () in + let sigma = Evd.from_env env in + Constrintern.interp_constr env sigma (parse_constr s);; (* get the body of a constant *) |