From 307da4d1fb744bb3c66e5a43acd7702f0ce1b7ac Mon Sep 17 00:00:00 2001 From: xleroy Date: Wed, 13 Jan 2010 09:53:07 +0000 Subject: Backtracking on commit 1220 git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1228 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- backend/Allocproof.v | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'backend/Allocproof.v') diff --git a/backend/Allocproof.v b/backend/Allocproof.v index c01b80c..10eaa5b 100644 --- a/backend/Allocproof.v +++ b/backend/Allocproof.v @@ -711,9 +711,7 @@ Proof. simpl. econstructor; eauto. change (transfer f (RTL.fn_entrypoint f) live !! (RTL.fn_entrypoint f)) with (live0 f live). - eapply agree_parameters; eauto. - unfold regalloc. eauto. - unfold regalloc. congruence. + eapply agree_parameters; eauto. (* external function *) injection H7; intro EQ; inv EQ. -- cgit v1.2.3