diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-01-13 09:53:07 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2010-01-13 09:53:07 +0000 |
commit | 307da4d1fb744bb3c66e5a43acd7702f0ce1b7ac (patch) | |
tree | 1f8ce41f366bf19b777a1934ae0b1eb09be0a9f3 /backend/Allocproof.v | |
parent | 33a4bcf3695d0ee2793b3bdd12f6ee787d152f36 (diff) | |
download | compcert-kvx-307da4d1fb744bb3c66e5a43acd7702f0ce1b7ac.tar.gz compcert-kvx-307da4d1fb744bb3c66e5a43acd7702f0ce1b7ac.zip |
Backtracking on commit 1220v1.6
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1228 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/Allocproof.v')
-rw-r--r-- | backend/Allocproof.v | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/backend/Allocproof.v b/backend/Allocproof.v index c01b80c3..10eaa5b1 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. |