(** ** Compatibility with memory injections *)
Section INITMEM_INJ.
Variable ge: t.
Variable thr: block.
Hypothesis symb_inject: forall id b, find_symbol ge id = Some b -> Plt b thr.

Lemma store_init_data_list_neutral:
forall b idl m p m',
Mem.inject_neutral thr m ->
Plt b thr ->
store_init_data_list ge m b p idl = Some m' ->
Mem.inject_neutral thr m'.