diff options
| author | Léo Gourdin <leo.gourdin@lilo.org> | 2021-11-02 10:10:34 +0100 |
|---|---|---|
| committer | Léo Gourdin <leo.gourdin@lilo.org> | 2021-11-02 10:10:34 +0100 |
| commit | 173e6c25b2937d6e6941973aa7b116e1d6405513 (patch) | |
| tree | e5f63f343a3d1a1341dc2e8a09f6cdb706226de3 /backend/RTLgenproof.v | |
| parent | f9e4d91431334d88992e62a232a9e2ff2f6fcdc9 (diff) | |
| download | compcert-kvx-173e6c25b2937d6e6941973aa7b116e1d6405513.tar.gz compcert-kvx-173e6c25b2937d6e6941973aa7b116e1d6405513.zip | |
Porting the BTL non-trap loads approach to RTL
Diffstat (limited to 'backend/RTLgenproof.v')
| -rw-r--r-- | backend/RTLgenproof.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/backend/RTLgenproof.v b/backend/RTLgenproof.v index d07dc968..59d0a451 100644 --- a/backend/RTLgenproof.v +++ b/backend/RTLgenproof.v @@ -586,9 +586,9 @@ Proof. exists (rs1#rd <- v'); exists tm1. (* Exec *) split. eapply star_right. eexact EX1. eapply exec_Iload. eauto. - instantiate (1 := vaddr'). rewrite <- H3. + econstructor; eauto. rewrite <- H3. apply eval_addressing_preserved. exact symbols_preserved. - auto. traceEq. + auto. (* Match-env *) split. eauto with rtlg. (* Result *) |