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/Csharpminor.v | 2 -- 1 file changed, 2 deletions(-) (limited to 'cfrontend/Csharpminor.v') diff --git a/cfrontend/Csharpminor.v b/cfrontend/Csharpminor.v index 1a362e32..2f05678e 100644 --- a/cfrontend/Csharpminor.v +++ b/cfrontend/Csharpminor.v @@ -512,12 +512,10 @@ Inductive step: state -> trace -> state -> Prop := E0 (State f (seq_of_lbl_stmt (select_switch n cases)) k e le m) | step_return_0: forall f k e le m m', - f.(fn_return) = None -> Mem.free_list m (blocks_of_env e) = Some m' -> step (State f (Sreturn None) k e le m) E0 (Returnstate Vundef (call_cont k) m') | step_return_1: forall f a k e le m v m', - f.(fn_return) <> None -> eval_expr e le m a v -> Mem.free_list m (blocks_of_env e) = Some m' -> step (State f (Sreturn (Some a)) k e le m) -- cgit