aboutsummaryrefslogtreecommitdiff
path: root/src/Compilers/MapCastByDeBruijnWf.v
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2017-10-20 22:53:47 -0400
committerGravatar Jason Gross <jgross@mit.edu>2017-10-20 22:53:47 -0400
commita40175d382cc1eac5f47f0a9f9f2e980a124c35f (patch)
tree5d8d86f508ea3888459db624f5f10510d4f0cfa5 /src/Compilers/MapCastByDeBruijnWf.v
parent585cae5eb315fa0cd3f4d38d47be0476c6d8bd2c (diff)
Generalize wf_compile a bit
Diffstat (limited to 'src/Compilers/MapCastByDeBruijnWf.v')
-rw-r--r--src/Compilers/MapCastByDeBruijnWf.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Compilers/MapCastByDeBruijnWf.v b/src/Compilers/MapCastByDeBruijnWf.v
index 61a084ee7..d611f50b6 100644
--- a/src/Compilers/MapCastByDeBruijnWf.v
+++ b/src/Compilers/MapCastByDeBruijnWf.v
@@ -87,7 +87,7 @@ Section language.
PositiveContextOk PositiveContextOk
(failb _) (failb _) _ e1);
(eapply wf_map_cast with (fValues:=empty); eauto using PositiveContextOk with typeclass_instances);
- try (eapply (wf_compile (ContextOk:=PositiveContextOk));
+ try (eapply (wf_compile (make_var':=fun _ => id) (ContextOk:=PositiveContextOk));
[ eauto
| ..
| eassumption ]);