diff options
| author |  ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-03-12 20:59:33 +0000 |
|---|---|---|
| committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-03-12 20:59:33 +0000 |
| commit | 198586739090e63ad65051449f1a80f751c4c08b (patch) | |
| tree | 9247931c1505bcf8549d5daa4547b227ebe7ae47 /pretyping/evd.ml | |
| parent | 7c281301637f783beaec858a5fee665e99a6813b (diff) | |
Allowing different types of, not to be mixed, generic Stores through
functor application. Rewritten the interface btw.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16267 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/evd.ml')
| -rw-r--r-- | pretyping/evd.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pretyping/evd.ml b/pretyping/evd.ml index f9ca6a241..0f709e454 100644 --- a/pretyping/evd.ml +++ b/pretyping/evd.ml @@ -21,6 +21,9 @@ open Mod_subst (* The type of mappings for existential variables *) +module Dummy = struct end +module Store = Store.Make(Dummy) + type evar = Term.existential_key let string_of_existential evk = "?" ^ string_of_int evk |