End MATCH_STACKS.
(** Preservation by assignment to a register *)

(* Specifications: *)
Lemma match_stacks_inside_set_reg:
forall F m m' stk stk' f' ctx sp' rs' r v,
match_stacks_inside F m m' stk stk' f' ctx sp' rs' ->
match_stacks_inside F m m' stk stk' f' ctx sp' (rs'#(sreg ctx r) <- v).
Lemma match_stacks_inside_set_res:
forall F m m' stk stk' f' ctx sp' rs' res v,
match_stacks_inside F m m' stk stk' f' ctx sp' rs' ->
match_stacks_inside F m m' stk stk' f' ctx sp' (regmap_setres (sbuiltinres ctx res) v rs').