Proof (proj1 (proj2 (proj2 (proj2 bigstep_to_steps)))).

(* Specifications: *)
Lemma eval_funcall_to_steps:
forall m fd args t m' res,
eval_funcall m fd args t m' res ->
forall k,
is_call_cont k ->
star step ge (Callstate fd args k m) t (Returnstate res k m').