aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/subtac/eterm.ml
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/subtac/eterm.ml')
-rw-r--r--contrib/subtac/eterm.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/subtac/eterm.ml b/contrib/subtac/eterm.ml
index 4f86af1e8..7b07abbc8 100644
--- a/contrib/subtac/eterm.ml
+++ b/contrib/subtac/eterm.ml
@@ -61,7 +61,7 @@ let etype_of_evar evs ev =
| [] ->
let t' = subst_evars evs n ev.evar_concl in
subst_vars acc 0 t'
- in aux [] 0 (rev ev.evar_hyps)
+ in aux [] 0 (rev (Environ.named_context_of_val ev.evar_hyps))
open Tacticals