diff options
Diffstat (limited to 'cfrontend/SimplExprproof.v')
-rw-r--r-- | cfrontend/SimplExprproof.v | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/cfrontend/SimplExprproof.v b/cfrontend/SimplExprproof.v index 603e2730..cff182d4 100644 --- a/cfrontend/SimplExprproof.v +++ b/cfrontend/SimplExprproof.v @@ -1699,12 +1699,11 @@ Proof. econstructor; eauto. constructor; auto. (* return none *) - inv H8. econstructor; split. + inv H7. econstructor; split. left. apply plus_one. econstructor; eauto. - rewrite <- H. apply function_return_preserved; auto. constructor. apply match_cont_call; auto. (* return some 1 *) - inv H7. inv H1. econstructor; split. + inv H6. inv H0. econstructor; split. left; eapply plus_left. constructor. apply push_seq. traceEq. econstructor; eauto. constructor. auto. (* return some 2 *) |