End FIND_LABEL.
(** Properties of call continuations *)

Lemma match_cont_is_call_cont:
forall ce tyret nbrk ncnt k tk ce' tyret' nbrk' ncnt',
match_cont ce tyret nbrk ncnt k tk ->
Clight.is_call_cont k ->
match_cont ce' tyret' nbrk' ncnt' k tk /\ is_call_cont tk.