diff options
| author | Pierre-Marie Pédrot | 2016-03-20 21:21:32 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-03-20 21:23:23 +0100 |
| commit | 6afe572a4448e50f18e408097dd9ed03cc432d39 (patch) | |
| tree | 44cb29daa6147426419392e48b9d7c33c7c5caf0 /pretyping/typeclasses.ml | |
| parent | 48e4831fa56e3b0acd92aabdb78847696b84daf7 (diff) | |
| parent | 6d87fd89abdf17ddd4864386d66bb06f0d0a151f (diff) | |
Moving the lowest parts of pretyping/ (Evarutil & Proofview) to engine/.
Some functions exported by Evarutil essentially used by the unification
engine were moved to a new file Evardefine. Their presence in Evarutil was
not making much sense.
Moreover, the Refine module of the Proofview file was turned into a proper
file in pretyping/. This is because this part of the code was relying on
the typing primitives from Pretyping.
Diffstat (limited to 'pretyping/typeclasses.ml')
| -rw-r--r-- | pretyping/typeclasses.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/typeclasses.ml b/pretyping/typeclasses.ml index 0faa35c875..3a5796fe1b 100644 --- a/pretyping/typeclasses.ml +++ b/pretyping/typeclasses.ml @@ -490,7 +490,7 @@ let is_instance = function Nota: we will only check the resolvability status of undefined evars. *) -let resolvable = Store.field () +let resolvable = Proofview.Unsafe.typeclass_resolvable let set_resolvable s b = if b then Store.remove s resolvable |