Section MATCH_STACKS.
Variable F: meminj.
Variables m m': mem.
Variable F1: meminj.
Variables m1 m1': mem.
Hypothesis INCR: inject_incr F F1.
End MATCH_STACKS.
(** Preservation by assignment to a register *)
(** Preservation by a memory store *)
(** Preservation by an allocation *)
(** Preservation by freeing *)

Lemma match_stacks_free_right:
forall F m m' stk stk' sp lo hi m1',
match_stacks F m m' stk stk' sp ->
Mem.free m' sp lo hi = Some m1' ->
match_stacks F m m1' stk stk' sp.