From 6f9b68c8de22fe540bfe85c2fabec4b967c6a80d Mon Sep 17 00:00:00 2001 From: xleroy Date: Wed, 18 Aug 2010 09:58:24 +0000 Subject: Removed useless constraints on return type at Sreturn instructions git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1470 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- cfrontend/SimplExprproof.v | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'cfrontend/SimplExprproof.v') 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 *) -- cgit