aboutsummaryrefslogtreecommitdiff
path: root/proofs/clenv.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2016-11-12 01:28:45 +0100
committerPierre-Marie Pédrot2017-02-14 17:28:47 +0100
commit45562afa065aadc207dca4e904e309d835cb66ef (patch)
tree2d7420427a49f17c2fb0d66ec8f38fe1df63abdb /proofs/clenv.ml
parent0489e8b56d7e10f7111c0171960e25d32201b963 (diff)
Tacticals API using EConstr.
Diffstat (limited to 'proofs/clenv.ml')
-rw-r--r--proofs/clenv.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/clenv.ml b/proofs/clenv.ml
index 3e3889cbb3..fd88e3c518 100644
--- a/proofs/clenv.ml
+++ b/proofs/clenv.ml
@@ -44,7 +44,7 @@ type clausenv = {
let cl_env ce = ce.env
let cl_sigma ce = ce.evd
-let clenv_nf_meta clenv c = nf_meta clenv.evd c
+let clenv_nf_meta clenv c = EConstr.of_constr (nf_meta clenv.evd (EConstr.Unsafe.to_constr c))
let clenv_term clenv c = meta_instance clenv.evd c
let clenv_meta_type clenv mv = Typing.meta_type clenv.evd mv
let clenv_value clenv = meta_instance clenv.evd clenv.templval