diff options
| -rw-r--r-- | backend/CSE3.v | 4 | ||||
| -rw-r--r-- | backend/CSE3analysis.v | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/backend/CSE3.v b/backend/CSE3.v index d0dc3aef..352cc895 100644 --- a/backend/CSE3.v +++ b/backend/CSE3.v @@ -62,8 +62,8 @@ Definition transf_instr (fmap : PMap.t RB.t) Icall sig ros (subst_args fmap pc args) dst s | Itailcall sig ros args => Itailcall sig ros (subst_args fmap pc args) - | Icond cond args s1 s2 => - Icond cond (subst_args fmap pc args) s1 s2 + | Icond cond args s1 s2 expected => + Icond cond (subst_args fmap pc args) s1 s2 expected | Ijumptable arg tbl => Ijumptable (subst_arg fmap pc arg) tbl | Ireturn (Some arg) => diff --git a/backend/CSE3analysis.v b/backend/CSE3analysis.v index 12fb2d1f..90ce4ce7 100644 --- a/backend/CSE3analysis.v +++ b/backend/CSE3analysis.v @@ -328,7 +328,7 @@ Section OPERATIONS. Definition apply_instr (tenv : typing_env) (instr : RTL.instruction) (rel : RELATION.t) : RB.t := match instr with | Inop _ - | Icond _ _ _ _ + | Icond _ _ _ _ _ | Ijumptable _ _ => Some rel | Istore chunk addr args src _ => Some (store chunk addr args src (tenv src) rel) |