diff options
| author | David Monniaux <David.Monniaux@univ-grenoble-alpes.fr> | 2021-07-16 12:30:25 +0200 |
|---|---|---|
| committer | David Monniaux <David.Monniaux@univ-grenoble-alpes.fr> | 2021-07-16 12:30:25 +0200 |
| commit | fd4d085aa988a6044f89fc17e8422be23bc87f9d (patch) | |
| tree | 82639fb19304110566c52df31ab6c876cb206995 /backend/Tailcallproof.v | |
| parent | 70f5867e441e253869cb3b432af77636a186d1cb (diff) | |
| parent | 56498b6437ea8deb89a4e1fadbbfec490b8341aa (diff) | |
| download | compcert-kvx-fd4d085aa988a6044f89fc17e8422be23bc87f9d.tar.gz compcert-kvx-fd4d085aa988a6044f89fc17e8422be23bc87f9d.zip | |
Merge remote-tracking branch 'origin/kvx-work' into kvx-sched-w-reg-press
Diffstat (limited to 'backend/Tailcallproof.v')
| -rw-r--r-- | backend/Tailcallproof.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/backend/Tailcallproof.v b/backend/Tailcallproof.v index 80a68327..39fc10fb 100644 --- a/backend/Tailcallproof.v +++ b/backend/Tailcallproof.v @@ -440,7 +440,7 @@ Proof. TransfInstr. assert (Val.lessdef_list (rs##args) (rs'##args)). apply regs_lessdef_regs; auto. left. - exists (State s' (transf_function f) (Vptr sp0 Ptrofs.zero) pc' (rs'#dst <- (default_notrap_load_value chunk)) m'); split. + exists (State s' (transf_function f) (Vptr sp0 Ptrofs.zero) pc' (rs'#dst <- Vundef) m'); split. eapply exec_Iload_notrap1. eassumption. eapply eval_addressing_lessdef_none. eassumption. @@ -465,7 +465,7 @@ Proof. exact symbols_preserved. assumption. econstructor; eauto. apply set_reg_lessdef; auto. - + exists (State s' (transf_function f) (Vptr sp0 Ptrofs.zero) pc' (rs'#dst <- (default_notrap_load_value chunk)) m'); split. + + exists (State s' (transf_function f) (Vptr sp0 Ptrofs.zero) pc' (rs'#dst <- Vundef) m'); split. eapply exec_Iload_notrap2. eassumption. erewrite eval_addressing_preserved. eassumption. |