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 is_tail_transf_function: forall f tf c, transf_function f = OK tf -> is_tail c (Linear.fn_code f) -> is_tail (transl_code (make_env (function_bounds f)) c) (fn_code tf).