Section LABELS.
Remark find_label_save_callee_save:
forall lbl l ofs k,
Mach.find_label lbl (save_callee_save_rec l ofs k) = Mach.find_label lbl k.
Remark find_label_restore_callee_save:
forall lbl l ofs k,
Mach.find_label lbl (restore_callee_save_rec l ofs k) = Mach.find_label lbl k.
End LABELS.
(** Code tail property for Linear executions. *)
(** Code tail property for translations *)
(** * Semantic preservation *)
(** Preservation / translation of global symbols and functions. *)
Proof (Genv.find_symbol_match TRANSF).
Proof (Genv.senv_match TRANSF).
Proof (Genv.find_funct_transf_partial TRANSF).

Lemma function_ptr_translated:
forall b f,
Genv.find_funct_ptr ge b = Some f ->
exists tf,
Genv.find_funct_ptr tge b = Some tf /\ transf_fundef f = OK tf.