diff options
-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. |