diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-03-12 17:21:31 +0100 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-03-12 17:21:31 +0100 |
| commit | 560c9837eee2145e3a9763aa2e37a6eb34c7e9ac (patch) | |
| tree | d99e7bb815f1b058e7284e7a4f4c8fd260d8763c /backend/CSE3proof.v | |
| parent | c6ebd73465ef895c6ea5e240f9c784463a6a0fe5 (diff) | |
| download | compcert-kvx-560c9837eee2145e3a9763aa2e37a6eb34c7e9ac.tar.gz compcert-kvx-560c9837eee2145e3a9763aa2e37a6eb34c7e9ac.zip | |
inductiveness test in CSE3
Diffstat (limited to 'backend/CSE3proof.v')
| -rw-r--r-- | backend/CSE3proof.v | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/backend/CSE3proof.v b/backend/CSE3proof.v index 72b3e7e1..e277a3e1 100644 --- a/backend/CSE3proof.v +++ b/backend/CSE3proof.v @@ -76,7 +76,9 @@ Proof. destruct f; simpl; intros. - monadInv H. monadInv EQ. - destruct preanalysis. + destruct preanalysis as [invariants hints]. + destruct check_inductiveness. + 2: discriminate. inv EQ1. reflexivity. - monadInv H. |