(*LENB: Cminor.v requires v to be Vint i -should we keep this condition?*)
Definition CMin_halted (q : CMin_core): option val :=
    match q with
       CMin_Returnstate v Kstop => Some v
     | _ => None
    end.

Lemma CMin_after_at_external_excl : forall retv q q', CMin_after_external retv q = Some q' -> CMin_at_external q' = None.