(** Debug annotations. *)

Lemma step_Sset_debug:
forall f id ty a k e le m v v',
eval_expr tge e le m a v ->
sem_cast v (typeof a) ty m = Some v' ->
plus step2 tge (State f (Sset_debug id ty a) k e le m)
E0 (State f Sskip k e (PTree.set id v' le) m).