diff options
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/evarconv.ml | 1 | ||||
| -rw-r--r-- | pretyping/tacred.ml | 3 |
2 files changed, 2 insertions, 2 deletions
diff --git a/pretyping/evarconv.ml b/pretyping/evarconv.ml index c90dcddb13..f0b50aa0d2 100644 --- a/pretyping/evarconv.ml +++ b/pretyping/evarconv.ml @@ -5,6 +5,7 @@ open Util open Names open Term open Reduction +open Closure open Instantiate open Environ open Typing diff --git a/pretyping/tacred.ml b/pretyping/tacred.ml index 1e162a4bdb..715cb798a0 100644 --- a/pretyping/tacred.ml +++ b/pretyping/tacred.ml @@ -8,6 +8,7 @@ open Term open Inductive open Environ open Reduction +open Closure open Instantiate (************************************************************************) @@ -582,8 +583,6 @@ let rec substlin env name n ol c = | (IsRel _|IsMeta _|IsVar _|IsXtra _|IsSort _ |IsEvar _|IsConst _|IsMutInd _|IsMutConstruct _) -> (n,ol,c) -open Closure - let unfold env sigma name = clos_norm_flags (unfold_flags name) env sigma |