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) | |
Backtracking on commit 1220
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 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. |