summaryrefslogtreecommitdiff
path: root/cfrontend/Csem.v
diff options
context:
space:
mode:
Diffstat (limited to 'cfrontend/Csem.v')
-rw-r--r--cfrontend/Csem.v4
1 files changed, 3 insertions, 1 deletions
diff --git a/cfrontend/Csem.v b/cfrontend/Csem.v
index 5acf23f..a43ee00 100644
--- a/cfrontend/Csem.v
+++ b/cfrontend/Csem.v
@@ -286,7 +286,9 @@ Inductive rred: expr -> mem -> trace -> expr -> mem -> Prop :=
op = match id with Incr => Oadd | Decr => Osub end ->
rred (Epostincr id (Eloc b ofs ty) ty) m
t (Ecomma (Eassign (Eloc b ofs ty)
- (Ebinop op (Eval v1 ty) (Eval (Vint Int.one) type_int32s) (typeconv ty))
+ (Ebinop op (Eval v1 ty)
+ (Eval (Vint Int.one) type_int32s)
+ (incrdecr_type ty))
ty)
(Eval v1 ty) ty) m
| red_comma: forall v ty1 r2 ty m,