Lemma store_init_data_list_outside': forall F V (ge: Genv.t F V) b il m p m', Genv.store_init_data_list ge m b p il = Some m' -> (forall b' ofs, (b=b' /\ p <= ofs < p + init_data_list_size il) \/ contents_at m (b', ofs) = contents_at m' (b', ofs)) /\ access_at m = access_at m' /\ nextblock m = nextblock m'.