From 615fb53c13f2407a0b6b470bbdf8e468fc4a1d78 Mon Sep 17 00:00:00 2001 From: xleroy Date: Fri, 5 Jun 2009 13:39:59 +0000 Subject: Adapted to work with Coq 8.2-1 git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1076 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- arm/Selectionproof.v | 4 ---- 1 file changed, 4 deletions(-) (limited to 'arm/Selectionproof.v') diff --git a/arm/Selectionproof.v b/arm/Selectionproof.v index 10f93f3a..967e2292 100644 --- a/arm/Selectionproof.v +++ b/arm/Selectionproof.v @@ -1389,10 +1389,6 @@ Proof. econstructor. destruct k; simpl in H; simpl; auto. rewrite <- H0; reflexivity. constructor; auto. - (* assign *) - exists (State (sel_function f) Sskip (sel_cont k) sp (PTree.set id v e) m); split. - constructor. auto with evalexpr. - constructor; auto. (* store *) econstructor; split. eapply eval_store; eauto with evalexpr. -- cgit