diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-03-14 09:14:26 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-03-14 09:14:26 +0000 |
commit | 63dc7851037c0fba117f778af06234ccac8fcbe2 (patch) | |
tree | 6c5f3ecb1c4b4394b1f722604ee7b0511ce840eb | |
parent | 5df35de33b88c09b19fb82e9e3a45f113402c8af (diff) | |
download | compcert-63dc7851037c0fba117f778af06234ccac8fcbe2.tar.gz compcert-63dc7851037c0fba117f778af06234ccac8fcbe2.zip |
Incompatibility 8.3 / 8.3pl1
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1606 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
-rw-r--r-- | cfrontend/Initializersproof.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cfrontend/Initializersproof.v b/cfrontend/Initializersproof.v index 43514bd0..e8f1f9f1 100644 --- a/cfrontend/Initializersproof.v +++ b/cfrontend/Initializersproof.v @@ -262,7 +262,7 @@ Proof. eapply simple_context_2; eauto. eapply rred_simple; eauto. (* callred *) assert (S: simple a) by (eapply simple_context_1; eauto). - inv H9; simpl in S; contradiction. + inv H10; simpl in S; contradiction. destruct X as [r1 [A [B C]]]. subst s2. exploit IHstar; eauto. intros [D E]. split. auto. destruct B; destruct E. split. congruence. auto. |