diff options
| author | ppedrot | 2013-03-12 20:59:33 +0000 |
|---|---|---|
| committer | ppedrot | 2013-03-12 20:59:33 +0000 |
| commit | 198586739090e63ad65051449f1a80f751c4c08b (patch) | |
| tree | 9247931c1505bcf8549d5daa4547b227ebe7ae47 /plugins/setoid_ring | |
| 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 'plugins/setoid_ring')
| -rw-r--r-- | plugins/setoid_ring/newring.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/setoid_ring/newring.ml4 b/plugins/setoid_ring/newring.ml4 index 35189f786b..a0f565ce36 100644 --- a/plugins/setoid_ring/newring.ml4 +++ b/plugins/setoid_ring/newring.ml4 @@ -174,7 +174,7 @@ let carg c = TacDynamic(Loc.ghost,Pretyping.constr_in c) let dummy_goal env = let (gl,_,sigma) = - Goal.V82.mk_goal Evd.empty (named_context_val env) mkProp Store.empty in + Goal.V82.mk_goal Evd.empty (named_context_val env) mkProp Evd.Store.empty in {Evd.it = gl; Evd.sigma = sigma} |