(** * Syntactic properties of the translation *)
(** Preservation of code labels through the translation. *)
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.

Lemma find_label_transl_code:
forall fe lbl c,
Mach.find_label lbl (transl_code fe c) =
option_map (transl_code fe) (Linear.find_label lbl c).