Section FIND_LABEL.
Variable ce: composite_env.
Variable lbl: label.
Variable tyret: type.
End FIND_LABEL.
(** Properties of call continuations *)

Lemma match_cont_call_cont:
forall ce' nbrk' ncnt' ce tyret nbrk ncnt k tk,
match_cont ce tyret nbrk ncnt k tk ->
match_cont ce' tyret nbrk' ncnt' (Clight.call_cont k) (call_cont tk).