Section CONSTRUCTORS.
Variable ge: genv.
Variable fn: function.
(** 32-bit integer constants and arithmetic *)
(** 64-bit integer constants and arithmetic *)
(** Add offset to pointer *)

Lemma addptrofs_correct_2:
forall rd r1 n k (rs: regset) m b ofs,
r1 <> X31 -> rs#r1 = Vptr b ofs ->
exists rs',
exec_straight ge fn (addptrofs rd r1 n k) rs m k rs' m
/\ rs'#rd = Vptr b (Ptrofs.add ofs n)
/\ forall r, r <> PC -> r <> rd -> r <> X31 -> rs'#r = rs#r.