aboutsummaryrefslogtreecommitdiff
path: root/src/Reflection/InlineCastInterp.v
diff options
context:
space:
mode:
Diffstat (limited to 'src/Reflection/InlineCastInterp.v')
-rw-r--r--src/Reflection/InlineCastInterp.v6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Reflection/InlineCastInterp.v b/src/Reflection/InlineCastInterp.v
index 5cf2bf7fe..8e6719f0c 100644
--- a/src/Reflection/InlineCastInterp.v
+++ b/src/Reflection/InlineCastInterp.v
@@ -106,8 +106,8 @@ Section language.
Local Hint Resolve interpf_exprf_of_push_cast.
Lemma InterpInlineCast {t} e (Hwf : Wf e)
- : interp_type_gen_rel_pointwise (fun _ => @eq _)
- (Interp interp_op (@InlineCast t e))
- (Interp interp_op e).
+ : forall x,
+ Interp interp_op (@InlineCast t e) x
+ = Interp interp_op e x.
Proof. apply InterpInlineConstGen; auto. Qed.
End language.