diff options
| author | Michalis Pardalos <m.pardalos@gmail.com> | 2021-05-18 21:24:33 +0100 |
|---|---|---|
| committer | Michalis Pardalos <m.pardalos@gmail.com> | 2021-05-18 21:24:33 +0100 |
| commit | deb5fabefb2b67d46f1df6efc08c217c5197338a (patch) | |
| tree | da951ce429d7e3f55416f3cf9571ede169df845d /src/hls/HTLgenproof.v | |
| parent | 8b619c55c83a9e87c2aa610579b4ab6966b9cf78 (diff) | |
| download | vericert-deb5fabefb2b67d46f1df6efc08c217c5197338a.tar.gz vericert-deb5fabefb2b67d46f1df6efc08c217c5197338a.zip | |
Qed on top-level correctness lemma
Diffstat (limited to 'src/hls/HTLgenproof.v')
| -rw-r--r-- | src/hls/HTLgenproof.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/hls/HTLgenproof.v b/src/hls/HTLgenproof.v index aa5e7e1..7d71819 100644 --- a/src/hls/HTLgenproof.v +++ b/src/hls/HTLgenproof.v @@ -2914,8 +2914,8 @@ Section CORRECTNESS. match_states ge S1 R1 -> exists R2, Smallstep.plus HTL.step tge R1 t R2 /\ match_states ge S2 R2. Proof. - induction 1; try (eauto with htlproof; intros; inv_state). - Admitted. + induction 1; eauto with htlproof; try solve [ intros; inv_state ]. + Qed. Hint Resolve transl_step_correct : htlproof. |