diff options
Diffstat (limited to 'src/hls/GiblePargenproof.v')
-rw-r--r-- | src/hls/GiblePargenproof.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/hls/GiblePargenproof.v b/src/hls/GiblePargenproof.v index 010bc0a..a27edd5 100644 --- a/src/hls/GiblePargenproof.v +++ b/src/hls/GiblePargenproof.v @@ -172,7 +172,7 @@ Section CORRECTNESS. Proof using . unfold schedule_oracle, check_control_flow_instr, check. simplify; repeat destruct_match; crush. - now rewrite ! check_mutexcl_singleton. + (* now rewrite ! check_mutexcl_singleton. *) Qed. Lemma eval_op_eq: @@ -427,14 +427,14 @@ Proof. induction 2; try rewrite H; eauto with barg. Qed. exploit abstr_sequence_correct; eauto; simplify. exploit local_abstr_check_correct2; eauto. { constructor. eapply ge_preserved_refl. reflexivity. } - { inv H. inv H8. exists pr'. intros x0. specialize (H x0). auto. } +(* { inv H. inv H8. exists pr'. intros x0. specialize (H x0). auto. } *) simplify. - exploit abstr_seq_reverse_correct; eauto. reflexivity. simplify. + exploit abstr_seq_reverse_correct; eauto. admit. admit. admit. admit. reflexivity. simplify. exploit seqbb_step_parbb_step; eauto; intros. econstructor; split; eauto. etransitivity; eauto. etransitivity; eauto. - Qed. + Admitted. Lemma step_cf_correct : forall cf ts s s' t, |